Friday 18 December 2009

Rename the MY COMPUTER icon on the Desktop for Win 7 only

Rename the MY COMPUTER icon on the Desktop for Win 7 only:

Create a .vbs file withe the red below:

option explicit
dim objNetwork, objShell, strComputer, objFolder, objFolderItemConst MY_COMPUTER = &H11&
Set objNetwork = CreateObject("Wscript.Network")Set objShell = CreateObject("Shell.Application")
strComputer = objNetwork.ComputerName
Set objFolder = objShell.Namespace(MY_COMPUTER)Set objFolderItem = objFolder.SelfobjFolderItem.Name = "My Computer " & strComputer

No comments:

Post a Comment