这里要介绍第二个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
%>
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
%>