当前位置: 首页 > 图文教程 > 网络编程 > ASP > IIS5 + ADO 2.5新先睹为快技术(二)

ASP
二文件上传,才30行代码
用ASP制作在线测试
三级下拉框连动的数据库版
用户注册及跟踪代码(一)
用户注册及跟踪代码(二)
用户注册及跟踪代码(三)
ASP.Net写的浏览器间谍
ASP实现播放Flash的例子
用DataList控件开发一个简单的留言本程序
aspemail组件的应用
编写数据库脚本
用ASP建立邮件列表
用ASP技术编制隐藏用户密码程序
用ASP统计用户在站点的停留时间
HTTP方式上载文件的ASP程序实例
使用VB编写纯ASP程序
用ASP统计用户在站点的停留时间(1)
用ASP统计用户在站点的停留时间(2)
用ASP实现论坛的UBB功能(一)
用ASP实现论坛的UBB功能(二)

ASP 中的 IIS5 + ADO 2.5新先睹为快技术(二)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 190 ::
收藏到网摘: n/a

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