关于采集的时候发生错误!!
关于采集的时候发生错误,因为有的可以采集,有的采集不下来,就弹出错误提示,又重新开始采集. 能不能就这个问题严重修改一下,既然是采集我和不可能一直守在电脑旁,能不能修改为能采集的就采集,不可以采集的就跳过,并显示出来,
Set Rs = Nothing
Conn.Close : Set Conn = Nothing
If Err Then
Err.clear
Post = false
vLastError = Err.Description : response.write "Err: "&vLastError
Exit Function
End If
Post=true
Set Rs = Nothing
Conn.Close : Set Conn = Nothing
If Err Then
Err.clear
Post = false
vLastError = Err.Description : response.write "Err: "&vLastError
Response.Write "<meta http-equiv=""refresh"" content=""1"" />"
Response.Flush
Response.end
Exit Function
End If
Post=true