Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Map Drive Letter
Message
From
02/03/2006 10:06:42
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01100869
Message ID:
01100878
Views:
11
Brenda,
The code below doesn't actually MAP the drive... it just sets the lcDrv variable to the network drive that equals "\\Server\srvr_area".
I'm not sure how to do it in VFP, but I simply use batch files to map drives. E.g.
net use z: \\GA016FT3\RT2006\tempdbfs
>I want to map Z:\ to \\GA016FT3\RT2006\tempdbfs\ folder. I found this code on a previous thread, but in the debugger I can not understand how it maps a new drive.
>
>
>
>lcDrv = " "  && Network Drive
>
>DECLARE INTEGER WNetGetConnection IN win32api ;
>	STRING lpszLocalName,;
>	STRING lpszRemoteName,;
>	INTEGER @ lpchBuffer && Declare the external WNetGetConnection API
>function
>slpRemoteName = SPACE(254)  && Intialize Variables
>slen = LEN(slpRemoteName) && Intialize Variables
>FOR I = 1 to 26 && Loop through drive letters A thru Z to identify onnections
>	DRIVE = CHR(I +64)
>	DTYPE = DRIVETYPE(drive) && Determine drive type
>	IF dtype = 4 && Removables or network drives
>		iSuccess = WNetGetConnection(drive + ":",@slpRemoteName,@slen)
>		IF iSuccess = 0
>***			lcSrvarea = LEFT(slpRemoteName,ATC(CHR(10),slpRemoteName) - 1)
>			lcSrvarea = LEFT(slpRemoteName,AT(CHR(0),slpRemoteName) - 1)
>			IF UPPER(lcSrvarea) = "\\Server\srvr_area"
>				lcDrv = DRIVE
>			ENDIF
>		ENDIF		
> 	ENDIF
>ENDFOR
>
>
Previous
Reply
Map
View

Click here to load this message in the networking platform