• ベストアンサー

オートメーションエラーについて

こんにちは。palbanです。 現在VBからACCESSにデータを保存するシステムを作成しています。 VBからACCESSの接続にはADOを使用しています。 バージョンはVB6.0SP5,ACCESS2002です。 このシステムをAPI関数のSENDMESSAGEを使用して終了させているのですが、システム終了後以下のような メッセージがでます。 実行時エラー'-2147417848(80010108)': オートメーションエラーです。 起動されたオブジェクトはクライアントから 切断されました。 このエラーの回避方法をご存知の方ご教授願います。 私の方でも調査しましたが修正方法がどうしても わかりません。 宜しくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.3

WM_CLOSEもPostMessageで送るべきものですよ。 で、それでもだめだったら、 http://www.okweb.ne.jp/kotaeru.php3?q=282562 こちらがまっとうな方法だと思いますけど。

参考URL:
http://www.okweb.ne.jp/kotaeru.php3?q=282562

その他の回答 (2)

  • ykkw_2001
  • ベストアンサー率26% (267/1014)
回答No.2

エラーメッセージからは、ACCESSとの接続にからんでいるような気がしますね。 ADO関係のオブジェクトの解放など、終了時の順序を見直してみてはどうでしょうか? ADOもバージョンによって、サポート範囲がいろいろ違っていたような記憶があります。

  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.1

SendMessageをどのように使っているんですか? このAPIは関数名だけ書かれても・・・ WM_QUITを送っているんであれば、PostMessageで送ってみてください。

palban
質問者

補足

SendMassageはWM_CLOSEを使用しています。

