投稿日 | : 2004/01/15(Thu) 16:34 |
投稿者 | : たたみ |
Eメール | : wakako_n91@yahoo.co.jp |
URL | : |
タイトル | : AccessからのSQLServer接続 |
こんにちは、大変困っています。
Access2000から、DAOのODBCDirectで
SQLServer2000に接続したいのですが、
うまくいきません。
(ADOはシステム上使用不可なので、DAOでやります。)
DSN = xsl_odbc_m
UID = lep_user
PWD = lep_user
は、上記のとおりで、ODBC接続OKです。
プログラムは、下記のとおりです。
Dim WrkSpace As Workspace
Dim SQLsrvDB As Database
Dim strConnect As String
strConnect = "ODBC;;UID=lep_user;PWD=lep_user;DSN=xsl_odbc_m"
Set WrkSpace = CreateWorkspace("ODBC", "admin", "", dbUseODBC)
↓ここでエラーとなります。
Set SQLsrvDB = WrkSpace.OpenDatabase(G_procure_dsn, dbDriverNoPrompt, False, strConnect)
プログラムの書き方がおかしいのでしょうか?
お手数ですが、皆様の知恵を貸していただければと思います。
宜しくお願いします。