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

Rank: 1

帖子
7 
积分
21 
技术
0  
捐助
0  
注册时间
2013-9-2 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2013-9-5 01:03 | 显示全部帖子

[已解决]30元求助一ADSL自动拨号的批处理

具体报酬：30元人民币
支付方式：支付宝
联系方式：QQ25965079
有效期限：2013年09月10日之前。
需求描述：
想要一个ADSL自动拨号的批处理,可以设置多少分钟断线重拨,拨号成功后自动把ppp IP地址导入ip.txt ,(不成功则重拨,间隔5秒,重拨次数5次,还不成功,显示错误提示"拨号出错")每次断线重拨都要对比IP.txt文件里的IP,重复就断线重拨(间隔5秒),直到不重复为止. 批处理的开头先查看创建ip.txt的日期时间跟现在的日期时间对比,超过24小时,删除重建 (适用于xp/2003 系统)
1

评分人数

    • batman: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享

samiking

Rank: 1

帖子
7 
积分
21 
技术
0  
捐助
0  
注册时间
2013-9-2 
2楼
发表于 2013-9-5 15:16 | 显示全部帖子
编译出错,运行不了.显示"变量出错..Dim不是内部命令或外部命令...url不是内部命令或外部命令".而且前提有个功能没有实现,就是可以手动设置多少分钟断开连接.比如输入10,20....60分钟等.由于批处理我是初学,只是个小白,代码只看懂小部分,希望版主能不能编译通过了再发.
变量我只修改了三个部分
AdslName = "xxx" 我改成 宽带连接
AdslUser = "xxxx" 我改成 拨号帐号
AdslPassword = "xxxxxx"  我改成 拨号密码

运行系统 win2003

TOP

samiking

Rank: 1

帖子
7 
积分
21 
技术
0  
捐助
0  
注册时间
2013-9-2 
3楼
发表于 2013-9-5 16:58 | 显示全部帖子
本帖最后由 samiking 于 2013-9-5 17:11 编辑

我确实不知道,对编程也是刚刚接触.不过前提条件我确实说清楚了,只是放在前面,你没注意...
照你所说,保存为text.vbs 编译还是无法通过,无法自动拨号,我已经把ADSL 帐号,密码 加入变量里了,运行好久,弹出对话 拨号错误

TOP

samiking

Rank: 1

帖子
7 
积分
21 
技术
0  
捐助
0  
注册时间
2013-9-2 
4楼
发表于 2013-9-5 21:55 | 显示全部帖子
本帖最后由 samiking 于 2013-9-5 23:40 编辑

好的,我试试先
已测试,自动拨号会上号,有几个问题:
1,设置多少分钟自动断线重连,这个不会循环,如果设置10分钟,那就每10分钟断一次
2,ip.txt只会记录第一次,我想要每次都记,这样对比才有意思,避免拨号重复

TOP

samiking

Rank: 1

帖子
7 
积分
21 
技术
0  
捐助
0  
注册时间
2013-9-2 
5楼
发表于 2013-9-6 08:59 | 显示全部帖子
刚测试,还是不行,版主.这次ip一个也记录不了.
错误提示:
行 82
字符 3
我加入点个人理解
'每Times分钟断网重连循环

Do

  WScript.Sleep Times * 60 * 1000

  Adsl "disconnect"

  WScript.Sleep 1 * 1000

  Adsl "connect"

Loop

这个模块里,是不是应该加入调用 获取IP和读写版块 这样才会做一个循环?
============
'判断ip.txt最后一次访问时间到现在是不是过了24小时

GetText File, "test", Null

这个模块,如果ip.txt超过24小时后续操作是什么???没代码

加个Q可以吗,有利调试和反溃信息更快传达给你

TOP

samiking

Rank: 1

帖子
7 
积分
21 
技术
0  
捐助
0  
注册时间
2013-9-2 
6楼
发表于 2013-9-6 22:35 | 显示全部帖子
谢谢版主,不怨其烦的修改代码.学到好多东西,谢谢

TOP

返回列表