関連するQ&A

  • オートメーションエラー (-2147417828)

    自社製のVBアプリを使用しているのですが、 OFFICE2003⇒OFFICE2000に変えたタイミングで 下記のエラ―が発生するようになりました。 何とか回避したいと思っております。 ご意見よろしくお願い致します。 【エラー内容】 オートメーションエラーです。このプロセスでは リモート呼び出しは許可されません。 【エラー番号】 -2147417828 ※OFFICEはアンインストールしてインストールという  手順で正しく入替えました。どちらのバージョンで  あっても他のマシンからは動作しています。

  • オートメーションエラー

    VBからExcelシート上のPictureBoxに画像を呼び込もうとしていますが、オートメーションエラーが出ます。 どうしてですか?Excel-VBAで同じ事をすると正常に動作します。 'Excel上にあるPictureBoxオブジェクトを取得 Set Image1 = xlSheet.OLEObjects("Image1").Object 'PictureBoxに画像を貼り付ける With Image1 .AutoLoad = True .AutoSize = False .PictureSizeMode = fmPictureSizeModeZoom .PictureAlignment = fmPictureAlignmentCenter .Picture = LoadPicture("C:\MyPicture\...\pict.bmp") ←ここでエラー! End With 開発環境 Win2000(SP2) + VB6.0(SP4) + Excel2000(SP2)

  • このオブジェクトには、オートメーションオブジェクト

    アクセス2010です。 アクセスでフォームにはめ込んでいるサブフォームのデータをフィルタしようとすると ---------------------------------------------------------------------------- このオブジェクトには、オートメーションオブジェクト’カテゴリ’は含まれません。 オブジェクトのプロパティを設定するか、 メソッドを実行するVisual Basicプロシージャを実行しようとしましたが これらのプロパティまたはメソッドが使用できません。 オートメーションオブジェクトでサポートされているプロパティまたはメソッドについては、 コンポーネントのドキュメントを参照してください。 ---------------------------------------------------------------------------- と言うエラーになります。 フォームにカテゴリと言うフィールドは紐づけてないのですが なぜこのエラーが発生するのでしょうか?

  • オートメーション エラーです

    win7 エクセル2010です。 ************************************************* Dim objIE As InternetExplorer Sub Sample1() Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.navigate "http://www.goo.ne.jp/" Call wait1 Set objIE = Nothing End Sub ************************************************* Sub wait1() Const READYSTATE_COMPLETE As Long = 4 Do Until objIE.readyState = READYSTATE_COMPLETE Loop Do While objIE.Busy = True DoEvents Loop End Sub ************************************************* だと うまく行きますが、 URLの部分の社内のURLにすると 実行時エラー-2147417848(80010108) 「オートメーションエラーです。起動されたオブジェクトはクライアントから切断されました」 になります。 社内のURLの拡張子は、aspxです。 ウォッチウインドウでobjIEをウォッチ式に登録すると objIE.navigate を過ぎると 中身が、<オートメーション エラーです。> になります。 これは社内のシステムの方でプロタクトがかかっているのでしょうか?

  • MSDEでオートメーションエラー

    環境:Ms Windows2000 sp1/Ms SQL Server2000/Ms Vb6.0/ ActiveReports Ver1.0J +Ver1.5J差分 上記の環境で作成したPGをMSDEの環境で実行したら「オートメーションエラー、起動したオブジェクトはクライアントから切断されました」のエラーが発生しました。 PGの内容は以下のとおり ・frmMainフォームから印刷範囲指定のfrmPrintをCALLし、 PrtRepというレポートを表示。 ・frmMain、frmPrint、PrtRepはクラスオブジェクト「CSeisanWk」をCALL ・「CSeisanWk」は「CSeisan」をCALLし、データベース にアクセスしている。 ・frmMain、frmPrint、PrtRepは「Esc」キーを押すと  Unload Meでフォームまたはレポートを閉じる ・1回目にfrmMainからfrmPrintを起動し、範囲指定後、 PrtRepを表示。PrtRepをEscキーで閉じ、frmPrintを Escキーで閉じる ・2回目にfrmMainからfrmPrintを起動し、範囲指定後、 PrtRepを表示。PrtRepをEscキーで閉じると、オートメーショ ンエラーが発生。 ・この状態で,PrtRepを範囲指定を変更して何度でも表 示可能。 ・ただし、frmPrintをESCキーにて閉じるとPGが終了してしまう(frmMainが閉じている) ・記述を「Unload frmMain、Unload frmPrint、Unload  PrtRep」に変更しても状況は変わらず。 ・クラスオブジェクトの開放の問題とおもい、オブジェクトの開放、DB切断、これらの記述をコメント化しても状況は  変わらず。 ・frmMainで「form KeyUp」イベントにブレイクポイントを置いて みたが止まらず。 ・MSDEでない環境ではこのエラーが起きない。 めちゃくちゃわかりにくい記述で申し訳ないのですが、 どなたかいい知恵を貸してください。

  • Access VBA から Outlook 呼び出しでオートメーション

    Access VBA から Outlook 呼び出しでオートメーションエラーが発生することがあります。 環境は Access 2003、Outlook 2003 で Access VBA で CreateObject 等を使い Outlook.Application オブジェクトの作成、もしくは GetObject を使って既存のインスタンスを取ろうとすると「オートメーションエラー システムコールに失敗」というエラーが出るときと、出ないときがあります。 具体的には前処理でテーブル作成クエリの実行を挟むとエラーが発生し、挟まないとエラーが発生しません。 オブジェクトの作成の仕方が悪いのかと思い、いろいろと試しましたが結果は同じでした。 テーブル作成クエリはリンクテーブルで覗いているテーブルをローカルのテーブルとして丸コピーしてくることを目的としており、結構サイズが大きく、作成にも少し時間がかかるものです。 どうも決定的な手がかりが見つからず困っております。何かアドバイスございましたらお聞かせください。よろしくお願いいたします。

  • EXCEL VBAのオートメーションエラーについて

    セル入力されたファイル名を順番に開いてファイル名の書いてあるファイルのデータを開いたファイルにコピーしていくもの作ったのですが、これだけをコマンドボタンから起動してもエラーは出ません。でも、3つのコマンドボタンがあり、最後の段階のボタンなので、段階をおってすすめると、実行時エラーで、「オートメーションエラーです。起動されたオブジェクトはクライアントから切断されました。」のメッセージが表示されます。その後はフリーズしてしまいます。 パソコンの空き容量などの影響なのか、それとも構文にまちがいがあるのかわからず困っています。 ファイルの内容がうまく説明できないのですが回答よろしくお願いします。

  • Visual Basic でサポートされていないオートメーションが変数で使用されてい

    「Visual Basic でサポートされていないオートメーションが変数で使用されています。」(Error 458)のVBエラーが発生しました。幾つかの原因を探ってはみましたが、分からず終いで困っています。

  • オートメーションサーバーはオブジェクトを・・・

    デスクトップPC(Vista-SP2)です。 XP-SP3からアップグレードしました。 メモリは4GBで、一応サクサク動いています。 ところで、コンパネのプログラムから「古いプログラムをこのバージョンのwindowsで使用」をクリックすると、「エラー:オートメーションサーバーはオブジェクトを作成できません」「URL:res://C:\Windows\system32\acprgwiz.dll/compatmode.hta」などというエラーメッセージが出ます。 どうすればよいのでしょうか。 OSがらみの変な設定はしていないつもりですが・・・。

  • エクセルでのオートメーションエラー

    たびたびお世話になっております。 excel2000のVBAでユーザーフォームを作成し、ユーザーフォーム上のコマンドボタンで処理を実行しています。処理はワークシート上の計算を実行したり、メールに添付し送信したり・・・です。この実行後にもう一度ユーザーフォームを開こうとすると、(ユーザーフォーム.show)まず、パス名が無効です、のエラー。ワークブックを保存し閉じようとすると(これもユーザーフォームのコマンドボタン)、オートメーションエラーです、となります。ユーザーフォームを閉じ、excelを終了しようとすると、EXCELは終了できません。となってしまいます。 なぜ?どーして?チンプンです。 ちなみにその後、もう一度同じワークブックを開こうとすると、使用中になり、 読取専用でしか開けません。 どうか、教えてください。

専門家に質問してみよう