征服登录器易语言源码,不依赖模块,可以编译运行,也可以改成魔域的,看自己技术!
.版本 2
.支持库 internet
.支持库 iext
处理事件 ()
.如果 (HTTP读文件 (“http://www.hao6f.com/server.htm”) ≠ 到字节集 (“”)) ' 此处的网址为你所要远程读取的文件
写到文件 (目录 + “\server.dat”, HTTP读文件 (“http://www.hao6f.com/server.htm”))
透明标签12.标题 = “更新服务器列表完毕”
复制文件 (目录 + “\server.htm”, 目录 + “server.dat”)
复制文件 (目录 + “\server.htm”, 目录 + “server.dat”)
运行 (目录 + “\Conquer.exe blacknull”, 假, )
销毁 ()
.否则
.如果 (HTTP读文件 (“http://www.hao6f.com/server.htm”) ≠ 到字节集 (“”))
写到文件 (目录 + “\server.dat”, HTTP读文件 (“http://www.hao6f.com/server.htm”))
透明标签12.标题 = “更新服务器列表完毕”
复制文件 (目录 + “\server.htm”, 目录 + “server.dat”)
复制文件 (目录 + “\server.htm”, 目录 + “server.dat”)
运行 (目录 + “\Conquer.exe blacknull”, 假, )
销毁 ()
.否则
.如果真 (信息框 (“更新服务器列表失败,你是否用原来的列表登陆?”, #是否钮 + #信息图标, “更新失败”) = #是钮)
运行 (目录 + “\Conquer.exe blacknull”, 假, )
.如果真结束
透明标签12.标题 = “更新服务器列表失败,请重试”



