Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Server Name
Message
From
26/07/2007 11:56:12
 
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01243772
Message ID:
01243804
Views:
28
>>This still returns the mapped drive.
>
>Forgot a simpler code, which was discussed recently
>Re: How to find UNC path to a file? Thread #1232750 Message #1232759

I didn't know about the "V" flag on ADIR(). It's in Hacker's Guide, but not in VFP docs.

Posted by Frank in that thread:
Function GetFileUNC
Lparameter pcDirText
	IF FILE(pcDirText) AND ADIR(laDir,JUSTPATH(pcDirText),"V") >= 1 ;
		AND LEFT(laDir(1),2) = "\\"
		
		pcDirText = STUFF(pcDirText, 1, 2, laDir(1))
	ENDIF
	RETURN pcDirText

endproc
Steve Gibson
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform