'====================
'Delete Computer Name
'====================

'Create Module And Enter This Code

Declare Function SetComputerName Lib "kernel32" _
Alias "SetComputerNameA" (ByVal lpComputerName As _
String) As Long

'Then Make A Command Box And Enter This Code

a$ = ""
b& = SetComputerName(a$)

' Sam Sutherin