Board logo

标题: [已解决]50元求修复代码,关于ip设置的问题 [打印本页]

作者: beck1321    时间: 2013-1-5 16:29     标题: [已解决]50元求修复代码,关于ip设置的问题

本帖最后由 beck1321 于 2013-1-8 16:15 编辑

具体报酬:50元软妹币
支付方式:支付宝
联系方式:QQ511156969
有效期限:2013年2月之前。
需求描述:如下
  1. @echo off
  2. echo 正在为您设置IP,请稍等......
  3. set /A "a=%RANDOM%%%250+3
  4. set /A "b=%RANDOM%%%250+3
  5. set /A "c=%RANDOM%%%250+3
  6. netsh interface ip set address name="本地连接" source=static addr=10.%a%.%b%.%c% mask=255.0.0.0 >nul
  7. :start
  8. set /A "num=%RANDOM%%%190+10"
  9. ping 10.1.1.%num% -n 1 >nul
  10. arp -a |find "10.1.1.%num%" &&goto start
  11. netsh interface ip set address name="本地连接" source=static addr=10.1.1.%num% mask=255.255.255.0 gateway=10.1.1.250 gwmetric=0 | find "IP地址已在网络上使用" &&goto start
  12. netsh interface ip set dns "本地连接" source=static addr=10.1.1.100 register=primary >nul
  13. netsh interface ip add dns "本地连接" addr=8.8.8.8 >nul
  14. netsh interface ip set wins name="本地连接" source=static addr=10.1.1.100 >nul
  15. if %errorlevel% neq 0 goto start
复制代码
这段代码 其中
  1. set /A "num=%RANDOM%%%190+10"
  2. ping 10.1.1.%num% -n 1 >nul
  3. arp -a |find "10.1.1.%num%" &&goto start
复制代码
这一段至关重要,是为了arp-a 得到 这个随机的num 的ip是否已有mac 即是否已在使用 如果有 则 继续 goto start
如果没有 则 继续下面的 ip配置工作


问题:
xp运行 这个代码 是没问题的,经过测试,能够发现已有ip 而重新start
但win7不行  ,我把>nul去掉 看状态 ping了以后 直接就配置下面的操作了。 给人感觉都没有执行arp -a   find这条命令 ,我在win7单独运行arp -a 这一行 ,是有显示的。但不知为何 整个代码运行时就不出现了。

(支付方式仅限支付宝)


==============
问题已解决,款已付。
感谢"无名"英雄  我猜你是论坛的高层哦!
作者: beck1321    时间: 2013-1-5 16:35

我自己做了个测试 就是把1楼的代码 第6行去掉,(前提是我先手动设置了ip和子网掩码如10.22.22.22 255.0.0.0 )再运行的批处理  则3、4、5 肯定是不起作用的吧,因为我已经手动做好了这段批处理要做的事情。
我就发现 这么做就正常了

一旦把第6行代码 加入回去 又不行了
作者: beck1321    时间: 2013-1-5 16:37

我是这么做测试的 比如10.1.1.10 有一台电脑肯定是开着的

我就 把代码改为
set /A "num=%RANDOM%%%1+10"

则代表 无论怎么随机 都是10

那势必就能体现出来对错了
作者: BAT-VBS    时间: 2013-1-5 17:20

  1. echo 正在为您设置IP,请稍等......
  2. set /A "a=%RANDOM%%%250+3
  3. set /A "b=%RANDOM%%%250+3
  4. set /A "c=%RANDOM%%%250+3
  5. netsh interface ip set address name="本地连接" source=static addr=10.%a%.%b%.%c% mask=255.0.0.0
  6. :start
  7. set /A "num=%RANDOM%%%190+10"
  8. ping 10.1.1.%num% -n 1
  9. rem arp -a |find "10.1.1.%num%" &&goto start
  10. %systemroot%\system32\arp.exe -a | %systemroot%\system32\find.exe "10.1.1.%num%" &&goto start
  11. netsh interface ip set address name="本地连接" source=static addr=10.1.1.%num% mask=255.255.255.0 gateway=10.1.1.250 gwmetric=0 | find "IP地址已在网络上使用" &&goto start
  12. netsh interface ip set dns "本地连接" source=static addr=10.1.1.100 register=primary
  13. netsh interface ip add dns "本地连接" addr=8.8.8.8
  14. netsh interface ip set wins name="本地连接" source=static addr=10.1.1.100
  15. if %errorlevel% neq 0 goto start
复制代码
如果仍然有问题,请把执行过程贴出来看看那。
作者: BAT-VBS    时间: 2013-1-5 17:21

