Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Drive Mapping
Message
General information
Forum:
Visual FoxPro
Category:
Windows API functions
Title:
Miscellaneous
Thread ID:
00425895
Message ID:
00426348
Views:
22
Yes it does George.

Thanks

>>Thanks.
>>
>>Thats what we've actually done. But it gets tricky where users have specified explicit paths including drive letters.
>
>I encountered the same sort of problem when upgrading my existing FPW 2.6a systems into VFP. What I did was along the lines of the following snippet.
* assumes the cDataField is part of a table with the alias AppData
>* the data field allowed the path to be stored with or without the drive specifier.
>lcpath = AppData.cDataField
>IF NOT EMPTY(JUSTDRIVE(lcpath))
>  lcpath = SUBSTR(lcpath, 3) && Remove the drive from the path
>ENDIF
>lndrive = 67 && ASCII 'C'
>lnlast = 90 && ASCII 'Z'
>llfound = .F.
>lcresult = ""
>DO WHILE NOT llfound AND lndrive < lnlast
>  lndrive = lndrive + 1
>  IF DRIVETYPE(CHR(lndrive)) = 4 && Network drive
>    llfound = (DIRECTORY(CHR(lndrive) + ":" + lcpath))
>  ENDIF
>ENDDO
>IF llfound
>  lcresult = CHR(lndrive) + ":" + lcpath
>ELSE
>  lcresult = lcpath
>ENDIF
In the above you could use logic utilizing the JUSTDRIVE() function to determine if there was a drive mapped. If so, you'd simply use the path provided. Otherwise, use the UNC plus the path.
>
>This help?
Mathias Banda

Time is longer than a rope.
Previous
Reply
Map
View

Click here to load this message in the networking platform