UTF-8编码速度过慢，建议改进。附上代码

活り

原版代码 编码一张200KB的图片 至少需要几分钟。
改版之后的 几秒就ok。
希望改进。

  

子程序名	返回值类型	公开	备 注
编码_URL编码_改版	文本型
参数名	类 型	参考	可空	数组	备 注
欲编码的文本	文本型
不编码字母数字	逻辑型				不需要编码【字母数字.-】可以把此参数设置为真
是否UTF8	逻辑型				先把文本转换成UTF8编码,再编码成URL

变量名	类 型	静态	数组	备 注
结果文本	文本型
字节集	字节集
计次	整数型
temp	文本型
文件号	整数型

如果真 (欲编码的文本 ＝ “”)
返回 (“”)
判断 (是否UTF8)
字节集 ＝ 到字节集 (编码_gb2312到utf8 (欲编码的文本))
字节集 ＝ 到字节集 (欲编码的文本)
文件号 ＝ 打开内存文件 ()
计次循环首 (取字节集长度 (字节集), 计次)
temp ＝ 取十六进制文本 (字节集 [计次])
如果真 (取文本长度 (temp) ＜ 2)
temp ＝ “0” ＋ temp
如果 (不编码字母数字)
判断 (字节集 [计次] ＞ 44 且 字节集 [计次] ＜ 58 且 字节集 [计次] ≠ 47)
插入文本 (文件号, 字符 (字节集 [计次]))
判断 (字节集 [计次] ＞ 64 且 字节集 [计次] ＜ 91)  ' A-Z
插入文本 (文件号, 字符 (字节集 [计次]))
判断 (字节集 [计次] ＞ 96 且 字节集 [计次] ＜ 123)  ' a-z
插入文本 (文件号, 字符 (字节集 [计次]))
插入文本 (文件号, “%” ＋ temp)

插入文本 (文件号, “%” ＋ temp)

计次循环尾 ()
结果文本 ＝ 读入文本 (文件号, )
关闭文件 (文件号)
返回 (结果文本)

.版本 2<br /> <br /> .子程序 编码_URL编码_改版, 文本型, 公开<br /> .参数 欲编码的文本, 文本型<br /> .参数 不编码字母数字, 逻辑型, 可空, 不需要编码【字母数字.-】可以把此参数设置为真<br /> .参数 是否UTF8, 逻辑型, 可空, 先把文本转换成UTF8编码,再编码成URL<br /> .局部变量 结果文本, 文本型<br /> .局部变量 字节集, 字节集<br /> .局部变量 计次, 整数型<br /> .局部变量 temp, 文本型<br /> .局部变量 文件号, 整数型<br /> <br /> .如果真 (欲编码的文本 ＝ “”)<br />     返回 (“”)<br /> .如果真结束<br /> .判断开始 (是否UTF8)<br />     字节集 ＝ 到字节集 (编码_gb2312到utf8 (欲编码的文本))<br /> .默认<br />     字节集 ＝ 到字节集 (欲编码的文本)<br /> .判断结束<br /> 文件号 ＝ 打开内存文件 ()<br /> .计次循环首 (取字节集长度 (字节集), 计次)<br />     temp ＝ 取十六进制文本 (字节集 [计次])<br />     .如果真 (取文本长度 (temp) ＜ 2)<br />         temp ＝ “0” ＋ temp<br />     .如果真结束<br />     .如果 (不编码字母数字)<br />         .判断开始 (字节集 [计次] ＞ 44 且 字节集 [计次] ＜ 58 且 字节集 [计次] ≠ 47)<br />             插入文本 (文件号, 字符 (字节集 [计次]))<br />         .判断 (字节集 [计次] ＞ 64 且 字节集 [计次] ＜ 91)  ' A-Z<br />             插入文本 (文件号, 字符 (字节集 [计次]))<br />         .判断 (字节集 [计次] ＞ 96 且 字节集 [计次] ＜ 123)  ' a-z<br />             插入文本 (文件号, 字符 (字节集 [计次]))<br />         .默认<br />             插入文本 (文件号, “%” ＋ temp)<br />         .判断结束<br /> <br />     .否则<br />         插入文本 (文件号, “%” ＋ temp)<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> 结果文本 ＝ 读入文本 (文件号, )<br /> 关闭文件 (文件号)<br /> 返回 (结果文本)

Jacky8102

赞一个 学习了 谢谢了

萧阳天

暂不采纳，编码后乱码