因平时工作的时候.非常经常的创建调制解调器的拨号连接

请教大家,批处理有没有办法实现这个要求?要怎么写??


假设:
用批处理建立一个电话拨号连接，并在桌面上创建快捷方式，使用时，点击就可以了，不需要输入电话号码和密码。
电话号码：12345678，用户名：abcd，密码：abcd


一般情况下.是在XP平台下..如果有知道的,能不能帮帮我?谢谢.

本版搜索"ADSL"
本版搜索“拨号”

Q: 如何使用论坛的搜索功能来解决自己的问题？
A: 参考：http://www.cn-dos.net/forum/viewthread.php?tid=44122#pid308085

谢谢版主
不过我问的不是建ADSL的拨号连接.
而是调制解调器MODEM的拨号连接啊.就是类似于16300电话拨号的那个连接,

都没有人帮忙下吗>?,,郁闷..

没用过.

Originally posted by avtion at 2008-11-22 07:32 PM:
因平时工作的时候.非常经常的创建调制解调器的拨号连接

请教大家,批处理有没有办法实现这个要求?要怎么写??


假设:
用批处理建立一个电话拨 ...

以下是VBS的，保存为modem.vbs运行吧

set WshShell = CreateObject("WScript.Shell")
WshShell.Run "Rasphone -a"
WScript.Sleep 500
WshShell.SendKeys "+N"
WScript.Sleep 100
WshShell.SendKeys "{BACKSPACE 10}"
WshShell.SendKeys "12345678"
WshShell.SendKeys "{TAB}"
WScript.Sleep 200
WshShell.SendKeys "+N"
WScript.Sleep 200
WshShell.SendKeys "{BACKSPACE 10}"
WshShell.SendKeys "MODEM"
WScript.Sleep 500
WshShell.SendKeys "{ENTER}"
WScript.Sleep 500
WshShell.Run "Rasphone -d modem"
WScript.Sleep 500
WshShell.AppActivate "连接 modem"
WScript.Sleep 500
WshShell.SendKeys "{BACKSPACE 10}"
WScript.Sleep 500
WshShell.SendKeys "abcd"
WScript.Sleep 500
WshShell.SendKeys "{TAB}"
WScript.Sleep 500
WshShell.SendKeys "{BACKSPACE 10}"
WScript.Sleep 500
WshShell.SendKeys "abcd"
WshShell.SendKeys "{TAB}"
WScript.Sleep 1000
WshShell.SendKeys "+s"
WScript.Sleep 1000
WshShell.SendKeys "+d"

Last edited by sea1112 on 2008-11-28 at 15:43 ]

补一下。没装硬件是会出错的。