Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Getting current directory
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Vista
Database:
Visual FoxPro
Divers
Thread ID:
01431715
Message ID:
01431760
Vues:
49
What are the attributes for the directory / file (check properties). Could it be the file has hidden attribute?

Also, are you sure you're running this version of the code? If you add some wait window / messageboxes, will you get them?

>I don't get it. The path is exactly right every time. The file is there, DEV.TXT in c:\dev\ivf_adv\.
>
>Here's more of the code, but you can see a graveyard of code.
>
>WITH This
>	SET STEP ON
>	lcDrive=SYS(5)
>	lcCurDir=CURDIR()
>*!*		lcPathAndFile=lcCurDir + "Dev.txt"
>*!*		lcFile=lcDrive + lcPathAndFile
>	*IF SYS(2000, lcFile)
>	IF ADIR(adevfile,lcDrive + CURDIR()+"DEV.TXT") > 0
>	*IF FILE(lcFile)
>	*IF (lcDrive + lcCurDir + "Dev.txt")
>		.lDeveloper = .T.	&& Means that the developer file was found. Developer gets more menu choices.
>	ELSE
>		.lDeveloper = .F.	&& Normal User logging in at his workstation.
>	ENDIF
>	*** 09/26/2009 Cecil Champenois. Altering data paths.
>
>
>>much better, but I'm wondering what CURDIR() returns for him...perhaps he should check the actual path...
If it's not broken, fix it until it is.


My Blog
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform