Local pGUID,rGUID,lpVersionInfo Declare integer CoCreateGuid in 'OLE32.dll' string @pguid Declare integer StringFromGUID2 in 'OLE32.dll' ; string rguid, string @lpsz, integer cchMax declare short GetVersionEx in win32API ; string @ lpVersionInfo lpVersionInfo = chr(128+5*4)+replicate(chr(0),128+5*4-1) GetVersionEx(@lpVersionInfo) pGUID=replicate(chr(0),16) rGUID=replicate(chr(0),80) llWinMe2K = ASC(substr(lpVersionInfo, 5))>4 ; or ( ASC(substr(lpVersionInfo, 5)) = 4 ; and ASC(substr(lpVersionInfo, 9)) = 90 ) && 2000/XP or later, winMe If llWinMe2K Declare integer UuidCreateSequential in 'RPCRT4.dll' string @ Uuid ENDIF return substr( iif( ; IIF(llWinMe2K, ; UuidCreateSequential(@pGUID), CoCreateGuid(@pGUID)) = 0 ; and StringFromGUID2(pGUID,@rGUID,40) # 0, ; StrConv(left(rGUID,76),6), "" ), 26,12)Cetin