IIS5 + ADO 2.5新先睹为快技术（二）

　　　　　　　　　　　　
　　　　　　　　　　　　　
　　　　　　　　　　　　　　
　　　　　　　　　　　　　
　　　　　　　　　　　　
　　　　　　　　　　　　



　　　　　　　　　　　　这里要介绍第二个IIS5 + ADO 2.5的新特点：
ADO中新增加了一个Stream对象。。。
顾名思义，Stream对象可以将服务器上的任何文件用流的方式打开来读写。。。
当然读取后的结果是写入一个Unicode流中。。。

下面是它运用的事例：
这是它读文件的例子：

<%
Dim stmData

Set stmData = Server.CreateObject ("ADODB.Stream")

stmData.Open "URL=http://localhost/ad/readme.txt", adModeRead, adOpenStreamFromURL

response.write stmData.ReadText

stmData.Close
Set stmData = Nothing
%>

这是它写文件的例子：
<%
Dim stmData
Set stmData = Server.CreateObject ("ADODB.Stream")
with stmData
.Open "URL=http://localhost/ad/red.txt", adModeReadWrite, adOpenStreamFromURL

'把位置设置在流的最前面
.Position = 0
' 将当前位置设置为流的结束位置
' 从而删除了当前流中的内容
.SetEOS
.WriteText "test"

Response.Write "文件已经更新。当前大小为" & .Size
.Close
End With

Set s = Nothing
%>