PB实现编码解码算法（DLL方式）

BASE64编码解码

编码

待编码文本：
1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法

代码及执行效果如下：

n_code_util code_util
n_func_charset ln_charset
string ls_text, ls_text_base64
blob lblb_text

ls_text = '1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法'
ln_charset.to_utf8(ls_text, lblb_text)

ls_text_base64 = code_util.base64_encode(lblb_text)

return 0

获得BASE64编码：

MTk3N+W5tO+8jOS4ieS9jeaVsOWtpuWutlJpdmVzdOOAgVNoYW1pciDlkowgQWRsZW1hbiDorr7orqHkuobkuIDnp43nrpfms5U=

解码

待解码文本：
MTk3N+W5tO+8jOS4ieS9jeaVsOWtpuWutlJpdmVzdOOAgVNoYW1pciDlkowgQWRsZW1hbiDorr7orqHkuobkuIDnp43nrpfms5U=

代码及执行效果如下：

n_code_util code_util
n_func_charset ln_charset
string ls_text, ls_text_base64
blob lblb_text

ls_text_base64 = 'MTk3N+W5tO+8jOS4ieS9jeaVsOWtpuWutlJpdmVzdOOAgVNoYW1pciDlkowgQWRsZW1hbiDorr7orqHkuobkuIDnp43nrpfms5U='

lblb_text = code_util.base64_decode(ls_text_base64)
ln_charset.from_utf8(lblb_text, ls_text)

return 0

获得解码文本：

1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法

URL编码解码

编码

待编码文本：
1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法

代码及执行效果如下：

n_code_util code_util
n_func_charset ln_charset
string ls_text, ls_text_url
blob lblb_text

ls_text = '1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法'
ln_charset.to_utf8(ls_text, lblb_text)

ls_text_url = code_util.url_encode(lblb_text)

return 0

获得URL编码：

1977%e5%b9%b4%ef%bc%8c%e4%b8%89%e4%bd%8d%e6%95%b0%e5%ad%a6%e5%ae%b6Rivest%e3%80%81Shamir%20%e5%92%8c%20Adleman%20%e8%ae%be%e8%ae%a1%e4%ba%86%e4%b8%80%e7%a7%8d%e7%ae%97%e6%b3%95

解码

待解码文本：
1977%e5%b9%b4%ef%bc%8c%e4%b8%89%e4%bd%8d%e6%95%b0%e5%ad%a6%e5%ae%b6Rivest%e3%80%81Shamir%20%e5%92%8c%20Adleman%20%e8%ae%be%e8%ae%a1%e4%ba%86%e4%b8%80%e7%a7%8d%e7%ae%97%e6%b3%95

代码及执行效果如下：

n_code_util code_util
n_func_charset ln_charset
string ls_text, ls_text_url
blob lblb_text

ls_text_url = '1977%e5%b9%b4%ef%bc%8c%e4%b8%89%e4%bd%8d%e6%95%b0%e5%ad%a6%e5%ae%b6Rivest%e3%80%81Shamir%20%e5%92%8c%20Adleman%20%e8%ae%be%e8%ae%a1%e4%ba%86%e4%b8%80%e7%a7%8d%e7%ae%97%e6%b3%95'

lblb_text = code_util.url_decode(ls_text_url)
ln_charset.from_utf8(lblb_text, ls_text)

return 0

获得解码文本：

1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法

HEX编码解码

编码

待编码文本：
1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法

代码及执行效果如下：

n_code_util code_util
n_func_charset ln_charset
string ls_text, ls_text_hex
blob lblb_text

ls_text = '1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法'
ln_charset.to_utf8(ls_text, lblb_text)

ls_text_hex = code_util.hex_encode(lblb_text)

return 0

获得HEX编码：
31393737E5B9B4EFBC8CE4B889E4BD8DE695B0E5ADA6E5AEB6526976657374E380815368616D697220E5928C2041646C656D616E20E8AEBEE8AEA1E4BA86E4B880E7A78DE7AE97E6B395

解码

待解码文本：
31393737E5B9B4EFBC8CE4B889E4BD8DE695B0E5ADA6E5AEB6526976657374E380815368616D697220E5928C2041646C656D616E20E8AEBEE8AEA1E4BA86E4B880E7A78DE7AE97E6B395

代码及执行效果如下：

n_code_util code_util
n_func_charset ln_charset
string ls_text, ls_text_hex
blob lblb_text

ls_text_hex = '31393737E5B9B4EFBC8CE4B889E4BD8DE695B0E5ADA6E5AEB6526976657374E380815368616D697220E5928C2041646C656D616E20E8AEBEE8AEA1E4BA86E4B880E7A78DE7AE97E6B395'

lblb_text = code_util.hex_decode(ls_text_hex)
ln_charset.from_utf8(lblb_text, ls_text)

return 0

获得解码文本：

1977年，三位数学家Rivest、Shamir 和 Adleman 设计了一种算法

说明

以上例子测试环境为PowerBuilder Version8.0.2 Build 9506
项目下载