丹阳市中医院夏宁俊:无组件图片上传 代码

来源:百度文库 编辑:高考问答 时间:2024/04/29 07:25:34
<%
response.buffer=true
formsize=request.totalbytes
formdata=request.binaryread(formsize)
bncrlf=chrb(13)&chrb(10)
divider=leftb(formdata,bncrlf&bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
mydata=midb(formdata,datastart,dataend)

set conngraph=server.createobject("adodb.connection")
conngraph.connectionstring="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("/data/img_data")
conngraph.open
set rec=server.createobject("adodb.recordset")
rec.open "select *from [images] where id is null",conngraph,1,3

rec.addnew

rec("img").appendchunk mydata
rec.update
rec.close
set rec=nothing
set conngraph=nothing
%>

不知道那里出错了,我看了很多遍也没查出错出在哪里
技术信息(用于支持人员)

错误类型:
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: '[string: "??"]'
/image/process.asp, 第 6 行

浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

网页:
POST 113591 ??? /image/process.asp

POST Data:
错误 '80020009'
发生意外。

/iisHelp/common/500-100.asp,行 219

请高手指点