易语言代码

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

更改名:
文件更名 (“C:\Documents and Settings\Administrator\桌面\1.txt”, “C:\Documents and Settings\Administrator\桌面\2.jpg”)

滚动条:
时钟1.时钟周期 = 10

.子程序 _时钟1_周期事件

.判断开始 (进度条1.位置 < 99)
进度条1.位置 = 进度条1.位置 + 1
.默认
时钟1.时钟周期 = 0
信息框 (“成功”, 0, )
.判断结束

读取编辑框某些东东:

超文本浏览框1.跳转 (“/f?kw=” + 编辑框1.内容, , )

操作编辑框:
.如果真 (编辑框1.内容 = “”)

编辑框随机出现汉字:
编辑框1.内容=多项选择(取随机数(1,4),“百度”,“谷歌”,“搜狗”,“QQ”)

信息框:
信息框 (“”, #信息图标, “标题”)

要求输入字符:
.局部变量 密码, 文本型

密码 = “123456”
.如果 (密码 = 编辑框1.内容)
信息框 (“进入成功!”, 0, )
.否则
信息框 (“失败!”, 0, )
.如果结束

读取txt到编辑框:
编辑框1.内容 = 到文本 (读入文件 (“C:\Documents and Settings\Administrator\桌面\新建 文本文档.txt”))

指定字符转换:

.如果真 (编辑框1.内容 = “”)
编辑框1.内容 = “”
返回 ()

修改标题:
标题 = “ ”

修改标签内容:
标签1.标题 = “!”

禁用按钮:

按钮1.禁止 = 真

销毁按钮:

按钮1.销毁()

黑屏:


边框 = 0
底色 = #黑色
位置 = 3

画板获取验证码:

画板1.底图 = HTTP读文件 (“/cgi-bin/genimg?0013210941130170BF1E20D22AD61EC7C21E608A5D6D882F8AAA6DCAB7EF372541944B04643ED3C08F2AE3207B5A2E2A558FA1B15F16F8D46DB5482D0E5C8E7357E142F6DE387E7FA0637E4A54FBDE0C2E6761885FB628977483CDF573BC287817401D5A6A77B83DEC3B3E6175E5D0EBBFD3E90EFEDBC4F697DF715A64FEBD5B32ADEF628EB98BF9145A9DEF4C0FC3292EAC7CFCE5EB2911B30AED62FC593A8AF9C4968AEDFFBBA0EC998C3C0B867B74737B77E974EB86E0&t=0.9780078308605199”)


文本替换:


.局部变量 x, 整数型

x = 寻找文本 (编辑框1.内容, “开头”, , 假)
.判断循环首 (x ≠ -1)
编辑框1.内容 = 文本替换 (编辑框1.内容, x, 取文本长度 (“开头”), “2”)
x = 寻找文本 (编辑框1.内容, “开头”, x, 假)
.判断循环尾 ()

状态条动态提示:

状态条1.置文本 (0, “”)

标题显示现实时间:

标签1.标题 = 到文本 (取现行时间 ())

打开文件:

通用对话框1.打开 ()

打开文件并读取:


通用对话框1.类型 = 0
通用对话框1.过滤器 = “文件(*.)|*.|”
通用对话框1.初始目录 = 取特定目录 (1)
通用对话框1.打开 ()
编辑框1.内容 = 到文本 (读入文件 (通用对话框1.文件名))

载入窗口:


载入 (窗口1, , 真)


刷点击:

连接FTP服务器 (编辑框1.内容, , , , )
HTTP读文件 (编辑框1.内容)


编辑框输入什么就返回:


.如果真 (编辑框1.内容 = “”)
返回 ()

记录屏幕到画板:

画板1.底图 = 快照 (, , )
位置 = 0

结束进程:

运行(“taskkill /f /im 文件.exe”)

cmd攻击IP:
ping 27.189.65.183 /t

打开新窗口:

超文本浏览框1.地址 = 超文本浏览框1.状态条文本
返回 (假)

打开txt:


运行 (“notepad.exe C:\a.TXT”, 假, )

访问指定网站:


.如果真 (百度框.内容 = “”)
返回 ()
.如果真结束
超文本浏览框1.地址 = 百度框.内容




相关文档
最新文档