文章目录:
易语言锁键盘源码
.版本 2
.支持库 EdirectX
.子程序 _窗口1_创建完毕
输入设备1.初始化 (取窗口句柄 ())
.子程序 _按钮1_被单击
输入设备1.置键盘独占 (真)
.子程序 _按钮2_被单击
输入设备1.置键盘独占 (假)
自己创个输入设备 望采纳!!!!!
易语言 下载文件
你这个读文件会不会读出来的是网页源码啊,你用编码转换试试看转出来的应该就是你原来的文字了。
而且你这个文件应该不大,可以发成网页文本,然后用下面的源码试试
.版本 2
.支持库 internet
.支持库 iconv
.子程序 网页编码转换, 文本型, , 转换网页源文件编码
.参数 地址, 文本型
.局部变量 字节集, 字节集
.局部变量 b, 整数型
.局部变量 d, 文本型
字节集 = HTTP读文件 (地址)‘这里就是你网页的绝对路径
b = 编码转换_打开 (#编码_UTF_8, #编码_GBK)
字节集 = 编码转换_转换 (b, 字节集, )
编码转换_关闭 (b)
d = 到文本 (字节集)
返回 (d)
.子程序 取指定内容, 文本型
.参数 完整内容, 文本型
.参数 左边文本, 文本型
.参数 右边文本, 文本型
.局部变量 临时位置, 整数型
.局部变量 总长度, 整数型
.局部变量 临时内容, 文本型
总长度 = 取文本长度 (完整内容)
临时位置 = 寻找文本 (完整内容, 左边文本, , 假) + 取文本长度 (左边文本)
临时内容 = 取文本中间 (完整内容, 临时位置, 总长度)
总长度 = 取文本长度 (临时内容)
临时位置 = 寻找文本 (临时内容, 右边文本, , 假) - 1
临时内容 = 取文本中间 (临时内容, 1, 临时位置)
返回 (临时内容)
易语言 精易模块
精易模块2.57版本可以直接调用FTP命令,很方便的,如FTP_目录创建("123")
易语言精易模块的网页访问,取的源码和IE取的源码不一样!求解!!!!!
问题出在以下:
IE的哪里访问的时候提交了cookies,而精易的哪里木有
IE的哪里载入了网页框架,而精易的哪里木有
易语言怎样下载文件?
易语言只自带一个bt下载支持库,直接下载没有命令,需要几个参数.图片代码在下面
组件:编辑框2个,超级按钮3个,标签3个,进度条1个,时钟1个.
代码:
.版本 2
.支持库 downlib
.支持库 iext2
.支持库 shell
.程序集 窗口程序集1
.程序集变量 下载参数, 任务参数
.程序集变量 下载任务, 下载对象
.程序集变量 下载状态, 整数型
.程序集变量 下载信息, 字节集
.程序集变量 文件大小, 双精度小数型
.子程序 __启动窗口_创建完毕
.子程序 _超级按钮_接收_被单击
.局部变量 下载地址, 文本型
.如果真 (编辑框1.内容 = “”)
信息框 (“没有输入下载地址”, 0, , )
返回 ()
.如果真结束
.如果真 (编辑框2.内容 = “”)
信息框 (“没有选择保存途径”, 0, , )
返回 ()
.如果真结束
下载地址 = 删首尾空 (编辑框1.内容)
下载参数.类型 = #传送常量.下载
下载参数.文件地址 = 下载地址
下载参数.线程等待超时 = 1000
下载参数.默认线程数 = 3
下载参数.本地文件路径 = 编辑框2.内容
下载参数.连接超时 = 5000
下载参数.发送超时 = 5001
下载参数.接收超时 = 10000
下载参数.接收大小 = 10240
下载参数.交互回调函数 = 交互回调函数
超级按钮_接收.禁止 = 真
下载任务.增加新任务 (下载参数)
.子程序 _超级按钮_浏览_被单击
编辑框2.内容 = 浏览文件夹 (“选择本地保存途径”, )
.子程序 交互回调函数, 整数型
.参数 消息类型, 整数型
.参数 线程信息, 整数型
.参数 参数3, 整数型
.参数 参数4, 整数型
.参数 对象信息, 整数型
.判断开始 (消息类型 = #传送常量.下载上传开始)
文件大小 = 参数3
.判断 (消息类型 = #传送常量.下载上传结束)
信息框 (“下载完成”, 0, )
结束 ()
.判断 (消息类型 = #传送常量.新下载线程启动)
.判断 (消息类型 = #传送常量.下载线程继续下载)
.判断 (消息类型 = #传送常量.线程正常结束)
.判断 (消息类型 = #传送常量.线程异常结束)
.判断 (消息类型 = #传送常量.存在同名文件)
.判断 (消息类型 = #传送常量.收到数据)
.判断 (消息类型 = #传送常量.下载数据范围)
.默认
.判断结束
返回 (0)
.子程序 _时钟_周期事件
.如果真 (超级按钮_接收.禁止 = 真)
.如果 (文件大小 = 0)
标签.标题 = “已完成:0%”
.否则
标签.标题 = “已完成:” + 数值到格式文本 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0, 假) + “%”
.如果结束
进度条.位置 = 四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)
.如果真结束
.子程序 _超级按钮_取消_被单击
下载参数.类型 = #传送常量.下载上传结束
超级按钮_接收.禁止 = 假
进度条.位置 = 0
标签.标题 = “用户取消”
(d).子程序 取指定内容, 文本型.参数 完整内容, 文本型.参数 左边文本, 文本型.参数 右边文本, 文本型.局部变量 临时位置, 整数型.局部变量 总长度, 整数型.局部变量 临时内容, 文本型总长度 = 取文本长度 (完整内容)临时位置 = 寻找文本 (完整内
辑框2.内容 = “”) 信息框 (“没有选择保存途径”, 0, , ) 返回 ().如果真结束下载地址 = 删首尾空 (编辑框1.内容)下载参数.类型 = #传送常量.下载
语言只自带一个bt下载支持库,直接下载没有命令,需要几个参数.图片代码在下面组件:编辑框2个,超级按钮3个,标签3个,进度条1个,时钟1个.代码:.版本 2.支持库 downlib.支持库 iext2.支持库 shell.程序集 窗口程序集1.程序集变量 下载参数, 任务参数.程
_创建完毕输入设备1.初始化 (取窗口句柄 ()).子程序 _按钮1_被单击输入设备1.置键盘独占 (真).子程序 _按钮2_被单击输入设备1.置键盘独占 (假)自己创个输入设备 望采纳!!