asp代码运行有时正常有时出错类型不匹配
<!--#include file="conn.asp"--><%
a1=request.Form("a1")
a2=request.Form("a2")
a3=request.form("a3")
a4=request.Form("a4")
a5=request.form("a5")
a6=request.form("a6")
a7=request.form("a7")
a8=request.form("a8")
a9=request.Form("a9")
a10=request.Form("a10")
a11=request.Form("a11")
a12=request.Form("a12")
a13=request.form("a13")
a14=request.Form("a14")
a15=request.form("a15")
a16=request.form("a16")
a17=request.form("a17")
a18=request.form("a18")
a19=request.Form("a19")
a20=request.Form("a20")
a21=request.Form("a21")
a22=request.Form("a22")
a23=request.form("a23")
a24=request.Form("a24")
a25=request.form("a25")
a26=request.form("a26")
session("zong")=0+a1+a2+a3+a4+a5+a6+a7+a8+a9+a10+a11+a12+a13+a14+a15+a16+a17+a18+a19+a20+a21+a22+a23+a24+a25+a26
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from [check] where xing='"&session("xing")&"'",conn,1,3
if rs.eof then
rs.addnew
rs("a1")=a1
rs("a2")=a2
rs("a3")=a3
rs("a4")=a4
rs("a5")=a5
rs("a6")=a6
rs("a7")=a7
rs("a8")=a8
rs("a9")=a9
rs("a10")=a10
rs("a11")=a11
rs("a12")=a12
rs("a13")=a13
rs("a14")=a14
rs("a15")=a15
rs("a16")=a16
rs("a17")=a17
rs("a18")=a18
rs("a19")=a19
rs("a20")=a20
rs("a21")=a21
rs("a22")=a22
rs("a23")=a23
rs("a24")=a24
rs("a25")=a25
rs("a26")=a26
rs("zong")=session("zong")
rs("user")=session("user")
rs("xing")=session("xing")
rs("arress")=session("arress")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
language='javascript'>alert('记录完成');window.location.href='reg.asp';</script>"
else
response.write"<script language='javascript'>alert('你填写过一次了');window.location.href='reg.asp';</script>"
end if
%>
session("zong")=0+a1+a2+a3+a4+a5+a6+a7+a8+a9+a10+a11+a12+a13+a14+a15+a16+a17+a18+a19+a20+a21+a22+a23+a24+a25+a26
这句话报错
