无忧启动论坛

标题: 在命令行里,Winxp环境下如何更改计算机名? [打印本页]

作者: secowu    时间: 2006-9-7 19:21
标题: 在命令行里,Winxp环境下如何更改计算机名?
闲着没事,想在命令行里更改计算机名,愣是没有发现哪个命令可行

1.net name 都不知道改了哪,看上去改了,可以添加删除

2.hostname只能查看计算机名
作者: wxdjs    时间: 2006-9-7 23:58
是不是只能命令行用注册表setvalue的方式改
作者: tmt2008    时间: 2006-9-8 14:53
难哪!
要修改许多键值和TCPIP有关的数据。
作者: secowu    时间: 2006-9-8 17:33
原帖由 tmt2008 于 2006-9-8 02:53 PM 发表
难哪!
要修改许多键值和TCPIP有关的数据。


乱讲。。。我给你VBS给你看啊。

  1. dim WshShell,oc,c
  2. Set WshShell = CreateObject("Wscript.Shell")
  3. oc=ucase(WshShell.RegRead("HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName\ComputerName"))
  4. if oc="XP51" then
  5.     c=oc & "-" & replace(cstr(timer),".","")
  6. else
  7.     c=oc
  8. end if
  9. c=ucase(InputBox( vbcr &  "  当前计算机名:"& oc & vbcr & vbcr &vbcr &vbcr &"  请输入新计算机名:","更改计算机名",c ))
  10. if trim(""&c)="" then Wscript.quit

  11. WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName\ComputerName", c ,"REG_SZ"
  12. WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\NV Hostname", c ,"REG_SZ"
  13. WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Hostname", c ,"REG_SZ"

  14. msgbox(" 修改成功! 重启生效。")
复制代码

还要不要全自动的?呵呵

  1. dim WshShell,c
  2. Set WshShell = CreateObject("Wscript.Shell")
  3. c="XP51" & "-" & replace(cstr(timer),".","")
  4. WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName\ComputerName", c ,"REG_SZ"
  5. WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\NV Hostname", c ,"REG_SZ"
  6. WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Hostname", c ,"REG_SZ"
复制代码

作者: 鹤冲天    时间: 2006-9-11 11:58
要不要重启生效??!
强烈关注回帖,对技术不了解,但对结果很在意很在意!!
谢谢!~!
作者: 老毛桃    时间: 2006-9-11 12:01
原帖由 鹤冲天 于 2006-9-11 11:58 发表
要不要重启生效??!
强烈关注回帖,对技术不了解,但对结果很在意很在意!!
谢谢!~!

当然需要重启
作者: tmt2008    时间: 2006-9-12 19:20
原帖由 secowu 于 2006-9-8 05:33 PM 发表


乱讲。。。我给你VBS给你看啊。

dim WshShell,oc,c
Set WshShell = CreateObject("Wscript.Shell")
oc=ucase(WshShell.RegRead("HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\Co ...

呵呵,兄弟,如果需要重启,导出一个.REG就可以。
作者: secowu    时间: 2006-9-13 08:29
原帖由 tmt2008 于 2006-9-12 07:20 PM 发表

呵呵,兄弟,如果需要重启,导出一个.REG就可以。


我是想找个DOS命令直接改,而不是去操作注册表
作者: tmt2008    时间: 2006-9-13 11:41
原帖由 secowu 于 2006-9-13 08:29 AM 发表


我是想找个DOS命令直接改,而不是去操作注册表

呵呵,修改的结果就是要存放在注册表的,过程还要通知TCPIP协议MAC绑定等立即更新。
作者: a1pz    时间: 2011-3-12 01:22
Windows Registry Editor Version 5.00

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

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

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName]
"ComputerName"="RiRiNi"

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters]
"NV Hostname"="RiRiNi"

把上面的表子导入即可
导表子命令 regedit /s   ****.reg(表子名)
其中RiRiNi是你的计算机名
请自行修改
作者: mrwang123    时间: 2011-3-12 11:38
提示: 作者被禁止或删除 内容自动屏蔽




欢迎光临 无忧启动论坛 (http://bbs.c3.wuyou.net/) Powered by Discuz! X3.3