或者把那行改成这样:
  1. %systemroot%\system32\arp.exe -a 2>&1 | %systemroot%\system32\find.exe "10.1.1.%num%" &&goto start
复制代码

作者: beck1321    时间: 2013-1-5 17:27

回复 4# BAT-VBS


    好的 我尝试一下
作者: beck1321    时间: 2013-1-5 17:41

回复 5# BAT-VBS


    您发的两个 都不行 我个人觉得 不是在arp这一行命令 是在第6行的命令

我待会儿发下 xp下 和win7的 运行过程
作者: beck1321    时间: 2013-1-5 17:44

win7下  不成功的(不管是BAT-VBS 给我修改的还是原来的都不行)
  1. C:\>b
  2. C:\>set /A "a=24975%131+20
  3. C:\>set /A "b=17566%251+3
  4. C:\>set /A "c=31688%251+3
  5. C:\>netsh interface ip set address name="本地连接" source=static addr=10.105.250
  6. .65 mask=255.0.0.0 gateway=10.3.3.254 gwmetric=0
  7. C:\>set /A "num=1399%1+232"
  8. C:\>ping 10.3.3.232 -n 2
  9. 正在 Ping 10.3.3.232 具有 32 字节的数据:
  10. PING: 传输失败。General failure.
  11. PING: 传输失败。General failure.
  12. 10.3.3.232 的 Ping 统计信息:
  13.     数据包: 已发送 = 2,已接收 = 0,丢失 = 2 (100% 丢失),
  14. C:\>rem arp -a |find "10.3.3.232" &&goto start
  15. C:\>C:\Windows\system32\arp.exe -a   2>&1  | C:\Windows\system32\find.exe "10.3.
  16. 3.232"   && goto start
  17. C:\>netsh interface ip set address name="本地连接" source=static addr=10.3.3.232
  18. mask=255.255.255.0 gateway=10.3.3.254 gwmetric=0
  19. C:\>netsh interface ip set dns "本地连接" source=static addr=10.3.3.10 register=
  20. primary
  21. 终止批处理操作吗(Y/N)? y
  22. C:\>
复制代码
======

C:\>rem arp -a |find "10.3.3.232" &&goto start

C:\>C:\Windows\system32\arp.exe -a   2>&1  | C:\Windows\system32\find.exe "10.3.
3.232"   && goto start

就是这一段 运行是运行了这一行的命令 但直接进行下面的操作了。在这批处理运行前后 我均arp -a 看了下 我做测是的232 的mac都在本机的mac地址表里
======
作者: beck1321    时间: 2013-1-5 17:50

本帖最后由 beck1321 于 2013-1-5 17:53 编辑

xp下没有那么多提示  但 成功的显示了 已占用ip 的mac 然后 一直goto start,win7那个运行过程 是用的BAT-VBS 您的修改的,即使是没修改的 也是那个样子,所以不用担心修改错了的问题
  1. C:\>a
  2. 正在为您设置IP地址,请稍等......
  3. 确定。
  4. Pinging 10.3.3.254 with 32 bytes of data:
  5. Request timed out.
  6. Ping statistics for 10.3.3.254:
  7.     Packets: Sent = 1, Received = 0, Lost = 1 (100% loss),
  8.   10.3.3.254            1c-17-d3-dc-c0-78     dynamic
  9. Pinging 10.3.3.254 with 32 bytes of data:
  10. Request timed out.
  11. Ping statistics for 10.3.3.254:
  12.     Packets: Sent = 1, Received = 0, Lost = 1 (100% loss),
  13.   10.3.3.254            1c-17-d3-dc-c0-78     dynamic
  14. Pinging 10.3.3.254 with 32 bytes of data:
  15. Request timed out.
  16. Ping statistics for 10.3.3.254:
  17.     Packets: Sent = 1, Received = 0, Lost = 1 (100% loss),
  18.   10.3.3.254            1c-17-d3-dc-c0-78     dynamic
  19. Pinging 10.3.3.254 with 32 bytes of data:
  20. Request timed out.
  21. Ping statistics for 10.3.3.254:
  22.     Packets: Sent = 1, Received = 0, Lost = 1 (100% loss),
  23.   10.3.3.254            1c-17-d3-dc-c0-78     dynamic
  24. Pinging 10.3.3.254 with 32 bytes of data:
  25. Control-C
  26. ^C终止批处理操作吗(Y/N)? y
  27. C:\>
