processimg.asp

来自「企业办公自动化管理系统 asp+sql server 2005」· ASP 代码 · 共 36 行

<!--#include file="../include/opendb.asp"-->
<!--#include file="../include/checked.asp"-->

<%

id=request("id")

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 conn=opendb()
set rs=server.createobject("adodb.recordset")
sql="select * from personinf where suid='" & id&"'"
rs.open sql,conn,1,3
if not rs.eof and not rs.bof then

rs("havephoto")="yes"
rs("photo").appendchunk mydata
rs.update
end if

rs.close
set rec=nothing
set connGraph=nothing

response.redirect "imgupok.asp"
%>