当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用ASP显示ACCESS数据库的的GIF图象

ASP
通过ASP与ACCESS数据库建立连接(附源码)(1)
通过ASP与ACCESS数据库建立连接(附源码)(2)
通过ASP与ACCESS数据库建立连接(附源码)(3)
关于页面局部刷新例程
仿照CHINAASP论坛中TOP10写的部分显示代码
用ASP做一个记事本编缉器(附源码)
让您的主页支持各种浏览设备(ASP+篇)(下)
用ASP开发一个在线考试程序(五)
用ASP开发一个在线考试程序(六)
用ASP开发一个在线考试程序(七)
用ASP开发一个在线考试程序(八)
用ASP开发一个在线考试程序(九)
用SQL Server为Web浏览器提供图像1
用SQL Server为Web浏览器提供图像2
用SQL Server为Web浏览器提供图像3(end)
制作一个个人搜索引擎(源码)
制作一个简单的服务器端控制
用Access制作一个功能完善的论坛(源程序)
广告播放和跟踪系统的制作
动态广告管理程序制作例子

用ASP显示ACCESS数据库的的GIF图象


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

写入:

1:把gif图像文件读入内存(一个变量strTemp)。

2:写入数据库。

读出和显示:

以下为引用的内容:
 show.asp:
 <%
 dim P
 dim L
 L = 8192
 dim conn,rs,strSql
 set conn=server.CreateObject("ADODB.Connection")
 conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &server.MapPath(".") & "db2.mdb;Persist Security Info=False"
 set rs=server.CreateObject("ADODB.Recordset")
 strSql = "select * from tbImage"
 Response.ContentType = "image/gif"
 'Important!
 rs.open strSql,conn,1,1
 rs.movelast
 do
 P = rs("image").GetChunk(L)
 Response.BinaryWrite P
 IF LenB(P) < L then exit do
 loop
  %>

在html中:

<image src=show.asp>