>>193
function make(dirstr as string) as long
if dir(dirstr,vbdirectory)="" then mkdir dirstr
end function