用自用_编码_Unicode到usc2_非可视先转换含有unicode的json文本,然后json解析就可以了
用到的子程序和dll:
|
| 自用_编码_Unicode到usc2_非可视 | 文本型 | | |
| 欲转换的Unicode | 字节集 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | | dwSize | 整数型 | | | | szBuf | 字节集 | | | | pszBuf | 整数型 | | | | sChar | 整数型 | | | | ptr | 整数型 | | | | i | 整数型 | | | | 最终文本 | 文本型 | | | | 中文字符 | 文本型 | | |
dwSize = 文本_取长度W (欲转换的Unicode ) 如果真 (dwSize = 0 ) 返回 (“”)dwSize = dwSize × 6 + 1ptr = 取指针_字节集型 (欲转换的Unicode ) 变量循环首 (0, 取字节集长度 (欲转换的Unicode ) - 2, 2, i ) sChar = 短整数_有符号转无符号 (指针_到短整数型_汇编 (ptr + i ))  判断 (sChar = 0 ) 跳出循环 () 判断 (sChar = 10 )  最终文本 = 最终文本 + “\n” 判断 (sChar = 13 )  最终文本 = 最终文本 + “\r” 判断 (sChar = 63 )  最终文本 = 最终文本 + 编码_Unicode到Ansi (到字节集 (sChar ))   中文字符 = 编码_Unicode到Ansi (到字节集 (sChar ))   如果 (中文字符 = “??” 或 中文字符 = “?” 或 中文字符 = “”)   szBuf = 取空白字节集 (dwSize )   pszBuf = 取指针_字节集型 (szBuf )   pszBuf = Unicode_sprintf (pszBuf, “\u%04X”, sChar )   最终文本 = 最终文本 + 到文本 (取字节集数据 (szBuf, #文本型, ))    最终文本 = 最终文本 + 中文字符      变量循环尾 ()返回 (最终文本 )
|