用stream读取文件的方法

代码如下：
<%
set srmobj=server.CreateObject("adodb.stream")
srmobj.type=1
srmobj.mode=3
srmobj.open()
srmobj.Position=0
srmobj.LoadFromFile server.MapPath("test.txt")
srmobj.position=0
srmobj.type=2
srmobj.charset="gb2312"
readfile=srmobj.readtext()
response.Write(readfile)
%>
很简单，没有需要说明的了 ^_^！