复制代码
这个 我拿的另一个ip试的 254  其实 232  还是254 这个也不用考虑在出错可能的范围内  因为都是我管理的设备 确定都是开着的 而且 批处理win7 xp也都改过尝试用过
作者: beck1321    时间: 2013-1-5 17:51

ping 不通  不代表得不到mac


win7明明可以得到mac 却不执行  goto  start
作者: BAT-VBS    时间: 2013-1-5 18:06

试试这样能否正确调整到:start
  1. setlocal enabledelayedexpansion
  2. echo 正在为您设置IP,请稍等......
  3. set /A "a=%RANDOM%%%250+3
  4. set /A "b=%RANDOM%%%250+3
  5. set /A "c=%RANDOM%%%250+3
  6. netsh interface ip set address name="本地连接" source=static addr=10.%a%.%b%.%c% mask=255.0.0.0
  7. :start
  8. set /A "num=%RANDOM%%%190+10"
  9. ping 10.1.1.%num% -n 1
  10. rem arp -a |find "10.1.1.%num%" &&goto start
  11. %systemroot%\system32\arp.exe -a | %systemroot%\system32\find.exe "10.1.1.%num%"
  12. echo !errorlevel!
  13. if !errorlevel! equ 0 (
  14.     goto :start
  15. )
  16. netsh interface ip set address name="本地连接" source=static addr=10.1.1.%num% mask=255.255.255.0 gateway=10.1.1.250 gwmetric=0 | find "IP地址已在网络上使用" &&goto start
  17. netsh interface ip set dns "本地连接" source=static addr=10.1.1.100 register=primary
  18. netsh interface ip add dns "本地连接" addr=8.8.8.8
  19. netsh interface ip set wins name="本地连接" source=static addr=10.1.1.100
  20. if %errorlevel% neq 0 goto start
复制代码

作者: BAT-VBS    时间: 2013-1-5 18:07

你的Win7是32位的还是64位的?
作者: beck1321    时间: 2013-1-5 19:40

按照您的那个 还是不行捏 下面是运行过程
  1. C:\>c
  2. C:\>setlocal enabledelayedexpansion
  3. C:\>echo 正在为您设置IP,请稍等......
  4. 正在为您设置IP,请稍等......
  5. C:\>set /A "a=13621%250+3
  6. C:\>set /A "b=30738%250+3
  7. C:\>set /A "c=23544%250+3
  8. C:\>netsh interface ip set address name="无线网络连接" source=static addr=192.12
  9. 4.241.47 mask=255.0.0.0
  10. C:\>set /A "num=25602%1+1"
  11. C:\>ping 192.168.2.1 -n 2
  12. 正在 Ping 192.168.2.1 具有 32 字节的数据:
  13. PING: 传输失败。General failure.
  14. PING: 传输失败。General failure.
  15. 192.168.2.1 的 Ping 统计信息:
  16.     数据包: 已发送 = 2,已接收 = 0,丢失 = 2 (100% 丢失),
  17. C:\>rem arp -a |find "192.168.2.1" &&goto start
  18. C:\>C:\Windows\system32\arp.exe -a   | C:\Windows\system32\find.exe "192.168.2.1
  19. "
  20. C:\>echo !errorlevel!
  21. 1
  22. C:\>if !errorlevel! EQU 0 (goto :start )
  23. C:\>netsh interface ip set address name="无线网络连接" source=static addr=192.16
  24. 8.2.1 mask=255.255.255.0 gateway=192.168.2.250 gwmetric=0   | find "IP地址已在网
  25. 络上使用"   && goto start
  26. C:\>netsh interface ip set dns "无线网络连接" source=static addr=192.168.2.100 r
  27. egister=primary
  28. C:\>netsh interface ip add dns "无线网络连接" addr=8.8.8.8
  29. 配置的 DNS 服务器不正确或不存在。
  30. 终止批处理操作吗(Y/N)? y
  31. C:\>
复制代码
我的是win7  32位  当然 也希望能应用于64位
作者: beck1321    时间: 2013-1-5 20:11

我想问个问题

&&goto start 是去本批处理中的start

