精易论坛

标题: 精易模块的3个函数修改代码 [打印本页]
作者: 无风不起浪    时间: 2016-1-16 23:52
标题: 精易模块的3个函数修改代码
本帖最后由 萧阳天 于 2016-1-18 19:39 编辑

精易模块修改代码.zip (3.19 KB, 下载次数: 12)
函数 编码_BASE64解码_极速  修改自 编码_BASE64解码  原函数用时672秒 极速版用时2秒
函数 去除右边空字节集  这个小小的修改了下 上面这个函数附带的
函数 去文本文件重复行  这个是去除文件重复行的 这个上万行的也快 网上找到的代码改的
作者: 萧阳天    时间: 2016-1-17 00:01
网上找到一段API版源码
  1. .版本 2

  3. .子程序 Base64编码, 字节集, 公开
  4. .参数 待编码数据, 字节集
  5. .局部变量 整数_数据长度, 整数型
  6. .局部变量 整数_编码长度, 整数型
  7. .局部变量 字节_数据缓存, 字节集

  9. 整数_数据长度 ＝ 取字节集长度 (待编码数据)
  10. .如果真 (CryptBinaryToStringA (待编码数据, 整数_数据长度, 1, 字节_数据缓存, 整数_编码长度) ＝ 假)
  11.     返回 ({  })
  12. .如果真结束
  13. 字节_数据缓存 ＝ 取空白字节集 (整数_编码长度)
  14. CryptBinaryToStringA (待编码数据, 整数_数据长度, 1, 字节_数据缓存, 整数_编码长度)
  15. 返回 (字节_数据缓存)

  17. .子程序 Base64解码, 字节集, 公开
  18. .参数 待解码数据, 字节集
  19. .局部变量 整数_数据长度, 整数型
  20. .局部变量 整数_解码长度, 整数型
  21. .局部变量 字节_数据缓存, 字节集

  23. 整数_数据长度 ＝ 取字节集长度 (待解码数据)
  24. .如果真 (CryptStringToBinaryA (待解码数据, 整数_数据长度, 1, 字节_数据缓存, 整数_解码长度, 0, 0) ＝ 假)
  25.     返回 ({  })
  26. .如果真结束
  27. 字节_数据缓存 ＝ 取空白字节集 (整数_解码长度)
  28. CryptStringToBinaryA (待解码数据, 整数_数据长度, 1, 字节_数据缓存, 整数_解码长度, 0, 0)
  29. 返回 (字节_数据缓存)
复制代码
作者: 萧阳天    时间: 2016-1-17 00:02
去文本文件重复行 引用 快速字节集对象  库，不利于封闭进模块
作者: oldlee    时间: 2016-1-17 00:02
谢谢~
作者: oldlee    时间: 2016-1-17 00:09
萧阳天 发表于 2016-1-17 00:01
网上找到一段API版源码

其实都好，API高效，源码里的有助于理解base64编码过程。
作者: 无风不起浪    时间: 2016-1-17 17:22
萧阳天 发表于 2016-1-17 00:02
去文本文件重复行 引用 快速字节集对象  库，不利于封闭进模块

这个倒是 不过看在速度快 精易模块目前的那个有问题 我还有一个 不过速度不是很快 所以没发
作者: fire228    时间: 2016-1-30 15:40




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4