向SQLServer数据库读写image文件

 class_id rs_img("img_data").appendchunk mydata rs_img.update End If rs_img.close set rs_img=nothing set conn=nothing
以上代码先判定数据库中id记录为newid的字段内有没有数据，假如有则用当前数据更新数据库，若没有则将数据插入。

请注重：newid在别的地方定义，读者不必理会

四、读取数据库中的image文件并显示在网页上
用以下代码将数据显示在网页上，请注重，<img>标签的src指示为showimg.asp文件。即<img>标签指向的不一定是.gif
<img src="showimg.asp?id=<%=rs_img("id")%>">

核心的部分在showimg.asp文件中：

Response.Expires = 0

Response.Buffer = TRUE

Response.Clear 

Dim id

id = trim(Request("id"))

Response.ContentType = "image/*" 

set rs_img=Server.Createobject("ADODB.Recordset") 

sql="select * from tbl_images where id='"&id&"'" 

rs_img.open sql,conn,1,3,1



Dim img_size

img_size = rs_img("img_data").ActualSize

Response.BinaryWrite rs_img("img_data").getChunk


 

 
共4页: 上一页 [1] [2] 3 [4] 下一页