批处理设置计算机名和IP地址(页 1) - 编程天地 - 批处理 - 电脑爱好者论坛电脑爱好者的亲密朋友!

lzhdm 发表于 2008-1-8 20:26

批处理设置计算机名和IP地址

@echo off
@title 魅の影精简优化系统-计算机名.网卡IP设置-%date% %time%!
@color
@cls
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
@echo ※                                                                         ※
@echo ※    注意:运行此程序前请确定当前用户[%username%]具备管理员权限    ※
@echo ※                                                                         ※
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
@pause>nul|echo 请按任意键继续.
::下面为一些特定的网络参数,请根据自己的情况修改.
@set pcna=PC
@set netid=192.168.161
@set mask=255.255.255.0
@set GateWay1=192.168.16.1
@set GateWay2=192.168.16.2
@set dns1=202.96.209.133
@set dns2=202.109.116.116
@cls
@echo [url=mailto:※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※@echo]※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※@echo[/url] ※                                                                         ※
@echo ※       注意:运行此程序前请确定网络连接的名称是"本地连接"             ※
@echo ※                                                                         ※
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
@pause>nul|echo 请按任意键开始计算机名和网卡IP设置(注:设置完成后建议重启计算机)
@set /p st=请输入IP最后三位尾数[(001~254)如:007]:
@set No=%st%
@if /i "%No%"=="%st%
:001
@set v=1& Goto Net
:002
@set v=2& Goto Net
:003
@set v=3& Goto Net
:004
@set v=4& Goto Net.
:0055
@set v=5& Goto Net
:006
@set v=6& Goto Net
:007
@set v=7& Goto Net
:008
@set v=8& Goto Net
:009
  @set v=9& Goto Net
