各位朋友帮忙看看，我在执行程序时，发生如下错误，其中红色一行为第84行
错误类型：
(0x80020009)
发生意外。
/hongwei/System/companyall.asp, 第 84 行
UPdateyes=trim(request.QueryString("Updatecompany"))
if UPdateyes="DOUPDate" then
ComName=trim(request.Form("NameClass"))
HomeAbout=trim(request.Form("HomeAbout"))
MyID=trim(request.Form("MyID"))
UPTOID=trim(request.QueryString("DOID"))
set rs=server.CreateObject("adodb.recordset")
rs.open "select myid,id from Company where myid="&MyID&"",conn,1,1
if not rs.eof and Cint(UPTOID)<>rs("id") then
response.write "<Script language='JavaScript'>window.alert('您输入的栏目排序号重复了，请返回重新输入！');history.back(-1);</Script>"
response.End()
end if