ＡＤＯ接続でオートメーションエラー

解決

---

VB6.0でプログラムを作成し、ACCESS DBに接続する処理を作成しています。
今ままでは問題なく動作していたのですが、昨日からＤＢ接続時にエラーが出るようになりました。

' ADOのオブジェクト変数を宣言する
Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim sql As String


' 接続を確立する
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & DBNAME

上記の処理でエラーになり、エラー内容は
＃オートメーションです。
＃指定されたプロシージャが見つかりません。 

と出ます。

このエラーが出るＰＣはWindowsXP Home Edition FMV CE11WAで、他のＰＣでは問題なく動作します。
プログラムを作成しているＰＣも同じXPですが、このような現象は出ません。
ＶＢが動作するファイルが何か壊れているために起きるのでしょうか？
ＤＢ接続時に使うファイルとなると、msado25.tlbのファイルが関連するのでしょうか？

編集 削除

---

Xp は…いいとして Home Edition ってのがなぁ…(＾＾；)
>指定されたプロシージャが見つかりません
で検索したらどうも DLL が見つからない時に出ることが多いみたい
…ADODB で DLL と言えば MDAC ？…とかって単純すぎる発想かなぁ(汗)
http://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=10344&forum=7&2
↑こんなスレッドも引っかかったので試す価値はあると思います。
http://www.microsoft.com/japan/msdn/data/download.asp

編集 削除

---

MDAC2.6以降にはJetOLEDBプロバイダ等が含まれませんので、
WinXP（MDAC2.7相当）であれば、Jet4.0SP8を導入してみてください。
[HOWTO] Microsoft Jet 4.0 データベース エンジン用の最新の Service Pack の入手方法
http://support.microsoft.com/default.aspx?kbid=239114

編集 削除

---

MDAC2.6以降にはJetOLEDBプロバイダ等が含まれませんので、
WinXP（MDAC2.7相当）であれば、MDACとともにJet4.0SP8を導入してみてください。
[HOWTO] Microsoft Jet 4.0 データベース エンジン用の最新の Service Pack の入手方法
http://support.microsoft.com/default.aspx?kbid=239114

編集 削除

---

アドバイスありがとうございました。
まだ問題は解決できていませんが、皆さんのアドバイスをもとに、引き続き調査してみます。
本当にありがとうございました。

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。