|
.版本 2
.支持库 internet
.支持库 sock
.支持库 EDataStructure
.子程序 去重拨号
.局部变量 状态, 文本型
.局部变量 ip, 文本型, , "0"
.如果真 (编辑框宽带账号.内容 ≠ “” 且 编辑框宽带密码.内容 ≠ “”)
挂断 ()
程序_延时 (500)
编辑框3.加入文本 (“正在拨号...” + #换行符)
拨号 (“@”, 编辑框宽带账号.内容, 编辑框宽带密码.内容, 真, )
.如果 (是否已在线 ())
ip = 取本机IP ()
.如果 (节点.加入属性 (ip [2], 真))
编辑框3.加入文本 (ip [2] + #换行符)
验证码 ()
.否则
编辑框3.加入文本 (“重拨中(ip重复)...” + #换行符)
去重拨号 ()
.如果结束
.否则
程序_延时 (500)
编辑框3.加入文本 (“重拨中(拨号失败)...” + #换行符)
去重拨号 ()
.如果结束
.如果真结束
为什么这样能防止重复ip拨号, 主要是 节点加入属性哪一个步骤
|
求助知识:请将问题描述清楚,最好把你有问题的源码打包上传上来,这样更方便大家帮助你。 友情提醒:本版被采纳的主题可在 申请荣誉值 帖子申请荣誉值,获得 3点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
|