經典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")