:010
@set v=10& Goto Net
:011
@set v=11& Goto Net
:0122
@set v=12& Goto Net
:013
@set v=13& Goto Net
:0141
@set v=14& Goto Net
:015
@set v=15& Goto Net
:016
@set v=16& Goto Net
:017
@set v=17& Goto Net
:018
@set v=18& Goto Net
:019
@set v=19& Goto Net
:020
@set v=20& Goto Net
:021
@set v=21& Goto Net
:022
@set v=22& Goto Net
:023
@set v=23& Goto Net!
:024
@set v=24& Goto Net
:025
@set v=25& Goto Net
:026
@set v=26& Goto Net
:027
@set v=27& Goto Net
:028
@set v=28& Goto Net
:029
@set v=29& Goto Net
:030
@set v=30& Goto Net
:031
@set v=31& Goto Net
:032
@set v=32& Goto Net
:033
set v=33& Goto Net
:034
@set v=34& Goto Net
:035
@set v=35& Goto Net
:036
@set v=36& Goto Net
:037
@set v=37& Goto Net
:038
@set v=38& Goto Net
:039
@set v=39& Goto Net
:040
set v=40& Goto Net
:041
@set v=41& Goto Net
:042
@set v=42& Goto Net
:043
@set v=43& Goto Net
:044
@set v=44& Goto Net
:045
@set v=45& Goto Net
:046
@set v=46& Goto Net
:047
@set v=47& Goto Net
:048
@set v=48& Goto Net
:049
@set v=49& Goto Net
:050
@set v=50& Goto Net
:051
@set v=51& Goto Net
:052
@set v=52& Goto Net
:053
@set v=53& Goto Net
:054
@set v=54& Goto Net
:055
@set v=55& Goto Net
:056
@set v=56& Goto Net
:057
@set v=57& Goto Net
:058
@set v=58& Goto Net
:059
@set v=59& Goto Net
:060
@set v=60& Goto Net
:061
@set v=61& Goto Net
:062
@set v=62& Goto Net
:063
@set v=63& Goto Net'
:064
@set v=64& Goto Net
:065
@set v=65& Goto Net
:066
@set v=66& Goto Net
:067
@set v=67& Goto Net
:068
@set v=68& Goto Net
:069
@set v=69& Goto Net
:070
@set v=70& Goto Net
:071
@set v=71& Goto Net
:072
@set v=72& Goto Net
:073
@set v=73& Goto Net
074
@set v=74& Goto Net
:075
@set v=75& Goto Net
:076
@set v=76& Goto Net
:077
@set v=77& Goto Net
:078
@set v=78& Goto Net
:079
@set v=79& Goto Net
:080
@set v=80& Goto Net
:081
@set v=81& Goto Net
:082
@set v=82& Goto Net
:083
@set v=83& Goto Net
:084
@set v=84& Goto Net
:085
@set v=85& Goto Net
:086
@set v=86& Goto Net
:087
@set v=87& Goto Net
:088
@set v=88& Goto Net
089
@set v=89& Goto Net
:090
@set v=90& Goto Net
:091
@set v=91& Goto Net
:092
@set v=92& Goto Net
:093
@set v=93& Goto Net
:094
@set v=94& Goto Net
:095
@set v=95& Goto Net
:096
@set v=96& Goto Net
:097
@set v=97& Goto Net
:098
@set v=98& Goto Net
:099
@set v=99& Goto Net
:100l
@set v=100& Goto Net
:101
@set v=101& Goto Net
:102
@set v=102& Goto Net
:103
@set v=103& Goto Net
:104
@set v=104& Goto Net
:105
@set v=105& Goto Net
:106
@set v=106& Goto Net
:107
@set v=107& Goto Net
:108
@set v=108& Goto Net
:109
@set v=109& Goto Net
:110
@set v=110& Goto Net
:111
@set v=111& Goto Net
:112
@set v=112& Goto Net
:113
@set v=113& Goto Net
:114
@set v=114& Goto Net
:115
@set v=115& Goto Net
:116
@set v=116& Goto Net
:117
@set v=117& Goto Net
:118
@set v=118& Goto Net
:119
@set v=119& Goto Net
:120
@set v=120& Goto Net
:121
@set v=121& Goto Net
:122
@set v=122& Goto Net
:123
@set v=123& Goto Net
:124
@set v=124& Got Net
:125
@set v=125& Goto Net
:126
@set v=126& Goto Net
:127
@set v=127& Goto Net
:128
@set v=128& Goto Net
:129
@set v=129& Goto Net
:130
@set v=130& Goto Net
:131
@set v=131& Goto Net
:132
@set v=132& Goto Net
:133
@set v=133& Goto Net
:134
@set v=134& Goto Net
:135
@set v=135& Goto Net
:136
@set v=136& Goto Net
:137
@set v=137& Goto Net
:138
@set v=138& Goto Net
:139
@set v=139& Goto Net
:140
@set v=140& Goto Net
:141
@set v=141& Goto Net
:142
@set v=142& Goto Net
:143
@set v=143& Goto Net
:144
@set v=144& Goto Net
:145
@set v=145& Goto Net
:146
@setv=146& Goto Net
:147
@set v=147& Goto Net
:148
@set v=148& Goto Net
:149
@set v=149& Goto Net
:150
@set v=150& Goto Net
:151
@set v=151& Goto Net
:152
@set v=152& Goto Net
:153
@set v=153& Goto Net
:154
@set v=154& Goto Net
:155
@set v=155& Goto Net
:156
@set v=156& Goto Net
:157
@set v=157& Goto Net
:158
@set v=158& Goto Net
:159
@set v=159& Goto Net
:160
@set v=160& Goto Net
:161
@set v=161& Goto Net
:162
@set v=162& Goto Net
:163
@set v=163& Goto Net
:164
@set v=164& Goto Net
:165
@set v=165& Goto Net
:166
@set v=166& Goto Net
:167
@set v=167& Goto Net
:168
@set v=168& Goto Net
:169
@set v=169& Goto Net
:170
@set v=170& Goto Net
:171
@set v=171& Goto Net
:172
@set v=172& Goto Net
:173
@set v=173& Goto Net
:174
@set v=174& Goto Net
:175
@set v=175& Goto Net
:176
@set v=176& Goto Net
:177
@set v=177& Goto Net
:178
@set v=178& Goto Net
:179
@set v=179& Goto Net
:180
@set v=180& Goto Net
:181
@set v=181& Goto Net
:182
@set v=182& Goto Net
:183
@set v=183& Goto Net
:184
@set v=184& Goto Net
:185
@set v=185& Goto Neti
:186
@set v=186& Goto Net
:187
@set v=187& Goto Net
:188
@set v=188& Goto Net
:189
@set v=189& Goto Net
:190
@set v=190& Goto Net
:191
@set v=191& Goto Net
:192
@set v=192& Goto Net
:193
@set v=193& Goto Net
:194
@set v=194& Goto Net
:195
@set v=195& Goto Net
:196
@set v=196& Goto Net]
:197
@set v=197& Goto Net
:198
@set v=198& Goto Net
: L:199
@set v=199& Goto Net
:200
@set v=200& Goto Net
:201
@set v=201& Goto Net
:202
@set v=202& Goto Net
:203
@set v=203& Goto Net
p:204
@set v=204& Goto Net
:205
@set v=205& Goto Net
:206
@set v=206& Goto Net
:207
@set v=207& Goto Net
:208
@set v=208& Goto Net
:209
@set v=209& Goto Net
:210
@set v=210& Goto Net
:211
@set v=211& Goto Net
:212
@set v=212& Goto Net
:213
@set v=213& Goto Net
:214
@set v=214& Goto Net
:215
@set v=215& Goto Net
:216
@set v=216& Goto Net
:217
@set v=217& Goto Net
:218
@set v=218& Goto Net
:219
@set v=219& Goto Net
:220
;@set v=220& Goto Net
:221
@set v=221& Goto Net
:222
@set v=222& Goto Net
:223
@set v=223& Goto Net
:224
@set v=224& Goto Net
:225
@set v=225& Goto Net
:226
@set v=226& Goto Net
:227
@set v=227& Goto Net
:228
@set v=228& Goto Net
:229
@set v=229& Goto Net
:230
@set v=230& Goto Net
:231
@set v=231& Goto Net
:232
@set v=232& Goto Net
:233
@set v=233& Goto Net
:234
@set v=234& Goto Net
:235
@set v=235& Goto Net
:236
@set v=236& Goto Net
:237
@set v=237& Goto Net
:238
@set v=238& Goto Net
:239
@set v=239& Goto Net
:240
@set v=240& Goto Net
:241
@set v=241& Goto Net
:242
@set v=242& Goto Net
:243
@set v=243& Goto Net
:244
@set v=244& Goto Net
:245
@set v=245& Goto Net
:246
@set v=246& Goto Net
:247
@set v=247& Goto Net
:248
@set v=248& Goto Net
:249
@set v=249& Goto Net
:250
@set v=250& Goto Net
:251
@set v=251& Goto Net
:252
@set v=252& Goto Net
:253
@set v=253& Goto Net
:254
@set v=254& Goto Net
@color f0
@cls
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
@echo ※                                                                         ※
@echo ※          正在配置计算机名和网卡IP，请稍等...                         ※
@echo ※                                                                         ※
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
@arp.exe -d
@if exist %windir%\net.txt
@echo pushd interface ip >%windir%\net.txt
@echo set address name="本地连接" source=static addr=%netid%.%v% mask=%mask% >>%windir%\net.txt
@echo set address name="本地连接" gateway=%gateway1% gwmetric=0 >>%windir%\net.txt
@echo set dns name="本地连接" source=static addr=%dns1% register=PRIMARY >>%windir%\net.txt
@echo add dns name="本地连接" addr=%dns2% index=2 >>%windir%\net.txt
@echo set wins name="本地连接" source=static addr=none >>%windir%\net.txt
@echo popd >>%windir%\net.txt
@netsh -f %windir%\net.txt
@if exist %windir%\Name.reg del %windir%\Name.reg
@echo Windows Registry Editor Version 5.00 >%windir%\Name.reg
@ech[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName] >>%windir%\Name.reg
@echo "ComputerName"="%pcna%%st%" >>%windir%\Name.reg
@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName] >>%windir%\Name.reg
@echo "ComputerName"="%pcna%%st%" >>%windir%\Name.reg
@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters] >>%windir%\Name.reg
@echo "NV Hostname"="%pcna%%st%" >>%windir%\Name.reg
@echo "Hostname"="%pcna%%st%" >>%windir%\Name.reg
@echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon] >>%windir%\Name.reg
@echo "AltDefaultDomainName"="%pcna%%st%" >>%windir%\Name.reg
@echo "DefaultDomainName"="%pcna%%st%" >>%windir%\Name.reg
@echo [HKEY_LOCAL_MACHINE\Software\InterServ\Meteor] >>%windir%\Name.re
@echo "Serial"="%lxkey%" >>%windir%\Name.reg
@echo "sharekey"="1" >>%windir%\Name.reg
@echo [HKEY_CURRENT_USER\Software\Valve\CounterStrike\Settings] >>%windir%\Name.reg
@echo "Key"="%cskey%" >>%windir%\Name.reg
@echo [HKEY_USERS\S-1-5-21-839522115-507921405-2146800195-500\Software\Valve\CounterStrike\Settings] >>%windir%\Name.reg
@echo "Key"="%cskey%" >>%windir%\Name.reg
@regedit /s %windir%\Name.reg
@if exist %windir%\net.txt del %windir%\net.txt
@if exist %windir%\Name.reg del %windir%\Name.reg
@color f2
@cls
@echo ┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻┻
@echo             计算机名:  %pcna%%st%
@echo             IP地址: %netid%.%v%
@echo             子网掩码:  %mask%
@echo             默认网关:  %gateway1%
@echo             首选DNS:  %dns1%
@echo             备用DNS:  %dns2%
@echo ┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳┳
@route -p add 0.0.0.0 mask 0.0.0.0 %gateway1% metric 1
@pause>nul|echo 计算机名和网卡IP设置完毕,请按任意键退出.
@exit

