1.易语言将编辑框内容转换成url编码,易语言u源码易语言编怎么写?
易语言将编辑框内容转换成url编码,编码波段画线指标源码怎么写?
收集自网上的解码发泄源码俩子程序命令,复制到易语言代码里,易语言u源码易语言编源码小熊调用 URL编码(编辑框.内容) 这个命令就可以了
.版本 2
.子程序 URL编码,编码源码股价 文本型, ,
.参数 URL, 文本型
.局部变量 Len, 整数型
.局部变量 循环容器, 整数型
.局部变量 Asc, 整数型
.局部变量 目标, 文本型
.局部变量 临时, 文本型
Len = 取文本长度 (URL)
.变量循环首 (1, Len, 1, 循环容器)
Asc = 取代码 (URL, 循环容器)
Asc = 选择 (Asc < 0, + Asc, Asc)
.如果 (Asc < 或 Asc = 或 Asc > 且 Asc < 或 Asc > 且 Asc < 或 Asc = 或 Asc > )
临时 = 取十六进制文本 (Asc)
目标 = 目标 + 选择 (取文本长度 (临时) < 2, “%0” + 临时, “%” + 临时)
.否则
目标 = 目标 + 字符 (Asc)
.如果结束
.变量循环尾 ()
返回 (目标)
.子程序 URL解码, 文本型, ,
.参数 URL, 文本型
.局部变量 循环容器, 整数型
.局部变量 Len, 整数型
.局部变量 HEX, 文本型
.局部变量 目标, 文本型
.局部变量 H, 整数型
.局部变量 L, 整数型
Len = 取文本长度 (URL)
循环容器 = 1
HEX = “ABCDEF”
.判断循环首 (循环容器 ≤ Len)
.判断开始 (取文本中间 (URL, 循环容器, 1) ≠ “%”)
目标 = 目标 + 取文本中间 (URL, 循环容器, 1)
.默认
循环容器 = 循环容器 + 1
H = 寻找文本 (HEX, 到大写 (取文本中间 (URL, 循环容器, 1)), , 假) - 1
循环容器 = 循环容器 + 1
L = 寻找文本 (HEX, 到大写 (取文本中间 (URL, 循环容器, 1)), , 假) - 1
目标 = 目标 + 字符 (H × + L)
.判断结束
循环容器 = 循环容器 + 1
.判断循环尾 ()
返回 (目标)