asp兼容性问题

<%
dim saleid
if Request("sid")<>"" then
saleid=Request("sid")
end if

dim rs,sql
set rs=server.CreateObject("adodb.recordset")
sql = "select * from oper"
rs.open sql,conn,1,3
rs.addnew
rs("saleid") = saleid
rs("opershren") = request.form("shren")
rs("opertel") = request.form("tel")
rs("opermobile") = request.form("mobile")
rs("operadd") = request.form("add")
rs("operdet") = request.form("det")
rs("operzt") = 1
rs.update
operid = rs("operid")
rs.close
set rs=nothing

dim prors,prosql
set prors=server.createobject("adodb.recordset")
prosql="update oform set operid='"& operid &"',oformzt=true where oformzt=false"
prors.open prosql,conn,1,3


Response.redirect "pro_operpostok.asp?operid="&operid&""

%>


在ie7顺利执行，ie6用了很长时间，是哪里有问题吗？