在读写数据库时失败时，脚本是会不运行的，所以：
1.不管在函数还是在过程中，必须加入
On Error Resume Next
2. 采用Err 抓取错误信息。方法如下：
if Err.Number <> 0 then
Response.Write "<br>Number:" &Err.Number
Response.Write "<br>source:" & Err.Source
Response.Write "<br>Description:" & Err.Description
Err.Clear
end if
或者在执行conn，rs后面跟参，如
conn.exec strsql ,num
if num = "" then 表示失败，否则继续判断