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

ASP
发送带附件的HTML格式邮件例程
调用winzip命令行对上传的多个文件打包压缩
怎样做自己的二级域名(之一)
怎样做自己的二级域名(之二)
怎样做自己的二级域名(之三)
从新浪提取上海天气的vbs
列出服务器上的打印机
2栏分页显示(附显示的形式[1][2])
2栏分页显示(附显示的形式前页,后页)
购物车范例(购物车页面 )
购物车范例(处理页面)
GB码和BIG5码的互换技术
在ASP中改善动态分页的性能
利用ASP实现对表的分页浏览(上)
利用ASP实现对表的分页浏览(下)
ASP后台快速调用Mysql 数据库
网络寻呼机数据库版发送消息tomessage.asp
网络寻呼机数据库版处理发送消息SubmitMessage.asp
网络寻呼机数据库版显示消息showmessage.asp
网络寻呼机数据库版显示历史消息history.asp

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 135 ::
收藏到网摘: 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流就能按照需要的编码打开,就不会乱码了