Board logo

标题: [网络连接] [已解决]批处理获取ip地址并判断的代码，能否进一步简化？ [打印本页]
作者: ygqiang    时间: 2011-12-28 10:44     标题: [已解决]批处理获取ip地址并判断的代码，能否进一步简化？

本帖最后由 ygqiang 于 2011-12-30 07:04 编辑 
  1. for /f "tokens=2 delims=:" %%b in ('ipconfig^|find /i "ip"') do set fsip=%%b

  2. echo %fsip%

  3. Set fsip=%fsip: =%

  4. echo 去掉ip前面的空格

  5. echo %fsip%

  6. 

  7. if "%fsip%" == "10.10.9.200"   exit

  8. if "%fsip%" == "10.10.93.100"  exit

  9. if "%fsip%" == "10.10.94.200"  exit

  10. if "%fsip%" == "10.10.127.200" exit

  11. 

  12. ;--------------------------------------------------------------------------------------------------

  13. 

  14. for /f "tokens=15 delims= " %%i in ('ipconfig ^| find /i "IP Address"') do set i=%%i

  15. for /f "tokens=1,2,3 delims=." %%i in ("%i%") do (set a=%%i.%%j.%%k)

  16. set Gateway=%a%.1

  17. 

  18. echo %a%.1

  19. 

  20. if "%a%" == "10.10.9"   set a=%a%.200 & goto :next

  21. if "%a%" == "10.10.93"  set a=%a%.100 & goto :next

  22. if "%a%" == "10.10.94"  set a=%a%.200 & goto :next

  23. if "%a%" == "10.10.127" set a=%a%.200 & goto :next

  24. exit

  25. 

  26. :next
复制代码
我要实现的目的是：

先判断ip地址是否是（10.10.9.200 10.10.93.100 10.10.94.200 10.10.127.200）其中的一个，如果是，就直接退出；如果不是，就继续下面的判断

判断ip地址前面三位是否是（10.10.9 10.10.93 10.10.94 10.10.127）其中的一个，如果是，就跳转到:next，否则就退出

上面的批处理，是否有简化的可能？谢谢
作者: awk    时间: 2011-12-28 15:41

你既然知道怎样用空格做为列分隔符获取IP地址，为何开头还要使用那么蛋疼的方法去替换空格呢？
作者: awk    时间: 2011-12-28 15:44

连续的4行if改成if...else...的结构，减少执行代码时浪费在毫无意义的重复判断上面的时间。
作者: ygqiang    时间: 2011-12-28 18:29

不好意思。

上面的代码，都是从论坛或者qq好友 获得的。

能否帮忙整体修改下？谢谢。
作者: ygqiang    时间: 2011-12-28 23:32

  1. for /f "tokens=2 delims=:" %%b in ('ipconfig^|find /i "ip"') do set fsip=%%b

  2. 

  3. echo %fsip%

  4. 

  5. Set fsip=%fsip: =%

  6. 

  7. echo 去掉ip前面的空格

  8. 

  9. echo %fsip%

  10. echo "%fsip%"|findstr "10.10.9.200 10.10.93.100 10.10.94.200 10.10.127.200">nul&&exit

  11. 

  12. 后面是别的代码
复制代码
这是有人给出的代码。
作者: awk    时间: 2011-12-29 09:30

  1. @echo off

  2. for /f "tokens=15 delims= " %%i in ('ipconfig ^| find /i "IP Address"') do (

  3.     set fsip=%%i

  4. )

  5. echo %fsip%

  6. if "%fsip%" equ "10.10.9.200" (

  7.     goto :end

  8. ) else if "%fsip%" equ "10.10.93.100" (

  9.     goto :end

  10. ) else if "%fsip%" equ "10.10.94.200" (

  11.     goto :end

  12. ) else if "%fsip%" equ "10.10.127.200" (

  13.     goto :end

  14. )

  15. 

  16. for /f "tokens=1,2,3 delims=." %%i in ("%fsip%") do (

  17.     set a=%%i.%%j.%%k

  18. )

  19. set Gateway=%a%.1

  20. echo %a%.1

  21. if "%a%" equ "10.10.9" (

  22.     set a=%a%.200

  23. ) else if "%a%" equ "10.10.93" (

  24.     set a=%a%.100

  25. ) else if "%a%" equ "10.10.94" (

  26.     set a=%a%.200

  27. ) else if "%a%" equ "10.10.127" (

  28.     set a=%a%.200

  29. )

  30. 

  31. :end
复制代码
作者: ygqiang    时间: 2011-12-29 23:36

本帖最后由 ygqiang 于 2011-12-30 10:09 编辑

多谢楼上。

