Unique identifier for each computer

[Guest_imported]

Hi,
I am trying to write a vb program which requires an unique identifier for each computer.


Is there a way to generate or get an unique identifier for each computer??

 

[BrainB]

How about this.

'------------------------------------------------
'- Macro to get network name of current computer
'------------------------------------------------
'-
Private Declare Function GetComputerName _
    Lib "kernel32" Alias "GetComputerNameA" _
    (ByVal lpBuffer As String, nSize As Long) As Long
Private MyString As String
Private MyName As String
'--------------------------------------------

Sub GET_COMPUTER_NAME()
    MyName = FindComputerName
    MsgBox (MyName)
End Sub
'--------------------------------------------
 Public Function FindComputerName() As String
    MyString = Space(512)
    GetComputerName MyString, Len(MyString)
    FindComputerName = Application.WorksheetFunction.Clean(Trim(MyString))
 End Function
 '-------------------------------------------

Regards
BrianB
** Let us know if you get something that works !
================================

 

[ETID]

....or if using win2K


sub get_computer_name()

my_string$=environ$("Computername&quot
msgbox(my_string$)

end sub

 

[BrainB]

Hi ETID

Good one. Works in 97 too.

Regards
BrianB
** Let us know if you get something that works !
================================

 

[yule1111]

Isn't there a unique hardware code for the physical cpu?
if so, can that be used?
if so, how to get that string?