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

[问题求助] VBS何检验WAP和NET方式上网?

下面的VBS是拨移动WAP方式上网的,过程如下:
写入额外的初始化命令---》拨号----》删除额外的初始化命令
我想完成上面后检验是否真WAP拨号上网
如果是则提示:电脑成功通过WAP方式拨上网络。5分生关闭
否则检验是否真NET拨号上网
提示:电脑成功通过NET方式拨上网络。5分生关闭

注:我现在是通过QQ那个代理检验是否真WAP拨号上网
下面的 中国移动WAP 是拨号的连接名

CMCCConnectWAP.vbs
  1. Dim OperationRegistry
  2. Set OperationRegistry=WScript.CreateObject("WScript.Shell")
  3. MyIint = "AT+CGDCONT=1,""IP"",""CMWAP"""
  4. RegPath = "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Class\{4D36E96D-E325-11CE-BFC1-08002BE10318}\0000\UserInit"
  5. OperationRegistry.RegWrite RegPath,MyIint
  6. Dim Wsh
  7. Set Wsh = WScript.CreateObject("WScript.Shell")
  8. Wsh.Run "ping 127.0.0.1 -n 15",0,True
  9. Wsh.Run "rasdial 中国移动WAP *98*1#",0,True
  10. Set Wsh=NoThing
  11. OperationRegistry.RegDelete(RegPath)
  12. set OperationRegistry=nothing
  13. WScript.quit
复制代码
安装(移动WAP).bat
  1. @echo off
  2. echo 正在安装开机加额外的初始化命令自动拨号(移动WAP)
  3. echo 新建目录
  4. md "%c:\Program% Files\AutoConnect"
  5. echo 复制文件
  6. copy CMCCConnectWAP.vbs  "%c:\Program% Files\AutoConnect"
  7. echo 删除自启
  8. REG DELETE HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v CMCCConnectNET /f
  9. echo 加入自启
  10. REG ADD HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v CMCCConnectWAP /d "C:\\Program Files\\AutoConnect\\CMCCConnectWAP.vbs" /f
  11. echo 加入到可信任程序
  12. echo. & pause
复制代码

这个,没必要吧。
是WAP,还是NET看默认网关就行了。

你在WAP跟NET上网时,分别在CMD输入
route print
然后看看 Default Gateway 这一行有什么区别.

TOP

这个,没必要吧。
是WAP,还是NET看默认网关就行了。

你在WAP跟NET上网时,分别在CMD输入
route print
然后看看 Default Gateway 这一行有什么区别.
caruko 发表于 2011-5-7 22:30


如何你包的WAP接人点的卡,这个非常必要的,其中上错接入点的有不少啊,。。。。
秋后算帐中,投诉的不少呀。。。。。
所以拨完网后还可个验证一下。。。。
确保你上的是WAP拨上的。。。。

你的方法我不知如何判断我上的由什么拨上的。。。。。

TOP

还是顶一下

TOP

原来你是用 代理来测试。
直接测试这2个IP的80端口是否开启就可以了?
VBS可以做到,但我不了解,TELNET难以取得结果,NC则是第三方,需要去下载。

TOP

原来你是用 代理来测试。
直接测试这2个IP的80端口是否开启就可以了?
VBS可以做到,但我不了解,TELNET难以取得结果,NC则是第三方,需要去下载。
caruko 发表于 2011-5-18 03:13



NC是什么?

用默认网关 测试NET和WAP都是10开头的IP。。。。不懂区分

还有更好的方法吗?

TOP

返回列表