我这个不到10行的程序什么地方错啦~!高手帮忙呀~!
我的这个图片上传的程序什么地方错了吗??
<!--#include file="conn.asp" -->
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from shuma where id=1"
rs.open sql,conn
id=rs("id")
%>
<table width="257" height="289" border="1" align="center" cellpadding="3" cellspacing="0">
<form name="pic" method="post" action="user.asp" onsubmit="return mysubmit(this)">
<input name="121" type="hidden" value="<%= id %>">
<tr>
<td width="90" height="22" bgcolor="9999ff">产品图片:<%= id %></td>
</tr>
<tr>
<td height="21" bgcolor="9999ff"> <input type="file" name="big">
</td>
</tr>
<tr>
<td height="25" bgcolor="9999ff"> <div align="center">
<input type="submit" name="Submit3" value="上传图片">
</div></td>
</tr>
</form>
</table>
user.asp页:
<!--#include file="conn.asp"-->
<%
id=request("121")
set rs=server.CreateObject("adodb.recordset")
sql="select * from shuma where id="&id
rs.open sql,conn,1,3
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
photodata=midb(formdata,datastart,dataend)
rs("photo").appendchunk photodata
rs.update
rs.close
set rs=nothing
%>
我也不知道怎么搞 的,user页老是出错,怎么也调试不出来,请高手们给看看好吗?存储字段photo是ole对象