请教图片上传到数据库问题?
深山老翁 2004-03-17 11:42:11 关于图片上传到数据库问题,我去了网上查了一下,代码基本是这样,但我通过调制(参考写的),出现以下问题:请知道的朋友告诉一声,本人非常感谢!(知道的朋友不要骂我笨喔)
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Microsoft VBScript 运行时错误 错误 '800a0005'
无效的过程调用或参数: 'LEFTB'
/goodload/upload.asp,行6
<%@Language=VBScript %>
<%
FormSize = Request.TotalBytes
FormData = Request.BinaryRead(FormSize)
bnCRLF=chrB(13)&chrB(10)
Divider=LEFTB(FormData,INSTRB(FormData,bnCRLF)-1)
DataStart=INSTRB(FormData,bnCRLF & bnCRLF)+4
DataEnd=INSTRB(DataStart+1,FormData,Divider)-DataStart
Set imgConn=Server.CreateObject("ADODB.Connection")
StrConn="Driver={SQL Server};Server=rjs;uid=sa;pwd=;database=pubs"
imgConn.Open StrConn
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from img where id is null"
rs.open sql,imgConn,1,3
rs.addnew
rs("img").appendchunk DataEnd
rs.update
rs.close
imgConn.close
set rs=nothing
set imgconn=nothing
%>