| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1361 人关注过本帖
标题:一个不用重启更改机器名和工作组的批处理程序,在VB中为什么会报错
只看楼主 加入收藏
ts_2000
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2021-2-8
结帖率:33.33%
收藏
已结贴  问题点数:20 回复次数:4 
一个不用重启更改机器名和工作组的批处理程序,在VB中为什么会报错
一个不用重启更改机器名和工作组的批处理程序,修改在VB中用shell调用,为什么更改机器名正常,但改工作组的语句就总是报错,实例不可用?。

@echo off
echo
set /p name=请输您的计算机名:
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName" /v ComputerName /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname" /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /t reg_sz /d %name% /f >nul 2>nul
echo.
echo 修改计算机名完毕
echo.
echo
set /p work1=请输入您的工作组名:
wmic computersystem where Name="%COMPUTERNAME%" call JoinDomainOrWorkgroup Name="%work1%"
echo 修改工作组完毕
pause>nul
echo.
搜索更多相关主题的帖子: 更改 name 工作 echo 机器 
2022-03-23 07:55
yuma
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:银河系
等 级:贵宾
威 望:37
帖 子:1925
专家分:2992
注 册:2009-12-22
收藏
得分:0 
你是怎么改的,代码发上来看一下。

心生万象,万象皆程序!
本人计算机知识网:http://bbs.为防伸手党,本站已停止会员注册。
2022-03-23 18:43
ts_2000
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2021-2-8
收藏
得分:0 
shell "cmd /c reg add ""HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName"" /v ComputerName /t reg_sz /d " &text1.text &" /f >nul 2>nul
shell "cmd /c reg add ""HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters"" /v ""NV Hostname"" /t reg_sz /d " &text1.text &" /f >nul 2>nul
shell "cmd /c reg add ""HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters"" /v Hostname /t reg_sz /d " & text1.text &" /f >nul 2>nul


shell "cmd /c wmic computersystem where Name="" &text1.text &"" call JoinDomainOrWorkgroup Name=""& text2.text """

修改机器名好使,但修改工作组不成功!
2022-03-24 08:56
yuma
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:银河系
等 级:贵宾
威 望:37
帖 子:1925
专家分:2992
注 册:2009-12-22
收藏
得分:20 
以下4条命令亲测可以完成。

wmic computersystem where caption='%COMPUTERNAME%' call rename 'DESKTOP-MD1PIA7'-----修改计算机名为DESKTOP-MD1PIA7( 需管理员权限运行)
wmic computersystem where Name="%COMPUTERNAME%" call JoinDomainOrWorkgroup Name="aaa"-----添加当前计算机到指定的工作组aaa中( 需管理员权限运行)
powershell Rename-Computer -NewName "ComputerName"-----修改计算机名为ComputerName( 需管理员权限运行)
powershell Add-Computer -WorkGroupName "Workgroup_Name"-----添加当前计算机到指定的工作组Workgroup_Name中( 需管理员权限运行)

我建议你用下面两条命令,调用难度小一些。

[此贴子已经被作者于2022-3-24 10:37编辑过]


心生万象,万象皆程序!
本人计算机知识网:http://bbs.为防伸手党,本站已停止会员注册。
2022-03-24 10:20
ts_2000
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2021-2-8
收藏
得分:0 
谢谢版主!
2022-03-24 14:11
快速回复:一个不用重启更改机器名和工作组的批处理程序,在VB中为什么会报错
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017650 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved