求助：外部链接打开我的网站时，会出现错误。

<script language=vbscript runat=server>
sub application_onstart()
    set m_conn =Server.CreateObject("ADODB.Connection")
    m_conn.Open "provider=microsoft.jet.oledb.4.0;data source="&Server.MapPath("database/Db_uibe.mdb")
    dim rs_s
    set rs_s=server.CreateObject("adodb.recordset")
    rs_s.open "select * from TB_count",m_conn,1,1
    application("number")=rs_s("counts")
    rs_s.close
    set rs_s=nothing
    m_conn.close
    set m_conn=nothing
    application("quest")=""
end sub
sub application_onend()
    set m_conn =Server.CreateObject("ADODB.Connection")
    m_conn.Open "provider=microsoft.jet.oledb.4.0;data source="&Server.MapPath("database/Db_uibe.mdb")
    dim rs_s
    set rs_s=server.CreateObject("adodb.recordset")
    rs_s.open "update TB_count set counts="&application("number"),m_conn,3,3
    rs_s.close
    set rs_s=nothing
    m_conn.close
    set m_conn=nothing   
end sub
sub session_onstart()
    'on error resume next
    'response.Redirect("/index.asp")
    application("number")=application("number")+1
    set m_conn =Server.CreateObject("ADODB.Connection")
     m_conn.Mode=3
     m_conn.Open "provider=microsoft.jet.oledb.4.0;data source="&Server.MapPath("database/Db_uibe.mdb")
     dim ip
     dim come
     ip=request.ServerVariables("REMOTE_ADDR")
     come=now()
     m_conn.execute("INSERT INTO TB_log(session_id,join_date,ip,url) VALUES (" & session.SessionID & ",'" & come & "','" & ip & "','"& request.ServerVariables("HTTP_REFERER") & "')")
     m_conn.execute("update TB_count set counts="&application("number"))
     m_conn.Close
     set m_conn=nothing
end sub
sub session_onend()
        'session("flage")=""
        'application.Lock
        'application("visitors")=application("visitors")-1
        'application.UnLock
end sub

</script>

我比较菜鸟，请问如何解决。需要编辑这个global.asa文件还是哪个？   TB_log表一般在哪？是不是在.mdb文件里？  怎么编？


[ 本帖最后由 对外经贸大学 于 2011-9-16 15:00 编辑 ]

直接在access里 把.mdb中的URL改成备注型。保存上传。
但不知道是否解决了问题。就是说无法判断是否有问题。
请问，这个怎么来检查呢？