初步测试，代码可以正常运行。
  1. @echo off

  2. 

  3. :stat

  4. 

  5. md d:\0beifen >nul 2>nul

  6. md d:\0beifen\soft >nul 2>nul

  7. 

  8. copy /y 00-00robocopy.exe "c:\windows\system32\" >nul 2>nul

  9. copy /y 开通局域网共享(访问本机无需验证即可进入).reg "c:\WINDOWS\system32\" >nul 2>nul

  10. 

  11. rem 获取本机ip

  12. for /f "tokens=14 delims=: " %%b in ('ipconfig^|find /i "ip"') do set fsip=%%b

  13. echo %fsip%

  14. pause

  15. 

  16. rem 获取本机ip前3段

  17. for /f "tokens=1,2,3 delims=." %%i in ("%fsip%") do (

  18.     set a=%%i.%%j.%%k

  19. )

  20. echo %a%

  21. pause

  22. 

  23. 

  24. if "%fsip%" equ "10.10.9.200" (

  25.     goto :set0

  26. ) else if "%fsip%" equ "10.10.93.100" (

  27.     goto :set0

  28. ) else if "%fsip%" equ "10.10.94.200" (

  29.     goto :set0

  30. ) else if "%fsip%" equ "10.10.127.200" (

  31.     goto :set0

  32. )

  33. goto :set1

  34. 

  35. 

  36. cls

  37. ;--------------------------------------------------------------------------------------------------

  38. :set0

  39. ;--------------------------------------------------------------------------------------------------

  40. cls

  41. 

  42. echo 设定文件服务器为：%fsip%

  43. pause

  44. 

  45. regedit /s 开通局域网共享(访问本机无需验证即可进入).reg

  46. net user Guest /active:yes

  47. 

  48. reg add "HKLM\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t reg_dword /d 0  /f

  49. rem 取消“使用简单文件共享”方式

  50. 

  51. net share soft=d:\0beifen\soft

  52. 

  53. exit

  54. 

  55. 

  56. cls

  57. ;--------------------------------------------------------------------------------------------------

  58. :set1

  59. ;--------------------------------------------------------------------------------------------------

  60. cls

  61. 

  62. if "%a%" equ "10.10.9" (

  63.     set a=%a%.200

  64. ) else if "%a%" equ "10.10.93" (

  65.     set a=%a%.100

  66. ) else if "%a%" equ "10.10.94" (

  67.     set a=%a%.200

  68. ) else if "%a%" equ "10.10.127" (

  69.     set a=%a%.200

  70. ) else (

  71.     echo 本机ip非设定范围！

  72.     exit

  73. )

  74. echo %a%

  75. pause

  76. 

  77. :ptaget

  78. ping.exe %a% -n 1 -w 300 >nul&&goto :lineon||goto :lineoff

  79. 

  80. :lineoff

  81. echo 文件服务器：%a%----离线

  82. pause

  83. ping 127.0.0.1 -n 60

  84. goto :ptaget

  85. 

  86. 

  87. 

  88. cls

  89. ;--------------------------------------------------------------------------------------------------

  90. :lineon

  91. ;--------------------------------------------------------------------------------------------------

  92. cls

  93. 

  94. echo 文件服务器：%a%----在线

  95. pause

  96. 

  97. rem 创建文件夹的快捷方式

  98. cls

  99. SET link=%UserProfile%\桌面\常用软件.url  

  100. ECHO [InternetShortcut]>"%link%" 

  101. ECHO URL=d:\0beifen\soft>>"%link%" 

  102. ECHO WorkingDirectory=%SystemRoot%>>"%link%" 

  103. ECHO ShowCommand=7>>"%link%" 

  104. ECHO IconFile=C:\WINDOWS\system32\url.dll>>"%link%" 

  105. ECHO IconIndex=^0>>"%link%" 

  106. ECHO HotKey=>>"%link%" 

  107. cls

  108. 

  109. echo 文件服务器为：%a%，下载数据到本地

  110. pause

  111. 

  112. :nextaaa

  113. 

  114. ping.exe %a% -n 1 -w 300 >nul&&goto :lineon1||goto :lineoff1

  115. 

  116. :lineoff1

  117. echo 文件服务器：%a%----离线

  118. ping 127.0.0.1 -n 120

  119. goto :nextaaa

  120. 

  121. :lineon1

  122. 00-00robocopy "\\%a%\soft" "d:\0beifen\soft" /mir

  123. ping 127.0.0.1 -n 120

  124. 

  125. goto :nextaaa

  126. 

  127. ;--------------------------------------------------------------------------------------------------

  128. cls
复制代码
作者: awk    时间: 2011-12-30 09:16

回复 7# ygqiang


47行、82行可以删掉
作者: ygqiang    时间: 2011-12-30 10:10

多谢楼上。7楼已经重新更新了代码。



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