Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Suddenly not working
Message
De
29/11/2012 08:47:00
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 8 SP1
OS:
Windows 7
Network:
Windows 2003 Server
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01558326
Message ID:
01558327
Vues:
79
Could it be that someone moved the files to their local Documents folder, and left a link?

>I have the following code as a procedure in a menu. This used to work just fine - the user accepts the warning msg and is then taken to the desired archive folder on the server. Suddenly it no longer works...everyone (regardless of Windows version) gets a window opened to their local "Documents."
>
>
>Messagebox("WARNING - For reference only!!"+CHR(13)+"Obsolete documents are for historical purposes only.",d_nOKbutton+d_nstopsign,"OBSOLETE - For Reference Only!")
>DECLARE Long ShellExecute IN "Shell32.dll" ;
>	Long hwnd, String lpVerb, String lpFile, ;
>	String lpParameters, String lpDirectory, Long nShowCmd
>* Open Windows Explorer for current folder
>lcCurDir = FULLPATH("\\THCBGAD01\SHARES\QA\Qdms2000\archive\Level2")
>* Current folder selected
>ShellExecute (0,"", GETENV("SystemRoot") + "\explorer.exe",  "/n, /root, " + lcCurDir, "", 1)
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform