How to Change the name of your computer
Create a new project and add a module and a form to it.
Declarations
Put the following declaration in the module: Declare
Function SetComputerName Lib "kernel32" _
Alias "SetComputerNameA" (ByVal lpComputerName As _
String) As Long
Code
Place a
command button on the form and in the click event add the
following code: a$ =
"Hello World"
b& = SetComputerName(a$)
Now take a
look at Control
Panel/Network/Identification.
|