タイトル : アプリケーションのコンポーネントで…例外が 投稿日 : 2012/10/02(Tue) 13:23 投稿者 : タダシ
Visual Basic 2010 アクセスデータベースのあるテーブルからSUM関数を使用してデータの合計を表示させるPGを作っています。そこで以下のようなエラーが発生します。 アプリケーションのコンポーネントでハンドルされていない例外が発生しました。 [続行]をクリックすると、アプリケーションはこのエラーを無視し、続行しようとします。 [終了]をクリックすると、アプリケーションは直ちに終了します。 アセンブリ'AS受入管理システム, Version=1.0.0.8, Culture=neutral, PublicKeyToken=null'から型 'ADODB.Fields ToInternal Fields Marshaler'を読み込めませんでした。 というエラーメッセージが出てきます。 コードは lsSqlSum = "SELECT Sum(数量) AS 数量の合計 FROM TMP_AS受入検査品一覧" lrsSum.Open(lsSqlSum, godDb, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockReadOnly) If lrsSum.BOF = True Then lblSuryo.Text = "数量: 0" Else lblSuryo.Text = "数量:" & Format(NzLng(lrsSum.Fields("数量の合計").Value), "#,##0") End If lrsSum.Close() エラーが発生している部分は「lrsSum.Fields("数量の合計").Value」この部分になります。 自分の開発環境では特に問題なく動作するのですが、 インストールディスクを作成して、他のパソコンにインストールし、動作させるとこのエラーが発生します。 色々調べたのですが、よくわかりません。 誰かご存知の方がいらしたら教えて下さい。 |