Take a look at Message #
1165588 You need clsHeap class Download #
9482 if you want to use that function.
or try this
oShellApp = CreateObject("Shell.Application")
objFolder = oShellApp.NameSpace("c:\YourLocalDir") &&& must exist
*** copy files and subdirs from \\zografski\fox_util to c:\YourLocalDir
objFolder.CopyHere("\\zografski\fox_util\*.*")or
lnRec = ADIR(ArrFiles,"\\zografski\fox_util\*.*")
FOR lnvar = 1 TO lnRec
lcsource = "\\zografski\fox_util\" + ArrFiles[m.lnvar,1]
lctarget = "c:\YourLocalDir\" + ArrFiles[m.lnvar,1]
WAIT WINDOW "Copy file " + lcsource +" to " + lctarget NOWAIT
COPY FILE (lcsource) TO (lctarget)
NEXT>How i can retrive my tables from net. (into my pc)
_______________________________________________________________
Testing displays the presence, not the absence of bugs.
If a software application has to be designed, it has to be designed correctly!
_______________________________________________________________
Vladimir Zografski
Systems Analyst
