如何捕获Connection对象的Errors集合？谢谢！！

taobixianshi 2002-07-02 05:03:12

谢谢

...全文

64 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

taobixianshi 2002-07-02

打赏
举报

set conn=server.CreateObject ("adodb.connection")
conn.Open "driver={Microsoft Access Driver(*.mdb)};dbq="&server.MapPath("test.mdb")&";"

for each i in conn.errors
response.write i&":"&conn.errors(i)&"<br>"
next
行吗？

taobixianshi 2002-07-02

打赏
举报

链接语句写哪里呢？

zyhowe 2002-07-02

打赏
举报

for each i in conn.errors
response.write i&":"&conn.errors(i)&"<br>"
next

gshope 2002-07-02

打赏
举报

...
set myerrors=conn.errors
...

rouyue 2002-07-02

打赏
举报

<%
If err.number=0 Then
.....
else
Response.Clear()
errmsg = "错误代码:" + CStr(Err.Number) + """" + " + Chr(13) + Chr(10) + " + """"
errmsg = errmsg + "错误描述:" + CStr(Err.Description) + """" + " + Chr(13) + Chr(10) + " + """"
errmsg = errmsg + "错误源:" + CStr(Err.Source)
%>
<script LANGUAGE="VBScript">
Msgbox "<%=errmsg%>",,"提示"
window.open "Url","right"
</script>
<%end if%>