使いやすいように設計された Microsoft リレーショナル データベース管理システムのファミリ。
現象が発生している環境にトラブルがあるのでは?と、脊髄反射で想像してしまいます。
この辺から切り分けを進められては?
なんにしてもRuntimeではデバッグできないから、一時的にでも製品版で試してみてはどうかなと思います。
このブラウザーはサポートされなくなりました。
Microsoft Edge にアップグレードすると、最新の機能、セキュリティ更新プログラム、およびテクニカル サポートを利用できます。
OS:windows_xp
Access Version:2007
よろしくお願いします。
現在マスタデーターベースを
ネットワーク共有スペースに置き
ワークデーターベースにデータを取得して処理ができるだけかぶらない
設定でワークデーターベースを作成しました
ワークデータベース各ユーザー(計5人)に配布しランタイム上で動かしています。
4人はデーターベースが正常に動くのですが、1台のみ強制終了されてしまいます。
ネットワーク環境・PC状態もさほど他4台とかわりはありません。
ただ、残りの1台にはOFFICE2010をこの間インストールしたので
もしかしたら原因はそのあたりなのか?
それとも参照設定が2010になってしまうと違うものもしていしなくてはいけないのか?
この状況できりわけられる原因と解決策が思い浮かぶ方が
居りましたらどうか助けていただけませんでしょうか?
よろしくお願いします
使いやすいように設計された Microsoft リレーショナル データベース管理システムのファミリ。
ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。
現象が発生している環境にトラブルがあるのでは?と、脊髄反射で想像してしまいます。
この辺から切り分けを進められては?
なんにしてもRuntimeではデバッグできないから、一時的にでも製品版で試してみてはどうかなと思います。
その通りです。
実際にはエラー時の時は、「エラーです」という私が仕込んだエラーメッセージが
表示されるようになっているのですが、
実際に動作を行うと「アプリケーションを~」メッセージ後 強制終了されます。
下記のプログラムを動作した場合
Dim db As New ADODB.Connection
Set db = CurrentProject.Connection
Dim sql As String
On Error GoTo 終了処理
sql = "DELETE * FROM ww_エクスポート表;"
db.Execute sql
sql = "DELETE * FROM w_TMC_入力_基本;"
db.Execute sql
sql = "DELETE * FROM w_研修;"
db.Execute sql
sql = "INSERT INTO ww_エクスポート表 SELECT エクスポート表.* FROM エクスポート表;"
db.Execute sql
sql = "INSERT INTO w_TMC_入力_基本 SELECT M_TMC_入力_基本.* FROM M_TMC_入力_基本;"
db.Execute sql
sql = "INSERT INTO w_研修 SELECT C_研修.* FROM C_研修;"
db.Execute sql
DoCmd.OpenForm "関与先一覧_毎月前処理"
Exit Sub
終了処理:
db.Close
MsgBox "エラーが起こりました。"
Exit Sub
他プログラムでも同様に
Dim db As New ADODB.Connection
Set db = CurrentProject.Connection
を使用してデータ操作するボタンはすべてダメです。
強制終了されてしまいます。
こんにちは。これはどういう状態でしょうね。
Runtime環境/Runtimeモードの場合デバッグモードに移行しないから、実行時エラーダイアログの表示後にアプリケーションは終了するのですが、エラートラップも効かないということでしょうか。