How about using this function to get a unique number

Function DiskVolumeId() As String
Dim FSO As Object


Set FSO = CreateObject("Scripting.FileSystemObject")
DiskVolumeId = Format(CDbl(FSO.Drives("C:").SerialNumber*))
End Function


--

HTH

RP
(remove nothere from the email address if mailing direct)


"11Oppidan" wrote in message
...
Hi,

Using VB .Net please could someone help me with the syntax to convert a
string to number. I want this to turn the computer name into an value so
I
can pass it through a function to determine a unique key for the machine.