查询域名的小工具源码

易语言 2021-07-13 16:39:31

.计次循环首 (取数组成员数 (数组), i)
局部_文件 = 到文本 (文件是否存在 (取运行目录 () + “\” + 现在时间 + “---” + 编辑框_ip.内容 + “--” + 到文本 (d) + “.txt”))
.如果真 (局部_文件 = “假”)
写到文件 (取运行目录 () + “\” + 现在时间 + “---” + 编辑框_ip.内容 + “--” + 到文本 (d) + “.txt”, 到字节集 (“”))
程序_延时 (10, )
.如果真结束
局部_内容 = 到文本 (读入文件 (取运行目录 () + “\” + 现在时间 + “---” + 编辑框_ip.内容 + “--” + 到文本 (d) + “.txt”))
程序_延时 (10, )
写到文件 (取运行目录 () + “\” + 现在时间 + “---” + 编辑框_ip.内容 + “--” + 到文本 (d) + “.txt”, 到字节集 (局部_内容 + 数组 [i] + #换行符))
程序_延时 (10, )
处理事件 ()
.计次循环尾 ()
清除数组 (数组)
信息提示 (“显示文本的数量” + 到文本 (s))