fso读取doc文件乱码问题！在线等

[qfacy]

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.opentextfile("d:\11.doc",1,True)
while not a.atendofstream
response.Write "<br>"
response.Write (a.readline)
wend
a.Close
%>
编码是gb2312的！但是当我用上面代码读出其内容时，出现乱码！请问是什么原因！

[qfacy]

to 回复人： bluemoon0001(小天--追梦浪子) ( ) 信誉：105
你的方法出现还是乱码！

[hhjjhjhj]

朋友！.doc不是文本格式！
用ADO.stream读取。

[aking8736]

楼上正解!
能用记事本打开的那才是文本格式地

[qfacy]

沉的好快 up下

[bluemoon0001]

试一下：
<meta http-equiv="Content-Type" content="application/msword; charset=gb2312"> 把这里的text/html; 改成application/msword;
<%
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.opentextfile("d:\11.doc",1,True)
while not a.atendofstream
Response.BinaryWrite (a.readline)
wend
a.Close
%>

[pangimo]

进来学习的。