>I have a VFP SP3 application that uses GPLIB.FLL to issue some NetWare APIs. I am moving the app from Win95 to XP. When I issue a "set library to gplib50.fll' on XP I get a "gplib.fll is invalid" error message. The tech support on GPLIB says that it does not support XP.
>
>What to do? Guess I could try to determine the operating system and issue the SET LIBRARY only if Win95. How can I tell the OS and are there any other suggestions?
>
>Thanks
>
>Brenda

Brenda,
You could use this API :

#DEFINE VER_PLATFORM_WIN32S         0
#DEFINE VER_PLATFORM_WIN32_WINDOWS  1
#DEFINE VER_PLATFORM_WIN32_NT       2

DECLARE RtlMoveMemory IN WIN32API ;
	INTEGER @DestNumeric, ;
	STRING @pVoidSource, ;
	INTEGER nLength

declare short GetVersionEx in win32API ;
  string @ lpVersionInfo 
lpVersionInfo = chr(128+5*4)+replicate(chr(0),128+5*4-1)

? GetVersionEx(@lpVersionInfo)

? 'Major version :',  DWord2Str(lpVersionInfo, 5)
? 'Minor version :',  DWord2Str(lpVersionInfo, 9)
? 'Build number  :',  DWord2Str(lpVersionInfo, 13)
? 'Platform id   :',  DWord2Str(lpVersionInfo, 17)
  

function DWord2Str
lparameters tcStr, tnOffsett
local lnValue
lnValue=0
RtlMoveMemory(@lnValue, substr(tcStr,tnOffsett,4), 4)
return lnValue

Cetin