Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to check if a folder already exists?
Message
From
02/08/2000 23:44:26
 
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00400144
Message ID:
00400219
Views:
23
>>>>
FILE("C:\MYFOLDER\NUL")
>>>>should return .T. if C:\MyFolder exists and .F. otherwise.
>
>>>This does not work in all OS's (like NT or W2K). You can use ADIR() to check for the existance of a folder.
>>>
>>>IF ADIR(aTemp,"C:\MyFolder","D")=1
>>>
>>>then folder exists.
>>
>>Either a file or a folder exists; you need to check the file attributes of the file in the rsultant array.
>>
>
>Isn't that what the "D" atribute check does?

No, it permits files with the "D" attribute to be included; if a file matches the file name, then it will be present in the returned array - the attribute mask is for inclusion of files, not exclusion. Try the following:
cFile = SYS(2015)
? STRTOFILE(cFile,cFile)
? ADIR(aFile,cFile,'D')
? aFile[1,5]
ERASE (cFile)
MD (cFile)
? ADIR(aFile,cFile,'D')
? aFile[1,5]
RD (cFile)
? ADIR(aFile,cFile,'D')
? aFile[1,5]
EMail: EdR@edrauh.com
"See, the sun is going down..."
"No, the horizon is moving up!"
- Firesign Theater


NT and Win2K FAQ .. cWashington WSH/ADSI/WMI site
MS WSH site ........... WSH FAQ Site
Wrox Press .............. Win32 Scripting Journal
eSolutions Services, LLC

The Surgeon General has determined that prolonged exposure to the Windows Script Host may be addictive to laboratory mice and codemonkeys
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform