窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | |
拖放对象1. zc拖放控件 (_启动窗口. 取窗口句柄 ()) 变量名 | 类 型 | 静态 | 数组 | 备 注 | 原版文件 | 字节集 | | | 原版地址 | 文本型 | | | 新地址文件 | 字节集 | | | 新版地址 | 文本型 | | | 旧地址 | 文本型 | | | 新地址 | 文本型 | | | 旧域名 | 文本型 | | | 新域名 | 文本型 | | | 旧端口 | 文本型 | | | 新端口 | 文本型 | | |
旧地址 = “http://www.ezdun.com/ip.txt”新地址 = “http://dun.hitu.vip:8800/ip”旧域名 = “www.ezdun.cn”新域名 = “dun.hitu.vip”旧端口 = “9002”新端口 = “9003”原版地址 = 接收到的文件路径 新版地址 = 取文本左边 (原版地址, 倒找文本 (原版地址, “\”, , 假)) + “服务端-新.exe” 调试输出 (新版地址 )如果真 (取反 (文件是否存在 (原版地址 )) )信息框 (“生成新文件失败,原版文件不存在”, 0, “失败”, )返回 ()原版文件 = 读入文件 (原版地址 )如果真 (取字节集长度 (原版文件 ) < 1024 )信息框 (“生成新文件失败,读入文件失败或不正确”, 0, “失败”, )返回 ()如果真 (寻找字节集 (原版文件, 到字节集 (旧地址 ), ) = -1 或 寻找字节集 (原版文件, 到字节集 (旧域名 ), ) = -1 或 寻找字节集 (原版文件, 到字节集 (旧端口 ), ) = -1 )信息框 (“这个文件不支持”, 0, “失败”, )返回 ()新地址文件 = 子字节集替换 (原版文件, 到字节集 (旧地址 ), 到字节集 (新地址 ), , 1 )新地址文件 = 子字节集替换 (新地址文件, 到字节集 (旧域名 ), 到字节集 (新域名 ), , 1 )新地址文件 = 子字节集替换 (新地址文件, 到字节集 (旧端口 ), 到字节集 (新端口 ), , 1 )如果 (写到文件 (新版地址, 新地址文件 )) 信息框 (“生成新文件成功,保存地址[” + 新版地址 + “]”, 0, “成功”, )结束 ()信息框 (“生成新文件失败”, 0, “失败”, )
|