Question

是能帮我搞一个宽带连接的易语言源码？

就要这样普普通通就行

Answer 1

.下面是宽带连接的代码。如果不清楚，把邮箱写上我发送给你。

版本 2
.支持库 dp1
.支持库 internet
.支持库 eAPI
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕

.判断开始 (文件是否存在 (取运行目录 () ＋ “/帐号.ini”))
编辑框2.内容 ＝ 到文本 (读入文件 (取运行目录 () ＋ “/密码.ini”))
编辑框2.内容 ＝ 到文本 (解密数据 (到字节集 (编辑框2.内容), “52cenziyu”, 2))
编辑框1.内容 ＝ 到文本 (读入文件 (取运行目录 () ＋ “/帐号.ini”))
编辑框1.内容 ＝ 到文本 (解密数据 (到字节集 (编辑框1.内容), “52cenziyu”, 2))
.默认
返回 ()
.判断结束

.子程序 _按钮2_被单击
销毁 ()
.子程序 _按钮1_被单击
拨号 (“@0”, 编辑框1.内容, 编辑框2.内容, , )
标题 ＝ “正在连接中”
延时 (3000)
.判断开始 (是否与互联网连接 ())
' 信息框 (“连接成功”, 0, )
' 信息框 (“您的计算机已经成功连接到了互联网”, 0, )
写到文件 (取运行目录 () ＋ “/帐号.ini”, 到字节集 (加密数据 (到字节集 (编辑框1.内容), “52cenziyu”, 2)))
写到文件 (取运行目录 () ＋ “/密码.ini”, 到字节集 (加密数据 (到字节集 (编辑框2.内容), “52cenziyu”, 2)))
' 信息框 (“您的IP为：” ＋ 取IP地址 (), 0, )
销毁 ()
.默认
信息框 (“连接失败，请检查帐号密码是否正确”, 0, )
返回 ()
.判断结束

.子程序 _按钮3_被单击
挂断 ()

追问

邮箱为：996871639@qq.com

追答

已经发送，注意查收。