用ADO STREAM做的无组件上传程序

用ADO STREAM做的无组件上传程序，今天我做一下关于它的简单介绍

以前，如果要用ASP操作文件，比如移动、复制、删除或者创建一个记事本文件，基本上都是通过FILESYSTEMOBJECT对象做的，当然，这个东西很专业，也没说什么不好，它可以提供完善的文件信息，比如建立时间，大小，上次修改时间等等，但是如果你不做痛苦的高代价的字符格式转换的话，利用它你无法直接操作二进制文件。

但是，现在我们介绍的stream物件可以同时操作文本对象和二进制对象，要求是您的机器上要安装有ADO2。5或者更高版本，您可以从http://www.microsoft.com/data里去DOWN的。

这个stream对象包含了许多操作二进制和文本文件的方法，让我们来看例子吧

打开stream对象


<%
  'Create a stream object
  Dim objStream
  Set objStream = Server.CreateObject("ADODB.Stream")

  'Open a GIF file
  objStream.Type = adTypeBinary
  objStream.Open
  objStream.LoadFromFile "D:\Inetpub\wwwroot\images\banner\dimacbanner1.gif"

  'Output the contents of the stream object
  Response.ContentType = "image/gif"
  Response.BinaryWrite objStream.Read

  'Clean up....
  objStream.Close
  Set objStream = Nothing
%>

你可以试试用这个写一个上传的东西，这样学习起来快，反正有现成的老师在，可以参考