那么 我想让find以后打开 一个程序 如system32里的cmd。exe  是如何做到呢。我想做个测试
作者: BAT-VBS    时间: 2013-1-5 21:28

  1. setlocal enabledelayedexpansion
  2. echo 正在为您设置IP,请稍等......
  3. set /A "a=%RANDOM%%%250+3
  4. set /A "b=%RANDOM%%%250+3
  5. set /A "c=%RANDOM%%%250+3
  6. netsh interface ip set address name="本地连接" source=static addr=10.%a%.%b%.%c% mask=255.0.0.0
  7. :start
  8. set /A "num=%RANDOM%%%190+10"
  9. ping 10.1.1.%num% -n 1
  10. rem arp -a |find "10.1.1.%num%" &&goto start
  11. arp -a >test.log
  12. %systemroot%\system32\arp.exe -a | %systemroot%\system32\find.exe "10.1.1.%num%"
  13. echo !errorlevel!
  14. if !errorlevel! equ 0 (
  15.     goto :start
  16. )
  17. netsh interface ip set address name="本地连接" source=static addr=10.1.1.%num% mask=255.255.255.0 gateway=10.1.1.250 gwmetric=0 | find "IP地址已在网络上使用" &&goto start
  18. netsh interface ip set dns "本地连接" source=static addr=10.1.1.100 register=primary
  19. netsh interface ip add dns "本地连接" addr=8.8.8.8
  20. netsh interface ip set wins name="本地连接" source=static addr=10.1.1.100
  21. if %errorlevel% neq 0 goto start
复制代码
find命令没有找到那个IP
把win7里面test.log压缩一下传上来看看
作者: beck1321    时间: 2013-1-6 09:25

回复 15# BAT-VBS


    log里就几个字 未找到arp项

但我在运行前后都单独输入cmd命令 arp -a 看了下 都是有东东在里面的
作者: BAT-VBS    时间: 2013-1-6 09:49

arp的输出用的2号句柄,这样写入文件试试:
  1. setlocal enabledelayedexpansion
  2. echo 正在为您设置IP,请稍等......
  3. set /A "a=%RANDOM%%%250+3
  4. set /A "b=%RANDOM%%%250+3
  5. set /A "c=%RANDOM%%%250+3
  6. netsh interface ip set address name="本地连接" source=static addr=10.%a%.%b%.%c% mask=255.0.0.0
  7. :start
  8. set /A "num=%RANDOM%%%190+10"
  9. ping 10.1.1.%num% -n 1
  10. rem arp -a |find "10.1.1.%num%" &&goto start
  11. arp -a >test.log 2>&1
  12. %systemroot%\system32\arp.exe -a | %systemroot%\system32\find.exe "10.1.1.%num%"
  13. echo !errorlevel!
  14. if !errorlevel! equ 0 (
  15.     goto :start
  16. )
  17. netsh interface ip set address name="本地连接" source=static addr=10.1.1.%num% mask=255.255.255.0 gateway=10.1.1.250 gwmetric=0 | find "IP地址已在网络上使用" &&goto start
  18. netsh interface ip set dns "本地连接" source=static addr=10.1.1.100 register=primary
  19. netsh interface ip add dns "本地连接" addr=8.8.8.8
  20. netsh interface ip set wins name="本地连接" source=static addr=10.1.1.100
  21. if %errorlevel% neq 0 goto start
复制代码

作者: beck1321    时间: 2013-1-6 10:35

回复 17# BAT-VBS


    我的知识已经跟不上了 但复制这个代码去运行后 即使扩大num 也不停的在 goto start

且log文件 依旧是 未找到arp项
作者: beck1321    时间: 2013-1-6 10:36

netsh interface ip set dns "本地连接" source=static addr=10.1.1.100 register=primary
netsh interface ip add dns "本地连接" addr=8.8.8.8
netsh interface ip set wins name="本地连接" source=static addr=10.1.1.100

这一段也运行了,  
if %errorlevel% neq 0 goto start  是这个生效的 又重复去 goto start了
作者: BAT-VBS    时间: 2013-1-6 10:41

能否把17楼生成的test.log压缩一下传上来看看?
作者: beck1321    时间: 2013-1-6 10:59

回复 20# BAT-VBS


   
我错了。。。之前17楼那个 不该是不停的 goto start的 可能是因为我去掉了一段空白段 导致的 后来我重新拿你的那段代码 只改了ip后 ,不会出现不停的goto start了 但问题依然是  遇到一个已占有ip 却无法跳过

下面是 那个log

其实就那几个字
作者: beck1321    时间: 2013-1-6 11:01

待会儿 我弄个录像
作者: beck1321    时间: 2013-1-6 11:09

操作录像

http://www.0515dafeng.com/test17.rar

144k的附件都传不上来啊 。。。悲剧哦
作者: beck1321    时间: 2013-1-8 11:24

乌啦啦乌啦啦 哇哇哭啦
作者: Batcher    时间: 2013-1-8 11:28

回复 23# beck1321


    论坛空间有限,尽量用外部存储吧。




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2