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 :
>>

*Function SomethingUniqueEnoughForYou :)
>>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() && 2000/XP
>>  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.
>>>
>>>