sskrのプロフィール

Ａｃｃｅｓｓ2003、2007でＯＤＢＣダイレクトをつかってＳＱＬServerにテーブルリンクをしています。 Access2010では下記のプログラムは ＯＤＢＣDirectが使えない旨のエラーとなるので、他の方法で接続を行い、つづくしょりでテーブルのリンクをしたいのですが、方法がわかりません。 もしかするとAccess2010ではこのようなことはできないのかとあきらめているのですが、方法がありましたらご指導いただけると幸いです。 よろしくお願いいたします。 'ローカルＤＢ定義 Set dbLocal = CurrentDb 'ODBC Direct コネクション確立 Set dbCrWs = CreateWorkspace("DIrectWorkspace", "", "", dbUseODBC) Set dbConn = dbCrWs.OpenConnection("", dbDriverNoPrompt, False, strConnect) 'SQL パススルークエリー　コネクション確立 Set dbPtQr = CurrentDb Set dbPtQd = dbPtQr.QueryDefs("パススルークエリ") dbPtQd.Connect = strConnect SetConnect = True Exit Function