当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用asp实现检测文件编码

ASP
Microsoft 脚本编码器Script Encoder介绍(2)全中文
Microsoft 脚本编码器Script Encoder介绍(3)全中文
Microsoft 脚本编码器Script Encoder介绍(4)全中文
用asp生成wml
Web网站的错误控制
asp动态生成wbmp图片的程序
安全技巧:配置 IIS 4.0 证书鉴定
个人主页的数据库解决方案ASP
跨站Script攻击(一)
跨站Script攻击(二)
跨站Script攻击(三)
使用ASP建立Http组件
如何安裝 IIS 5.0 ?
在您的网站中加入互动功能
用ASP随机产生随机数
产生随机滚动信息
用ASP打开远端MDB文件
ASP程序密码验证问题 (MS,缺陷)
如何在ASP中使用mySQL
ASP编程中15个非常有用的例子(一)

ASP 中的 用asp实现检测文件编码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 163 ::
收藏到网摘: n/a

最近,在搞这个东西,网上也找不到asp相关的,如果有人很早弄出来了,也不要笑话偶;费了好久,总算搞定;
原理:用stream对象预读文件的头两个字节,分析判断出utf-8,unicode,ANSI(简体中文操作系统,即gb2312)编码
相关资料:

ANSI:        无格式定义;
Unicode:        前两个字节为FFFE;
Unicode big endian:  前两字节为FEFF; 
UTF-8:         前两字节为EFBB;
复制代码 代码如下:
function checkcode(path)
set objstream=server.createobject("adodb.stream")
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
checkcoder="utf-8"
ElseIf AscB(MidB(bintou,1,1))=&HFF And AscB(MidB(bintou,2,1))=&HFE Then
checkcode="unicode"
Else
checkcode="gb2312"
End If
objstream.close
set objstream=nothing
end function

补充:
谢小雨提醒,先前的简直是胡扯;ANSI的本地编码,都是各国自己定义的,没有固定的文件头格式,在大陆中文操作系统下,是可读的gb2312,在其他语言的系统下,就是乱码,所以这部分没必要再详细区分
得到文件编码,stream流就能按照需要的编码打开,就不会乱码了