周君臣 发表于 2008-1-8 21:18

呵呵,比较难懂啊,,,,,,

wjdidi 发表于 2008-1-15 20:11

呵，不错的东西，顶

是非缘 发表于 2008-2-20 21:10

看了有些头晕！

不过先下了！

nongchaokai 发表于 2008-2-22 06:37

看看吧！:sS738AQ:

awerlasdfwe 发表于 2008-3-22 21:21

我的疑惑与修改意见

[size=4]我看核心代码就是两条，一条是根据生成的net.txt文件进行IP设置
netsh -f %windir%\net.txt
另一条是根据生成的name.reg，导入注册表。
regedit /s %windir%\Name.reg

由于里面的错误输入比较多，一般很难直接获得满意的结果。
对于IP地址后三位的输入，我觉得过于啰嗦，不如改为下面的语句：
@set /p v=请输入IP最后三位尾数[(1~254)如:7]:
if /I %v% leq 255 (set st=%v%)
if /I %v% leq 99 (set st=0%v%)
if /I %v% leq 9 (set st=00%v%)
这样，直接输入IP的后三位，前面不用加0，输入起来更方便，用后面的3行代码，将st变量改为3位的字符串，自动为刚才输入的IP前加上相应的0。

有几行命令我认为是多余的：
@arp.exe -d
@route -p add 0.0.0.0 mask 0.0.0.0 %gateway1% metric 1

最后的显示输出结果部分，不如改为
ipconfig/all
这样，调用的机器内部的信息，更便于查验自己的输入是否有效。

产生的两个文件前不知道为什么非得存在系统目录（%windir%）下，根据我的检验，放在哪儿都是无关紧要的，如果与该批命令放在同一目录下，更易于查看运行结果。

批命令运行之初，暂停命令pause是不是用得过于频繁，一步进入输入IP界面，减少一些装饰性的是不是操作起来更为简捷。

=============☆ ★ ☆ 最后一个问题 ☆ ★ ☆ =====================================
@echo [HKEY_LOCAL_MACHINE\Software\InterServ\Meteor] >>%windir%\Name.re
@echo "Serial"="%lxkey%" >>%windir%\Name.reg
@echo "sharekey"="1" >>%windir%\Name.reg
@echo [HKEY_CURRENT_USER\Software\Valve\CounterStrike\Settings] >>%windir%\Name.reg
@echo "Key"="%cskey%" >>%windir%\Name.reg
@echo [HKEY_USERS\S-1-5-21-839522115-507921405-2146800195-500\Software\Valve\CounterStrike\Settings] >>%windir%\Name.reg
@echo "Key"="%cskey%" >>%windir%\Name.reg
以上几行注册表，在我的电脑上没有找到，另外调用的变量%cskey%、%lxkey%在前面的代码中并没有定义，似乎也不是系统变量，我的检验结果，如果去掉这几行，运行依然正常。
请老兄赐教。!!!!!!!!!!!!!![/size]

awerlasdfwe 发表于 2008-3-22 22:18

修改后的批命令代码

@echo off
@color 0a
::下面为一些特定的网络参数,请根据自己的情况修改.
@set pcna=PC
@set netid=192.168.1
@set mask=255.255.255.0
@set GateWay1=192.168.1.1
@set dns1=202.194.133.1
@set dns2=202.194.133.2

@cls
@echo.=============================================================================
@echo.=============================================================================
@echo.
@echo.       计算机名.网卡IP设置       %date% %time%
@echo.
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
@echo.
@echo       注意：运行此程序前请确定当前用户[%username%]具备管理员权限
@echo.
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
@echo ※                                                                         ※
@echo ※                                                                         ※
@echo ※       注意：运行此程序前请确定网络连接的名称是"本地连接"             ※
@echo ※                                                                         ※
@echo ※                                                                         ※
@echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
echo.
@echo    开始计算机名和网卡IP设置
@echo.
@echo.    注：设置完成后建议重启计算机
@echo.
@echo.******************************************************************************
@echo.
@set /p v=请输入IP最后三位尾数[(1~254)如:7]:

if /I %v% GTR 255 goto error
if /I %v% leq 255 (set st=%v%)
if /I %v% leq 99 (set st=0%v%)
if /I %v% leq 9 (set st=00%v%)

@cls
@echo ==============================================================================
@echo             正在配置计算机名和网卡IP，请稍等... ...
@echo ==============================================================================

@if exist net.txt (del net.txt)
@echo pushd interface ip >net.txt
@echo set address name="本地连接" source=static addr=%netid%.%v% mask=%mask% >>net.txt
@echo set address name="本地连接" gateway=%gateway1% gwmetric=0 >>net.txt
@echo set dns name="本地连接" source=static addr=%dns1% register=PRIMARY >>net.txt
@echo add dns name="本地连接" addr=%dns2% index=2 >>net.txt
@echo set wins name="本地连接" source=static addr=none >>net.txt
@echo popd >>net.txt
@netsh -f net.txt

@if exist Name.reg del Name.reg
@echo Windows Registry Editor Version 5.00 >Name.reg
@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName] >>Name.reg
@echo "ComputerName"="%pcna%%st%" >>Name.reg

@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName] >>Name.reg
@echo "ComputerName"="%pcna%%st%" >>Name.reg

@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters] >>Name.reg
@echo "NV Hostname"="%pcna%%st%" >>Name.reg
@echo "Hostname"="%pcna%%st%" >>Name.reg

@echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon] >>Name.reg
@echo "AltDefaultDomainName"="%pcna%%st%" >>Name.reg
@echo "DefaultDomainName"="%pcna%%st%" >>Name.reg

@echo [HKEY_LOCAL_MACHINE\SOFTWARE\InterServ\Meteor] >>Name.reg
@echo "Serial"="%lxkey%" >>Name.reg
@echo "sharekey"="1" >>Name.reg

@echo [HKEY_CURRENT_USER\Software\Valve\CounterStrike\Settings] >>Name.reg
@echo "Key"="%cskey%" >>Name.reg

@echo [HKEY_USERS\S-1-5-21-839522115-507921405-2146800195-500\Software\Valve\CounterStrike\Settings] >>Name.reg
@echo "Key"="%cskey%" >>Name.reg

@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanserver\parameters] >>Name.reg
@echo "srvcomment"="%pcna%%st%" >>Name.reg
@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet001\Services\lanmanserver\parameters] >>Name.reg
@echo "srvcomment"="%pcna%%st%" >>Name.reg
@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet002\Services\lanmanserver\parameters] >>Name.reg
@echo "srvcomment"="%pcna%%st%" >>Name.reg
@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet003\Services\lanmanserver\parameters] >>Name.reg
@echo "srvcomment"="%pcna%%st%" >>Name.reg
@goto goon

:error
@echo 你输入的IP大于了255，或者不合法

:goon
@echo.

@regedit /s Name.reg

@if exist net.txt del net.txt
@if exist Name.reg del Name.reg

@color f2

@route -p add 0.0.0.0 mask 0.0.0.0 %gateway1% metric 1

ipconfig /all
@pause>nul|echo    请检查IP是否设置正确，按任意键退出，并重启电脑...
@exit

球磨机器 发表于 2008-4-21 14:03

反击破碎机价格强力反击破碎机

**** 作者被禁止或删除内容自动屏蔽 ****

页: [1]

电脑爱好者论坛's Archiver