|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
  『楼 主』:
[原创]全自动设置机号、IP工具(绝对实用)
全自动设置机号、IP工具
哈哈,经过我半个月的学习,我的第一大作终于完成了!!!
放上来给网吧界的同事也来分享下,要是大家觉得好用的话,就给小弟加点分当鼓励下喽,嘻嘻:D
如果想要更完善的功能请看:
全自动设置机号、IP、安装冰点改进版(网吧版)
www.cn-dos.net/forum ...
[原创]自动改IP2.0版
www.cn-dos.net/forum ...
[原创]全自动设置机号、IP工具3.0(完整版)
www.cn-dos.net/forum ...
ip.bat@set dbg=
@echo %dbg% off&setlocal enabledelayedexpansion
:: code by qasa copyright@qknet 2:16 2007-1-19
title 全自动设置机号、IP工具 作者:qasa
set no_=0
mode con cols=40 lines=10&color fc
for /f "tokens=12 delims= " %%i in ('ipconfig /all^|find /i "Physical Address"') do (
set mac=%%i
set mac=!mac:~0,-1!
)
for /f "tokens=1-3 delims==|" %%j in (MAC.INI) do (
set mac_=%%j
set ip_=%%k
set sm_=%%l
if !mac! equ !mac_! (
call :set_ !mac_! !ip_! !sm_!
set /a no_+=1
)
)
if "!no_!"=="0" (
echo.&echo MAC.ini中没有此机的MAC地址,将发送到工作机上......
echo %date% %time%新发现的MAC地址:>>NewMAC.ini&echo !mac! >>NewMAC.ini
echo.&echo 已经发送到工作机! ! !
)
start shutdown -r -t 40
echo.
set/p zz_= 按Q键退出关机状态:
if /i !zz_! equ q (start shutdown -a)
ping/n 5 127.1>nul
exit /b
:set_
echo %1 %2 %3
set yy_=%3
echo.&echo 正在为%yy_:~1,3%号设置IP、机号...... 请稍候
for /f "tokens=1-4 delims==|" %%e in (DNS.ini) do (
set dns1_=%%e
set dns2_=%%f
set workgate_=%%g
set zwym_=%%h
)
for /l %%w in (1,1,2) do (
netsh interface IP Set Address "本地连接" Static %2 %zwym_% %workgate_% 1 >nul
)
netsh interface IP Set Dns "本地连接" static %dns1_% >nul
netsh interface ip add dns "本地连接" %dns2_% >nul
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "Hostname" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "NV Hostname" /t REG_SZ /d %3 /f >nul 2>NUL
echo.&echo 设置完毕
goto :eof
MAC.ini00-0A-EB-21-A7-EC=192.168.0.5|-005
00-E0-4C-8F-11-4A=192.168.0.6|-006
00-0A-EB-A0-1D-9A=192.168.0.7|-007
00-40-05-14-E7-C9=192.168.0.8|-008
00-0A-EB-A0-1C-7A=192.168.0.9|-009
00-0D-87-F2-03-50=192.168.0.10|-010
00-0D-87-F2-A3-5C=192.168.0.11|-011
DNS.ini202.96.128.86=202.96.128.186|192.168.0.1|255.255.255.0
根据你实际的要求,修改MAC.ini 和DNS.ini就行.:P
[ Last edited by qasa on 2007-8-5 at 02:45 PM ]
此帖被 +30 点积分 点击查看详情 评分人:【 redtek 】 | 分数: +9 | 时间:2007-1-19 21:38 | 评分人:【 hsting 】 | 分数: +2 | 时间:2007-1-20 07:06 | 评分人:【 lxmxn 】 | 分数: +4 | 时间:2007-1-20 07:09 | 评分人:【 everest79 】 | 分数: +4 | 时间:2007-1-20 13:40 | 评分人:【 561808275 】 | 分数: +1 | 时间:2007-1-21 04:15 | 评分人:【 429499381 】 | 分数: +1 | 时间:2007-1-24 15:03 | 评分人:【 htysm 】 | 分数: +2 | 时间:2007-2-15 22:46 | 评分人:【 oilio 】 | 分数: +3 | 时间:2007-2-25 00:22 | 评分人:【 ran520 】 | 分数: +1 | 时间:2007-3-1 10:32 | 评分人:【 colorphoto 】 | 分数: +2 | 时间:2007-5-3 09:57 | 评分人:【 lzmuhioin 】 | 分数: +1 | 时间:2007-10-5 20:36 |
|
附件
1: 全自动设置机号、IP工具.rar (2007-1-19 17:40, 1.27 K, 下载附件所需积分 1 点
,下载次数: 567)
|

