Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Copying folder and subfolders onto a pen drive
Message
 
 
À
18/02/2009 05:22:21
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 7
OS:
Windows XP
Network:
Windows 2003 Server
Divers
Thread ID:
01382585
Message ID:
01382607
Vues:
54
>
>Can somebody help me with code to copy/move folder and subfolders from a local drive onto a pen drive. I am using Fox 7.

A simpler one
#DEFINE FOF_NOCONFIRMATION         0x0010  && Don't prompt the user.
#DEFINE FOF_NOCONFIRMMKDIR         0x0200  && don't confirm making any needed dirs
#DEFINE FOF_NOERRORUI              0x0400  && don't put up error UI

lcSourceFolder = "h:\tmp\"
lcDestinationFolder = "h:\aaa\TmpCopy"

lnFlag = FOF_NOCONFIRMATION + FOF_NOCONFIRMMKDIR + FOF_NOERRORUI

loShell		= CreateObject("Shell.Application")
loFolder	= loShell.NameSpace(lcDestinationFolder)
loFolder.CopyHere(lcSourceFolder, lnFlag )
--sb--
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform