How to Obtain current computer name from Registry

[simdan42]

I need to get the current computer name from the registry. Then store that value. Delete the first few characters from
the value and add more charater to the value and then set the new value as the computer name.(ie Current
Computer name = 1234Smith. I need to remove the 1234 and replace it with ABCD)

 

[Comtech]

Open regedit and search for 1234Smith. Edit it.
In XP right click My computer, select properties, Computer name tab.

Cheers,
Jim

http://members.cnx.net/reboot/

 

[simdan42]

I am sorry, I should have specified that I wish to do this via a script. I have many machines to change the name to a new naming convention.

 

[Comtech]

Better restate the question, and ask in one of the scripting forums then, especially if you want to do this over a lan.

Cheers,
Jim

http://members.cnx.net/reboot/

 

[MrBass]

Assuming you're after VB code, try:

Dim strCompName

Set objWshShell = WScript.CreateObject("WScript.Shell")

strCompName = objWshShell.RegRead("HKLM\System\CurrentControlSet\Control\ComputerName\ComputerName\ComputerName")
objWshShell.RegWrite "HKLM\System\CurrentControlSet\Control\ComputerName\ComputerName", Right(strCompName,Len(strCompName)-2)

 

[MrBass]

Oops! The RegWrite line should include another \ComputerName after the last ComputerName