函数：StrConv(string, conversion, LCID)怎么用？

[David017]

我想把中文/日文变成unicode或转变回来，
怎么用这个函数？
在asp里，
strConv("xxxx", 64)总提示：Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'StrConv'

这个函数到底在asp里能用吗？
还有就是lcid在日文/中文时，分别是什么？

[karma]

You need to do your own conversions, for example

Function BinaryToString(Binary)
　　Dim I, S
　　For I=1 to LenB(Binary)
　　　　S = S & Chr(AscB(MidB(Binary,I,1)))
　　Next
　　BinaryToString = S
End Function

Function StringToBinary(String)
　　Dim I, B
　　For I=1 to len(String)
　　　　B = B & ChrB(Asc(Mid(String,I,1)))
　　Next
　　StringToBinary = B
End Function

[希偌]

你自己用这个函数在vb6下编写一个组件，在asp下调用就可以了！
上面的就是一个例子！

[karma]

StrConv is not supported in VBScript

[希偌]

对，vbscript没有StrConv函数！

[希偌]

这是VB6的函数，用法如下：
StrConv（string， conversion， LCID） `VB6
　　string呢，就是预转换的字符串了（提示一下，也可以使用byte数组）。
　　conversion: 是一个整数，只决定转换方式，VB里定义了一些常量，如VBFromUnicode、VBUnicode等等，这些不用我解释大家应该也明白了吧。
　　LCID:哈，这可是VB6新加入的参数了，长整数， 可以指定编码方式， 如＆H404，即Big5码， ＆H804即GBK码，合理运用这个参数，就可以写出一个非常简单的内码转换工具!

[David017]

有其他方法实现这个功能吗？

[David017]

有其他方法实现这个功能吗？

[1995]

提交数据库时转为unicode码或gb big5都可以！例程如下：
再加些分吧，50太少了！

发现word简繁转换的秘密了么？可以翻译呀！信息--〉资讯
win2000，asp，？想知道么？qq:5533655 [e-mail]


提供的StrConv这个函数，完全可以解决简繁体的转换问题。下面是一个简繁体的转换的函数，可以实现简体到繁体、繁体到简体的相互转化。

'****** 简繁体互换 GB-->Unicode-->BIG5
Or BIG5-->Unicode-->GB *****************
'参数sStr为需要转换的文本
'参数iConver为要转化的类型，为1时表示繁体到简体的转换，为2时表示简体到繁体的转换
Function GBBIG5(sStr As String, iConver As Integer) As String
On Error Resume Next
Dim STR
If iConver = 1 Then 'BIG5-->GB
STR = StrConv(sStr, vbFromUnicode, &H804)
GBBIG5 = StrConv(STR, vbUnicode, &H404)
ElseIf iConver = 2 Then 'GB-->BIG5
STR = StrConv(sStr, vbFromUnicode, &H404)
GBBIG5 = StrConv(STR, vbUnicode, &H804)
End If

End Function