公司网站程序以前运行正常,可是今天出现如下错误不知如何解决,网站不能正常浏览:
__________________
Microsoft VBScript 运行时错误 错误 '800a01fb'

出现一个意外错误: 'Open'

/main.asp，行8
_____________________

程序代码如下(第8行,就是最后一行):

_______________________
    dim conn
    dim connstr
    dim db
    db="data/db.asp"
    Set conn = Server.CreateObject("ADODB.Connection"
    connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&""
    conn.Open connstr
_________________________

请教各位高手,如何解决???