济南方氏实业有限公司:如何把电脑的名字该成纯数字 如：001

来源：百度文库 编辑：查人人中国名人网 时间：2024/04/27 02:04:55
我知道怎么修改 但是只能修改成字母开头的
二楼的太复杂了 我想找个简单的方法
因为一定的原因 必须要改成数字的
三楼的是白痴？ 没看标题？

那是系统的限制,你为什么一定要将电脑名字换成纯数字呢?

就算是通过改注册表改了,还没有人试过是否会正常工作.

cinmin是用wmi来修改注册表的,简单点就把下而的代码直接保存为后缀为.reg的文件就可以了,注意里面有"002"的字样是修改项可以换成你要改的机器名字.另外与cinmin还有个不同是:没有修改备用信息,其他的与他是一样的.

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\ComputerName\ComputerName]
"ComputerName"="002"

[HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Tcpip\Parameters]
"NV Hostname"="002"

[HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\ComputerName\ActiveComputerName]
"ComputerName"="002"

把下面的代码保存为 *.vbs 文件
dim WSH
Set WSH = CreateObject("Wscript.Shell")
dim cmpname
cmpname = Trim(InputBox("请输入计算机名："+chr(10)+chr(13)+"※天下网吧※","计算机名更改程序"))
IF cmpname = "" THEN
MSGBox "没有输入计算机名："+chr(10)+chr(13)+"※天下网吧※",40,"计算机名更改程序"
WScript.Quit
END IF
WSH.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\ComputerName\ComputerName\ComputerName",cmpname,"REG_SZ"
WSH.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\ComputerName\ActiveComputerName\ComputerName",cmpname,"REG_SZ"
WSH.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Tcpip\Parameters\NV Hostname",cmpname,"REG_SZ"
WSH.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Tcpip\Parameters\Hostname",cmpname,"REG_SZ"
WSH.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet003\Control\ComputerName\ComputerName\ComputerName",cmpname,"REG_SZ"
WSH.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet003\Services\Tcpip\Parameters\NV Hostname",cmpname,"REG_SZ"
WSH.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet003\Services\Tcpip\Parameters\Hostname",cmpname,"REG_SZ"
就可以了...

改成A01算了

如何把电脑的名字该成纯数字 如：001 在excel中如何把公式计算的数值转成纯数字格式的啊？ 如何把电子书籍转换成纯文本的形势 如何 一次 把连续的数字打出来？如1-100 如何改变图片的格式 如把其他格式的图片该成JPEG格式 为什么硬件如手机 电脑都有 产品的名字后面还要加上数字和字母呢？是什么意思？ 如何把电脑上的音乐（如mp3)转录成高质量的磁带？ 谁会将Q-ZONE的名字设置问纯数字的 如何把电脑上的音乐（如mp3)转录成磁带？ 如电脑失声该如何还原