Asp 编码互转的研究和实现代码(2)

日期：2020-05-13 栏目：程序人生 浏览：次

objstream.Type=1
objstream.mode=3
objstream.open
objstream.Position=0
objstream.loadfromfile path
bintou=objstream.read(2)
If AscB(MidB(bintou,1,1))=&HEF And AscB(MidB(bintou,2,1))=&HBB Then
GetCharSetName="utf-8"
ElseIf AscB(MidB(bintou,1,1))=&HFF And AscB(MidB(bintou,2,1))=&HFE Then
GetCharSetName="unicode"
Else
GetCharSetName="gb2312"
End If
objstream.close
Set objstream=nothing
End Function

好了，经过这样一段代码，我们的转换工作就完成了！希望这篇文章能给asp爱好者以及其他语言爱好者带来一些帮助和启发。
最后，我想说的是，编程语言的学习和使用并不难，重要的是自己多动脑筋，想想自己需要的功能怎么去实现，而不是怨天尤人，说这个语言太弱了之类的话。
好了，祝大家编程并快乐着，关于asp的编码转换先写到这里，以后我还会推出更精彩的个人原创文章，谢谢大家！