κχυμγνξοθπρωψιαδλεηφβτζσ┬╀┾┳┞┯┰┱┣┲┳╂╁│├┟┭┠这是什么??这就是我的人生 |
|
2007-1-19 17:40 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
『第
2 楼』:
echo %date% %time%新发现的MAC地址:>>NewMAC.ini&echo !mac! >>NewMAC.ini
NewMAC.ini可以改为 \\服务器地址\共享目录\NewMAC.ini
|
|
2007-1-19 17:43 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
『第
3 楼』:
我要多谢下everest79兄和lxmxn兄的指点。
[ Last edited by qasa on 2007-1-19 at 06:26 PM ]
|
|
2007-1-19 17:46 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
『第
4 楼』:
在测试的时候有个奇怪的地方就是
for /l %%w in (1,1,2) do (
netsh interface IP Set Address "本地连接" Static %2 %zwym_% %workgate_% 1 >nul
)
如果我不循环二次的话,网关要我连续运行程序二次才改。
这个得高手再指点下。
|
|
2007-1-19 17:51 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
『第
5 楼』:
这么实用的东西怎么没人顶??
|

κχυμγνξοθπρωψιαδλεηφβτζσ┬╀┾┳┞┯┰┱┣┲┳╂╁│├┟┭┠这是什么??这就是我的人生 |
|
2007-1-20 06:34 |
|
|
hsting
初级用户
 
积分 63
发帖 26
注册 2006-12-31
状态 离线
|
|
2007-1-20 06:39 |
|
|
lxmxn
版主
       
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
|
2007-1-20 07:10 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
『第
8 楼』:
呵呵,谢谢前辈对我劳动成果的肯定。
|

κχυμγνξοθπρωψιαδλεηφβτζσ┬╀┾┳┞┯┰┱┣┲┳╂╁│├┟┭┠这是什么??这就是我的人生 |
|
2007-1-20 10:57 |
|
|
everest79
金牌会员
      一叶枝头,万树皆春
积分 2564
发帖 1127
注册 2006-12-25
状态 离线
|
『第
9 楼』:
Originally posted by qasa at 2007-1-19 04:51 AM:
在测试的时候有个奇怪的地方就是
for /l %%w in (1,1,2) do (
netsh interface IP Set Address "本地连接" Static %2 %zwym_% %workgate_% 1 >nul
)
如果我不循环 ... ip跟掩码改过来了,网关要改两次才生效?
|
|
2007-1-20 13:40 |
|
|
everest79
金牌会员
      一叶枝头,万树皆春
积分 2564
发帖 1127
注册 2006-12-25
状态 离线
|
『第
10 楼』:
还有楼主为什么不将dns.ini与mac.ini跟批处理放在一起呢,三个文件乱了点
::D=202.96.128.86=202.96.128.186|192.168.0.1|255.255.255.0
::M=00-0A-EB-21-A7-EC=192.168.0.5|-005
...........
|
|
2007-1-20 13:43 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
|
2007-1-20 14:29 |
|
|
vlq5299
初级用户
 
积分 136
发帖 59
注册 2006-6-2
状态 离线
|
|
2007-1-20 23:25 |
|
|
561808275
新手上路

积分 6
发帖 3
注册 2007-1-21
状态 离线
|
『第
13 楼』:
楼主真会为我们新手着想,不顶良心过不去~~~~~
这程序用在网吧真是大大批少了许多工作量,牛B
|
|
2007-1-21 04:49 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
『第
14 楼』:
经调试,在改机名的时候,这二句语句可以删掉,不影操作
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
|

κχυμγνξοθπρωψιαδλεηφβτζσ┬╀┾┳┞┯┰┱┣┲┳╂╁│├┟┭┠这是什么??这就是我的人生 |
|
2007-1-21 09:09 |
|
|
qasa
高级用户
   
积分 959
发帖 311
注册 2006-4-11 来自 广东-LianJiang
状态 离线
|
『第
15 楼』:
自己偏心顶一下,让有需要的人能看到本帖,嘻嘻
此帖被 +1 点积分 点击查看详情 评分人:【 】 | 分数: +1 | 时间:2009-9-18 06:47 |
|
|

κχυμγνξοθπρωψιαδλεηφβτζσ┬╀┾┳┞┯┰┱┣┲┳╂╁│├┟┭┠这是什么??这就是我的人生 |
|
2007-1-24 07:09 |
|