従来のASPアクセスデータベース接続の問題

Question

AccessでClassic ASPを使用する必要があります。これは残念なことに要件です。私は現在、アクセス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 

は再び、このスニペットはうまく動作しますが、記録：ここでは、スニペットです。私は別のスクリプトに、この接続を適用すると

、私はエラーが返され得るどの状態： マイクロソフトのVBScriptコンパイルエラー「800a0415」 期待リテラル定数 のConstのConnectionString =「DRIVER = {Accessドライバー（*を.MDB） } DBQ =」& Server.MapPathの（ "DB1.MDB"）ここで

が接続スニペットです：

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

は、任意のガイダンス誰もが私の方法を投げることができ感謝し、私は、これはいくつかの古い学校で誰でも知っています他にもこのことを思い出す出血していた？ LOL私は...

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