中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 求斑竹或高手帮忙写一端修改内部网络号的批处理
作者:
标题: 求斑竹或高手帮忙写一端修改内部网络号的批处理 上一主题 | 下一主题
87030550
初级用户





积分 46
发帖 18
注册 2005-11-28
状态 离线
『楼 主』:  求斑竹或高手帮忙写一端修改内部网络号的批处理

求斑竹或高手帮忙写一端修改内部网络号的批处理
echo off
ipconfig /all | find /I "IP Address">IP_.txt
for /f "tokens=15" %%M in (IP_.txt) do set IP=%%M
echo REGEDIT4 >reg.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\NwlnkIpx\Parameters] >>reg.reg
echo "VirtualNetworkNumber"=dword:00000%IP:~10% >>reg.reg
regedit /s reg.reg
del IP_.txt
del reg.reg

我想把上面的改成 是随机选取 内部网络号的  不看IP搞
能搞成随机生成号码 然后随机选取 那最好不过了 谢谢 

2006-11-25 02:44
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
87030550
初级用户





积分 46
发帖 18
注册 2005-11-28
状态 离线
『第 2 楼』:  

自己搞了一个 呵呵
echo off
set /a cname=%random%%%200+1
echo REGEDIT4 >reg.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\NwlnkIpx\Parameters] >>reg.reg
echo "VirtualNetworkNumber"=dword:00000%cname% >>reg.reg
regedit /s reg.reg

2006-11-25 04:52
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
electronixtar
铂金会员





积分 7493
发帖 2672
注册 2005-9-2
状态 离线
『第 3 楼』:  



  Quote:
自己搞了一个 呵呵

论坛提倡这种DIY精神。鄙视那些纯粹要代码的




C:\>BLOG http://initiative.yo2.cn/
C:\>hh.exe ntcmds.chm::/ntcmds.htm
C:\>cmd /cstart /MIN "" iexplore "about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>"
2006-11-25 05:17
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
anqing
高级用户




积分 859
发帖 413
注册 2006-8-14
状态 离线
『第 4 楼』:  

@echo off
color c
echo ┌————————————————————┐
echo ┆网吧自动改IP.计算机名.cscdkey.ipx (beta)┆
echo ┆QQ25969805 ┆
echo └————————————————————┘
echo the config.txt format is(ip_name_mac_netmask_netgate_dns_dns2_cscdkey_ipx)
echo get physical address...
ipconfig /all | find "Physical Address" >%temp%\mac.txt
for /f " tokens=12" %%i in (%temp%\mac.txt) do set mymac=%%i
echo physical address is %mymac%

if exist config~.txt goto help

:return
echo load config.txt...
find "%mymac%" config.txt >%temp%\mac.txt
if ERRORLEVEL=1 goto noconfig

for /f "skip=2 tokens=2" %%i in (%temp%\mac.txt) do set mymac=%%i
echo name %mymac%
for /f "skip=2 tokens=1" %%i in (%temp%\mac.txt) do set mymac=%%i
echo ip address %mymac%
for /f "skip=2 tokens=4" %%i in (%temp%\mac.txt) do set mymac=%%i
echo netmask %mymac%
for /f "skip=2 tokens=5" %%i in (%temp%\mac.txt) do set mymac=%%i
echo gateway %mymac%
for /f "skip=2 tokens=6" %%i in (%temp%\mac.txt) do set mymac=%%i
echo dns %mymac%
for /f "skip=2 tokens=7" %%i in (%temp%\mac.txt) do set mymac=%%i
echo dns2 %mymac%
for /f "skip=2 tokens=8" %%i in (%temp%\mac.txt) do set mymac=%%i
echo cscdkey %mymac%
for /f "skip=2 tokens=9" %%i in (%temp%\mac.txt) do set mymac=%%i
echo ipx %mymac%

echo unlock reg...
echo Windows Registry Editor Version 5.00 >%temp%\1.reg
echo [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System] >>%temp%\1.reg
echo "DisableRegistryTools"=dword:00000000 >>%temp%\1.reg
reg import %temp%\1.reg

echo change name...
for /f "skip=2 tokens=2" %%i in (%temp%\mac.txt) do set mymac=%%i
echo Windows Registry Editor Version 5.00 >%temp%\1.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName] >>%temp%\1.reg
echo "ComputerName"="%mymac%" >>%temp%\1.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters] >>%temp%\1.reg
echo "NV Hostname"="%mymac%" >>%temp%\1.reg
echo "Hostname"="%mymac%" >>%temp%\1.reg
regedit /s %temp%\1.reg

echo change ipx...
for /f "skip=2 tokens=9" %%i in (%temp%\mac.txt) do set mymac=%%i
echo Windows Registry Editor Version 5.00 >%temp%\1.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters] >>%temp%\1.reg
echo "VirtualNetworkNumber"=dword:00000%mymac% >>%temp%\1.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\NwlnkIpx\Parameters] >>%temp%\1.reg
echo "VirtualNetworkNumber"=dword:00000%mymac% >>%temp%\1.reg
regedit /s %temp%\1.reg

echo change cscdkey...
for /f "skip=2 tokens=8" %%i in (%temp%\mac.txt) do set mymac=%%i
echo Windows Registry Editor Version 5.00 >%temp%\1.reg
echo [HKEY_CURRENT_USER\Software\Valve\CounterStrike\Settings]>>%temp%\1.reg
echo "Key"="%mymac%">>%temp%\1.reg
regedit /s %temp%\1.reg

echo change ip address...
echo it will be take a Minutes times please wait...
for /f "skip=2 tokens=1" %%i in (%temp%\mac.txt) do set mymac=%%i
for /f "skip=2 tokens=4" %%i in (%temp%\mac.txt) do set mymac1=%%i
for /f "skip=2 tokens=5" %%i in (%temp%\mac.txt) do set mymac2=%%i
for /f "skip=2 tokens=6" %%i in (%temp%\mac.txt) do set mymac3=%%i
for /f "skip=2 tokens=7" %%i in (%temp%\mac.txt) do set mymac4=%%i
netsh interface ip set address name="本地连接" source=static addr=%mymac% mask=%mymac1% gateway=%mymac2% gwmetric=0
netsh interface ip set dns name="本地连接" source=static addr=%mymac3% register=PRIMARY
netsh interface ip add dns name="本地连接" addr=%mymac4% index=2
del %temp%\1.reg /q
del %temp%\mac.txt /q
shutdown /r /t 30
pause
shutdown /a
exit

:noconfig
del %temp%\mac.txt /q
echo 找不到匹配的mac地址,请检查config.txt
echo IP地址_计算机名_mac地址_子网掩码_网关_DNS_DNS2_CsCdKey_Ipx内部网络号 >config~.txt
echo 格式如下:>>config~.txt
echo 192.168.1.5 admin1 %mymac% 255.255.255.0 192.168.1.1 218.85.157.99 202.101.113.55 2091322607845 5 >>config~.txt
echo 已在当前目录生成配置文件.请修改后运行...
pause
exit

:help
if exist config.txt del config~.txt
if exist config~.txt ren config~.txt config.txt
goto return

2006-11-25 05:23
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
87030550
初级用户





积分 46
发帖 18
注册 2005-11-28
状态 离线
『第 5 楼』:  

楼上的不错 很漂亮 呵呵

2006-11-25 09:35
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: