脚本宝典收集整理的这篇文章主要介绍了ASP上传图片功能的又一实现(OLE对象),脚本宝典觉得挺不错的,现在分享给大家,也给大家做个参考。上次说到的上传图片是采用稻香老农开发的无组件上传。其上传过程是将图片先保存到指定文件夹,与此同时将该路径保存至数据库字段的。显示图片则是根据数据库表中的路径字段对应显示的。当然有关图片的管理,比如删除:只删除了路径,实际的图片需要根据该路径通过FSO进行删除……
<% db_path="testimg.mdb" set conn=server.CreateObject("ADODB.connection") connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&server.MapPath(db_path) conn.oPEn connstr %> |
<form action="upload.asp" method="post" enctype="multipart/form-data"> <input type="file" name="imgurl"> <input type="submIT" name=ok value="ok"> </form> |
<!--#include file="conn.asp"--> <% 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 rs=server.createobject("ADODB.recordset") rs.open "SELECT * From imgurl",conn,3,3 rs.addnew rs("img").AppendChunk myData rs.update rs.close set rs=nothing set conn=nothing response.redirect "index.asp" %> |
<!--#include file="conn.asp"--> <% set rs=server.createobject("ADODB.recordset") SQL="select * from imgurl where id="&trim(request("id")) rs.open sql,conn,1,1 Response.ContentType="image/*" Response.BinaryWrite rs("img").getChunk(8000000) rs.close set rs=nothing set conn=nothing %> |
<!--#include file="conn.asp"--> <% strsql="select * from imgurl" set rs=server.createobject("ADODB.recordset") rs.open strsql,conn,1,1 do until rs.eof whatid=rs("id") %> <img src="showimg.asp?id=<%=whatid%>"> <% rs.movenext loop%> |
以上是脚本宝典为你收集整理的ASP上传图片功能的又一实现(OLE对象)全部内容,希望文章能够帮你解决ASP上传图片功能的又一实现(OLE对象)所遇到的问题。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。