标题:VFP Unicode转中文
只看楼主
aroffice
Rank: 1
等 级:新手上路
帖 子:39
专家分:0
注 册:2011-9-23
结帖率:92.31%
已结贴  问题点数:10 回复次数:5 
VFP Unicode转中文
从网址反馈回来的内容中汉字部分是Unicode码,示例如下:
\u6d4b\u8bd5\u6587\u5b57ID\uff01
如何在VFP中进行转换
搜索更多相关主题的帖子: 中文 内容 转换 示例 VFP 
2022-06-22 20:22
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:0 
转换一下
如:\u6d4b\u8bd5\u6587\u5b57
先转换成:4b6dd58b8765575b
? STRCONV(STRCONV("4b6dd58b8765575b",16), 6)
2022-06-22 20:53
easyppt
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:119
专家分:169
注 册:2021-11-24
得分:0 
返回的应该是 Json字符串吧,直接用 Myfll解析Json 即可
2022-06-22 21:06
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:10 
程序代码:
? uz("\u6d4b\u8bd5\u6587\u5b57ID\uff01")

FUNCTION uz(str)
    ret = ""
    i = 1
    DO WHILE i <= LEN(str)
        IF SUBSTR(str,i,2)=="\u"
            ret = ret + STRCONV(STRCONV(SUBSTR(str,i+4,2)+SUBSTR(str,i+2,2),16), 6)
            i = i + 6
        ELSE 
            ret = ret + SUBSTR(str,i,1)
            i = i + 1
        ENDIF 
    ENDDO 
    RETURN ret
ENDFUNC
2022-06-22 21:26
ls_y041
Rank: 2
等 级:论坛游民
威 望:1
帖 子:157
专家分:35
注 册:2005-9-29
得分:0 
王子的fll实现bs真的很简单
有兴趣的可以一起来研究
2022-07-01 22:31
sostemp
Rank: 4
等 级:业余侠客
威 望:8
帖 子:162
专家分:221
注 册:2009-6-2
得分:0 
thanks
2022-07-06 07:48



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-509403-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.050815 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved