[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
12
返回列表 发帖
keshun

Rank: 4

帖子
220 
积分
380 
技术
1  
捐助
0  
注册时间
2010-8-26 
16楼 跳转到 »
发表于 2010-10-12 23:11 | 只看该作者

回复 15楼 的帖子

如果不要求数字0－255，只要求是四组数字用“.”分隔的格式就确定为正确，那代码又该怎么编写。

TOP

broly

Rank: 7Rank: 7Rank: 7

帖子
881 
积分
2103 
技术
95  
捐助
55  
注册时间
2010-5-23 
17楼
发表于 2010-10-12 23:42 | 只看该作者

回复 11楼 的帖子

还是超版厉害，一下就写好了
---学无止境---

TOP

keshun

Rank: 4

帖子
220 
积分
380 
技术
1  
捐助
0  
注册时间
2010-8-26 
18楼
发表于 2010-10-12 23:42 | 只看该作者

回复 11楼 的帖子

感谢版主，随风，我测过11楼的代码，可以达到比较好的效果，但还存有一个问题，第四组数字不输入时“*.*.*.”也确定为正常

请输入ip： 12.11.2
输入错误
请输入ip： 12.11.2.
正确ip 12.11.2.
请按任意键继续. . .

[ 本帖最后由 keshun 于 2010-10-12 23:50 编辑 ]

TOP

powerbat

Rank: 7Rank: 7Rank: 7

帖子
752 
积分
4553 
技术
139  
捐助
0  
注册时间
2010-8-24 
19楼
发表于 2010-10-12 23:55 | 只看该作者
将11楼代码中的set "s=[0-9]*\.[0-9]*\.[0-9]*\.[0-9]*" 改为
set "s=[0-9][0-9]*\.[0-9][0-9]*\.[0-9][0-9]*\.[0-9][0-9]*"

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14795 
积分
45971 
技术
847  
捐助
745  
注册时间
2008-6-9 
20楼
发表于 2010-10-13 13:00 | 只看该作者

回复 8楼 的帖子

遗憾的是，你给出的条件不足以判断用户输入的IP是否合法。
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

keshun

Rank: 4

帖子
220 
积分
380 
技术
1  
捐助
0  
注册时间
2010-8-26 
21楼
发表于 2010-10-13 13:36 | 只看该作者

回复 20楼 的帖子

是有点美中不足，但也勉强可以，也想请教高手帮忙优化下代码



  1. :输入

  2. :重设1

  3. set 标号=1

  4. set 格式输入=

  5. set /p 格式输入= 输入IP 地址: 

  6. goto 识别格式

  7. 

  8. :回设1

  9. echo.

  10. :重设2

  11. set 地址=%格式%

  12. set 标号=2

  13. set 格式输入=

  14. set /p 格式输入= 输入子网掩码: 

  15. goto 识别格式

  16. 

  17. :回设2

  18. echo.

  19. :重设3

  20. set 子网=%格式%

  21. set 标号=3

  22. set 格式输入=

  23. set /p 格式输入= 输入默认网关: 

  24. goto 识别格式

  25. 

  26. :回设3

  27. echo.

  28. :重设4

  29. set 网关=%格式%

  30. set 标号=4

  31. set 格式输入=

  32. set /p 格式输入= 输入首选DNS: 

  33. goto 识别格式

  34. 

  35. :回设4

  36. echo.

  37. :重设5

  38. set 首选=%格式%

  39. set 标号=5

  40. set 格式输入=

  41. set /p 格式输入= 输入备用DNS: 

  42. goto 识别格式

  43. 

  44. :回设5

  45. set 备用=%格式%

  46. goto 跳过

  47. 

  48. :识别格式

  49. setlocal enabledelayedexpansion

  50. set 格式=%格式输入%

  51. set "s=[0-9][0-9]*\.[0-9][0-9]*\.[0-9][0-9]*\.[0-9][0-9]*"

  52. echo %格式%|findstr /be "%s%" >nul||set flag=a

  53. set n=%格式:.= %

  54. for %%a in (%n%) do (

  55.    set /a var=1%%a 2>nul

  56.    if !var! gtr 1255 set flag=a

  57. )

  58. if defined flag echo  错误，请重新输入&endlocal&goto 重设%标号%

  59. goto 回设%标号%

  60. 

  61. :跳过

  62. cls

  63. echo                  ╭────────────────────╮

  64. echo                  │                                        │

  65. echo                  │     确  认  信  息  是  否  准  确     │

  66. echo                  │                                        │

  67. echo                  ╰────────────────────╯

  68. echo.

  69. echo.

  70. echo   【1】IP 地址： %地址%

  71. echo.

  72. echo   【2】子网掩码：%子网%

  73. echo.

  74. echo   【3】默认网关：%网关%

  75. echo.

  76. echo   【4】首选 DNS：%首选%

  77. echo.

  78. echo   【5】备用 DNS：%备用%

  79. echo.

  80. :确认

  81. echo.

  82. echo  确认无误:按[ y ]继续，确认有误:按[ n ]重设

  83. echo.

  84. set 确认=

  85. set /p 确认= 请输入确认结果:

  86. if /i "%确认%"=="y" goto 设置

  87. if /i "%确认%"=="n" goto 输入

  88. goto 确认

  89.  
复制代码

[ 本帖最后由 keshun 于 2010-10-13 14:37 编辑 ]

TOP

hfg1977

Rank: 5Rank: 5

帖子
425 
积分
1096 
技术
57  
捐助
0  
注册时间
2009-9-14 
22楼
发表于 2010-10-13 15:08 | 只看该作者 
  1. ::================= 判断IP地址是否正确 ======================== 

  2. :isIP addr

  3. set IP_addr=%~1&set "IP_ture=1"

  4. echo %IP_addr%|findstr "^[0-9]*\.[0-9]*\.[0-9]*\.[0-9]*$">nul 2>nul||(set "IP_ture=0"&goto:eof)

  5. for %%a in (%IP_addr:.=,%) do (if %%a gtr 255 set "IP_ture=0")

  6. goto:eof

  7. ::=========== end = 判断IP地址是否正确 =========================
复制代码

TOP

12
返回列表