|
5精币
拨号.zip
(1.46 KB, 下载次数: 0)
[e]
.版本 2
.支持库 internet
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 拨号连接数, 整数型
.局部变量 记次变量, 整数型
配置组合框.加入项目 (“指定电话号码”, )
拨号连接数 = 取拨号连接数 ()
.计次循环首 (拨号连接数, 记次变量)
配置组合框.加入项目 (取连接名称 (记次变量 - 1), )
.计次循环尾 ()
.子程序 _按钮1拨号_被单击
.局部变量 电话号码, 文本型
电话号码 = “@” + 到文本 (配置组合框.现行选中项 - 1)
.如果 (拨号 (电话号码, 帐号编辑框.内容, 密码编辑框.内容, 假, 状态标签)) ' 拨号
状态标签.标题 = “正在拨号...”
.否则
状态标签.标题 = “拨号失败”
.如果结束
.子程序 _按钮3停止_被单击
.子程序 _按钮2挂断_被单击
挂断 ()
[/e]
状态标签 出现 用户验证失败 重新 点击 _按钮1拨号_被单击
或 重新运行一下 这里的代码
.子程序 _按钮1拨号_被单击
.局部变量 电话号码, 文本型
电话号码 = “@” + 到文本 (配置组合框.现行选中项 - 1)
.如果 (拨号 (电话号码, 帐号编辑框.内容, 密码编辑框.内容, 假, 状态标签)) ' 拨号
状态标签.标题 = “正在拨号...”
.否则
状态标签.标题 = “拨号失败”
.如果结束
求解决 谢谢了
|
|