Thought so, cause I slightly remember that GUIDs are created from a LAN card. But what if there is no LAN card, standalone machine will it still work? Hope I am not troubling so much for a reply, if so just let me know, seriously.
>Would fail if LAN card is changed :)
>Cetin
>>Thanks Cetin I will be trying this out for my VFP apps. But what is this ID based on, I mean what if the dislay card is changed or a HDD / LAN card is changed removed, will it fail?
>>
>>>You're welcome. If u think serial number is safe enough than you'd possibly love this one :
>>>
>>>Local pGUID,rGUID,lnSize
>>>Declare integer CoCreateGuid in 'OLE32.dll' ;
>>> string @pguid
>>>Declare integer StringFromGUID2 in 'OLE32.dll' ;
>>> string rguid, string @lpsz, integer cchMax
>>>pGUID=replicate(chr(0),16)
>>>rGUID=replicate(chr(0),80)
>>>
>>>If "5." $ OS()
>>> Declare integer UuidCreateSequential in 'RPCRT4.dll' string @ Uuid
>>> Return substr( iif( UuidCreateSequential(@pGUID) = 0 ;
>>> and StringFromGUID2(pGUID,@rGUID,40) # 0, ;
>>> StrConv(left(rGUID,76),6), "" ), 26,12)
>>>Else
>>> Return substr( iif( CoCreateGuid(@pGUID) = 0 ;
>>> and StringFromGUID2(pGUID,@rGUID,40) # 0, ;
>>> StrConv(left(rGUID,76),6), "" ), 26,12)
>>>Endif
>>>
>>>PS:CoCreateGuid(@pGUID) = 0 check in fact obsolote. No check there.
>>>Cetin
>>>
>>>>Hi Cetin Thanks for the trouble.
>>>>
>>>>In the mean time I put in code to ignore when serial.bin returns a blank so to get things going and one thing is for sure that this blank will occur only when accessed from a node, the original installation access will not have a blank. So for the time being I guess it is okay.
>>>>
>>>>