| |||||||||||
Anonymous
![]() |
Thanks, I was afraid that the DBID+TIMEDATE+DBID+TIMEDATE had to be respected. Following your suggestion I have built this (that is the nearest thing I can think of for generating 32 Hex representation of 4 DWORDS) Private Function GetUnid As String Dim Mask As String Dim S As String Dim I As Integer Dim X As Long
Randomize For I = 1 To 8 Mask="0000" X = Fix(Rnd * 65536) S = Hex(X) Mid(Mask,5-Len(S)) = Hex(X) GetUnid = GetUnid + Mask Next End Function Thanks for the help
|