General information
Category:
Coding, syntax & commands
Title:
Error in drive detection
I tried detecting a drive at that valid even of my textbox and this was my command...
IF ! empty(this.value)
dirdrive=alltrim(this.value)
oFSO = CREATEOBJECT("Scripting.FileSystemObject")
STORE oFSO.FolderExists("&dirdrive:\") to hon
IF hon=.f.
ans=messagebox('This is not a valid drive or there is no disk ;
in the drive, please try again')
this.value=''
RETURN 0
ENDIF
ENDIF
however, when i tried compiling it and running it in a windows 95 environment, the createobject triggered an error. is there a way of solving this problem or is there another way of detecting a drive aside from this? by the way, i'm using visual foxpro 6 in developing the system.
stephanie
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only