经典ASP Access数据库连接问题

Question

我需要在Access中使用Classic ASP。 不幸的是，这是一个要求。 我目前有一个可以很好地连接到Access DB的脚本。 这是代码段：

Set adoCon = Server.CreateObject("ADODB.Connection")

adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db1.mdb")

Set rsGuestbook = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT * from table1;"

rsGuestbook.Open strSQL, adoCon

同样，此代码片段也可以正常工作，将记录发送到浏览器。

当我将此连接应用于其他脚本时，返回以下错误：Microsoft VBScript编译错误'800a0415'预期的文字常量Const ConnectionString =“ DRIVER = {Microsoft Access Driver（* .mdb）} DBQ =”＆Server。 MapPath（“ db1.mdb”）

这是连接片段：

Const ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db1.mdb")  

赞赏任何人都可以抛弃我的指导，我知道这是一所古老的学校，其他人在这东西流血边缘时记得吗？ 大声笑我...

Answer 1

不要为连接字符串使用常量。 由于Server.MapPath是不确定的（路径可能从一次运行更改为下一次运行），因此Const抱怨。 或者，在分配常量时，它可能会抱怨并置，我不确定...

相反，请更改：

Const ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db1.mdb")   

至：

Dim ConnectionString 
ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db1.mdb")