批量读图片到数据库

中国IT动力,最新最全的IT技术教程

最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 在线API文档 | 网通镜像

当前位置：> 未整理篇

批量读图片到数据库

作者:lienzhu 时间:2003-02-20 11:11 出处:互联网责编:chinaitpower

摘要：批量读图片到数据库

<%
'假设图片路径为path="d:/photo/"
set rs=conn.execute("select id from youtable")
set ads=CreateObject("Adodb.Stream")
Set rs2=Server.CreateObject("Adodb.RecordSet")
ads.Mode=3
ads.Type=1
set id=rs("id")
do while rs.eof=false
ads.Open
ads.LoadFromFile(path & id &".jpg")
rs2.Open "select * from youtable where id=" & id,conn,1,3
rs2.addnew
rs2("photo")=ads.read()
rs2.update
rs2.close
ads.close
rs.movenext
loop
set id=nothing
set rs2=nothing
set ads=nothing
set rs=nothing
%>

关闭本页