Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Error While USE Command
Message
De
23/01/2013 02:56:20
 
 
À
23/01/2013 02:25:04
Information générale
Forum:
Visual FoxPro
Catégorie:
Programmation Orientée Object
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01563718
Message ID:
01563720
Vues:
53
>Using the Following code, I am copying One Folder from Source to Destination Folder.
>
>LOCAL oShell, oSrcFolder, oDstFolder
>CreateDirectory('&Destinationfolder',0)
>oShell = CREATEOBJECT("Shell.Application")
>oSrcFolder = oShell.NameSpace('&sDirectory')
>oDstFolder = oShell.NameSpace('&Destinationfolder')
>
>IF VARTYPE(oDstFolder)="O" AND VARTYPE(oSrcFolder.Items)="O"
> oDstFolder.CopyHere(oSrcFolder.Items)
>ENDIF
>****************
>
>*Afterwards, I am Using
>
>Set Default to ('&Destinationfolder')
>Use ABC.DBF
>
>MY problem is while the copying process is Not yet completed the my next commands i,e Set Default to ('&Destinationfolder')
> & Use ABC.DBF are executed and an error ABC.DBF does not exist is generated.
>
>What is to be Done ?
>Regards
>Harsh

Unless you are able to determine whether the copying is done or not from a return value from the used objects, you must find another solution to this part of the job. That's how I see it.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform