一个图片上传出错的问题，高分请教？？？？

我是根据图片和数据分开来保存的，在每条记录都不删除都不会出错，可是删掉几条粉据后就会出现
一两次上传数据没传上，而图象传上了，再接下去又没问题了，请问大家会是什么问题？？
我是用access做数据库的，下面是我
数据部份保存的原代码
<%
a2=request("a2")
a3=request("a3")
a4=request("a4")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from qita "
rs.open sql,conn,3,2
rs.addnew
rs("data")=request("a1")
rs("leibie")=a2
rs("tell")=a3
rs("chengshi")=a4
rs.update
rs.close
response.redirect"../newf4.asp"
%>
图象部份保存
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->

<%
FormSize = Request.TotalBytes
FormData = Request.BinaryRead(FormSize)
Image=ImageUp (FormSize,Formdata)
Set rs = Server.CreateObject("ADODB.Recordset")

sql="select top 1 * from cam order by id desc"
rs.open sql,conn,3,2
rs("image") = NULL
rs("image").appendchunk Image
rs.update
rs.close
response.redirect"../newe1.asp"
%>

<%
function ImageUp(formsize,formdata)
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
imageup=midb(formdata,datastart,dataend)
end function
%>