asp存储和读取access中2进制数据

  用来获取上一个页面传递过来的数据一般是使用 Request对象。同样的,可以使用Request对象来获取上传上来的文件数据,使用的方法是Request.BinaryRead()

  要从数据库中读出来图片的数据显示到网页上面要用到的方法是:Request.BinaryWrite()。

  在得到了图片的数据,要保存到数据库中的时候,不可以直接使用Insert语句对数据库进行操作,而是要使用ADO的AppendChunk方法。同样的,读出数据库中的图片数据,要使用GetChunk方法。

  各个方法的具体语法如下:  
  1)Request.BinaryRead语法:  
  variant=Request.BinaryRead(count)  
  参数  
  variant  
  返回值保存着从客户端读取到数据。  
  count  
  指明要从客户端读取的数据量大小,这个值小于或者等于使用方法Request.TotalBytes得到的数据量。  
  2)Request.BinaryWrite语法:  
  Request.BinaryWritedata  
  参数  
  data  
  要写入到客户端浏览器中的数据包。  
  3)Request.TotalBytes语法:  
  variant=Request.TotalBytes  
  参数  
  variant  
  返回从客户端读取到数据量的字节数。  
  4)AppendChunk语法  
  将数据追加到大型文本、二进制数据Field或Parameter对象。  
  object.AppendChunkData  
  参数  
  objectField或Parameter对象  
  Data变体型,包含追加到对象中的数据。  
  说明  
  使用Field或Parameter对象的AppendChunk方法可将长二进制或字符数  
    据填写到对象中。在系统内存有限的情况下,可以使用AppendChunk方法对长整型值进行部分而非全部的操作。  
  5)GetChunk语法  
  返回大型文本或二进制数据Field对象的全部或部分内容。  
  variable=field.GetChunk(Size)  
  返回值  
  返回变体型。  
  参数  
  Size长整型表达式,等于所要检索的字节或字符数。
 
  说明:使用Field对象的GetChunk方法检索其部分或全部长二进制或字符数据。在系统内存有限的情况下,可使用GetChunk方法处理部分而非全部的长整型值。  
  GetChunk调用返回的数据将赋给“变量”。如果Size大于剩余的数据,则GetChunk仅返回剩余的数据而无需用空白填充“变量”。如果字段为空,则  GetChunk方法返回Null。 

  每个后续的GetChunk调用将检索从前一次GetChunk调用停止处开始的数据。但是,如果从一个字段检索数据然后在当前记录中设置或读取另一个字段的值,ADO将认为已从第一个字段中检索出数据。如果在第一个字段上再次调用GetChunk方法,ADO将把调用解释为新的GetChunk操作 并从记录的起始处开始读取。如果其他Recordset对象不是首个Recordset对象的副本,则访问其中的字段不会破坏GetChunk操作。  
  如果Field对象的Attributes属性中的adFldLong位设置为True,则可以对该字段使用GetChunk方法。  
  如果在Field对象上使用Getchunk方法时没有当前记录,将产生错误3021(无当前记录)。

 
  接下来,我们就要来设计我们的数据库了,作为测试我们的数据库结构如下(access2000):  
   
 字段名称  类型     描述  
 id     自动编号  主键值  
 img    OLE对象   用来保存图片数据   
   
  对于在MSSQLServer7中,对应的结构如下:  
  字段名称  类型       描述  
  id   int(Identity)  主键值  
  img   image      用来保存图片数据   
   
  现在开始正式编写我们的纯ASP代码上传部分了,首先,我们有一个提供给用户的上传界面,可以让用户选择要上传的图片。代码如下  
  (upload.htm):  
 

<html>  
  <html>  
  <body>  
  <center>  
  <form   name="mainForm"   enctype="multipart/form-data"   action="process.asp"     method=post>  
    <input   type=file   name=mefile><br>  
    <input   type=submit   name=ok   value="OK">  
  </form>  
  </center>  
  </body>  
  </html>  

  注意enctype="multipart/form-data",一定要在Form中有这个属性,否则,将无法得到上传上来的数据。接下来,我们要在 process.asp中对从浏览器中获取的数据进行必要的处理,因为我们在process.asp中获取到的数据不仅仅包含了我们想要的上传上来的图片 的数据,也包含了其他的无用的信息,我们需要剔除冗余数据,并将处理过的图片数据保存到数据库中,这里我们以access2000为例。具体代码如下 (process.asp):

 
  <%  
  response.buffer=true  
  formsize=request.totalbytes  
  formdata=request.binaryread(formsize)  
  bncrlf=chrB(13)&chrB(10)  
  divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)  
  datastart=instrb(formdata,bncrlf&bncrlf)+4  
  dataend=instrb(datastart+1,formdata,divider)-datastart  
  mydata=midb(formdata,datastart,dataend)  
  set   connGraph=server.CreateObject("ADODB.connection")  
  ’connGraph.ConnectionString="driver={MicrosoftAccessDriver(*.mdb)};DBQ="&server.MapPath("images.mdb")&";uid=;PWD=;"  
  connGraph.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data   Source="   &   Server.MapPath("images.mdb")  
  connGraph.Open  
  set   rec=server.createobject("ADODB.recordset")  
  rec.Open   "SELECT   *   FROM   images   where   id   is   null",connGraph,1,3  
  rec.addnew  
  rec("img").appendchunk   mydata  
  rec.update  
  rec.close  
  set   rec=nothing  
  set   connGraph=nothing  
  %>  

  好了,这下我们就把上传来的图片保存到了名为images.mdb的数据库中了,剩下的工作就是要将数据库中的图片数据显示到网页上面了。一般在HTML 中,显示图片都是使用<IMG>标签,也就是<IMGSRC="图片路径">,但是我们的图片是保存到了数据库中,“图片路径” 是什么呢?呵呵,其实这个SRC属性除了指定路径外,也可以这样使用哦:  
 

<IMGSRC="showimg.asp?id=xxx"> 

  所以,我们所要做的就是在showimg.asp中从数据库中读出来符合条件的数据,并返回到SRC属性中就可以了,具体代码如下(showimg.asp):  
 

<%  
  setconnGraph=server.CreateObject("ADODB.connection")  
  ’connGraph.ConnectionString="driver={MicrosoftAccessDriver(*.mdb)};DBQ="&  
  server.MapPath("images.mdb")&";uid=;PWD=;"  
  connGraph.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data   Source="   &   Server.MapPath("images.mdb")  
  connGraph.Open  
  set   rec=server.createobject("ADODB.recordset")  
  strsql="selectimgfromimageswhereid="&trim(request("id"))  
  rec.open   strsql,connGraph,1,1  
  Response.ContentType="image/*"  
  Response.BinaryWrite   rec("img").getChunk(7500000)  
  rec.close  
  set   rec=nothing  
  set   connGraph=nothing  
  %>  

  注意在输出到浏览器之前一定要指定Response.ContentType="image/*",  以便正常显示图片。  
  最后要注意的地方是,我的process.asp中作的处理没有考虑到第一页(upload.htm)中还有其他数据,比如<INPUT   type=tesxt   name=userid>等等,如果有这些项目,你的process.asp就要注意处理掉不必要的数据。  

来源:http://www.cnblogs.com/jackie-hy/archive/2008/05/12/950464.html

加支付宝好友偷能量挖...


评论(0)网络
阅读(201)喜欢(0)Asp/VBScript