Send the below prg the device e.g. DO getprintername WITH "LPT1:"

*!* Getprintername.prg
PARAMETERS cLocalDevice
DECLARE INTEGER WNetGetConnection IN WIN32API ;
   STRING @ lpLocalName, ;
   STRING @ lpRemoteName, ;
   INTEGER @ lpnLength
IF UPPER(TYPE('cLocalDevice'))="L"
	cLocalDevice = 'LPT1:'
ENDIF
cUNCBuffer = REPL(CHR(0),261)
nLength = LEN(cUNCBuffer)
IF WNetGetConnection(cLocalDevice, @cUNCBuffer, @nLength) = 0
   ? 'The UNC for '+ cLocalDevice + ' is ' + LEFT(cUNCBuffer,AT(CHR(0),cUNCBuffer)-1)
ENDIF

I think I got this from George or Ed...

>Hi !!
>
>When i try to copy any text file on my printer using
>
>API function CopyFile("filename","LPT1:",0)
>it works fine.
>
>But in case, i am using a shared printer, i have to specify the shared printer path (\\servername\sharedprinter)
>
>With the help help of which API function , i can get the the path my lpt: is mapped to ?
>Please Help
>
>Note : also suggest me some good book on using API from visual foxpro.
>
>Regards
>Sunny