• 締切済み
  • 暇なときにでも

access97について

access97について質問させていただきます。データベースを開くと、ツールのデータベースユーティリティーから最適化が選べるようになっていますが、これをツールバーから選ばずに、フォームのボタンをクリックする事によって実行させる事は可能でしょうか?なお、OSはWIN95を利用しています。よろしくお願い致します。

共感・応援の気持ちを伝えよう!

  • 回答数1
  • 閲覧数163
  • ありがとう数9

みんなの回答

  • 回答No.1
  • sdk
  • ベストアンサー率0% (0/0)

SendKeys を使って、メニューを呼び出す方法が簡単です。 修復: SendKeys "%TDR" 最適化: SendKeys "%TDC" 現MDBと異なるものを最適化する場合は、 下記 OptimizeDB_Remote にファイルパスを渡します。 Public Function OptimizeDB_Remote(strDbPath As String) On Error GoTo Err_OptimizeDB_Remote ' 最適化後のデータベースと同じ名前のファイルが ' 存在していないことを確認 If Dir("_tmp_.mdb") <> "" Then _ Sub_FileDelete "_tmp_.mdb" DBEngine.CompactDatabase strDbPath, "_tmp_.mdb" Sub_FileDelete strDbPath FileCopy "_tmp_.mdb", strDbPath Sub_FileDelete "_tmp_.mdb" Exit_OptimizeDB_Remote: Exit Function Err_OptimizeDB_Remote: MsgBox Err.Description Resume Exit_OptimizeDB_Remote End Function Sub Sub_FileDelete(str As String) On Error GoTo Err_Sub_FileDelete Kill str Exit_Sub_FileDelete: Exit Sub Err_Sub_FileDelete: MsgBox Err.Description Resume Exit_Sub_FileDelete End Sub

共感・感謝の気持ちを伝えよう!

関連するQ&A

  • ACCESSで容量が50MBになったので軽くしたい

    ACCESSでDBを作成したのですが、 容量が重く動作も重たいです。 中身は、テーブルが1万件~5万件のデータが4つと フォームが1つしかありません。 ツール→データベースユーティリティ→最適化 をしましたが、変わりません。 どうしたらいいのでしょうか。 宜しくお願いします。

  • 最適化について

    ACCESS超初心者のものです。 ACCESS97を使用しています。 設計していると、ファイルの大きさがどんどん大きくなってしまい 平気で5M位になってしまいます。 みなさんはどのように対処しているのでしょうか? [ツール][データベース ユーティリティ][最適化]をすると 1/5位になるので、メニューフォームに閉じるボタンを作り それを押すと、最適化してDBを終了するようなことはできるのでしょうか? 教えてください。

  • ACCESSのテーブルを削除した後のファイルサイズ

    ACCESS2002のテーブルをいくつか削除しました。削除後に「ファイル」「データベースプロパティ」でサイズを見ると削除前と変わりません。 データを削除すると当然サイズが小さくなると思ったのですが、変わりませんでした。 「ツール」「データベールユーティリティ」「最適化/修復」をするとサイズが小さくなりました。 WordやExcelなどと違って「最適化/修復」をしないとファイルサイズは小さくならないのでしょうか? また「最適化/修復」は具体的にどんな時に使うものでしょうか?

  • アクセスの最適化/修復コマンド

    アクセスの「ツール|データベースユーティリティ|最適化/修復」というコマンドですが、これってデータベースを開くたびに自動で行う事は出来ないのでしょうか? データを何も変更せずに閉じて開いて中を見ているだけですが、マクロを実行すると頻繁に「イベント プロパティに指定した式 クリック時でエラーが発生しました」というメッセージが出ます。最適化/修復をやればなおるのですが、いちいち面倒です。

  • ACCESSデータを削除してしまいました!!!!

    ACCESS2000を使用しています。 データの容量が大きくなったので、最適化を行なう為に、以下の手順でデータデースの最適化をしようとしました。 ツール→データベースユーティリティ→最適化/修復 しかし、「このデータを修復しますか」というようなメッセージが出てきて、「はい」をクリックし、その後「修復の必要はありません」というようなメッセージがでたので、「はい」をクリックし、あとはどのようなメッセージかはっきり覚えていないのですが、削除するような確認メッセージは出てこなかったので、「はい」を3回ほどクリックしました。 ところが、データがすっかり消えてしまいました!!! 一度削除されたデータを元に戻す方法を至急教えて下さい。よろしくお願い致します。 追伸:ごみ箱にはありませんでした。

  • Accessが不良です

    現在アクセスを使用しているのですが、正常に立ち上がりません。 起動時の設定をしているのですが、実行しないでアクセスだけが立ち上がります。    最適化を実行すると Microsoft Accessを終了できません。 OLEまたはDDEを使うVisual Basic モジュールを実行している時は、モジュールの実行を中断する必要があります。  というメッセージが出ます。 OSはXPで、ACCESSは2000です。 尚、パソコンは自作です。 ファイルサイズは 64MBあり、フォームの数はサブフォームをいれると50ぐらいあります。 よろしくお願いいたします。

  • ACCESSデータベース

    ACCESSデータベースで、ユーザーにデータベースの最適化、バックアップをとらせるためにはどうしたらよいですか? データベースではレコードの削除、作成が多く、容量がどんどん大きくなってしまいます。最適化、バックアップをユーザー自身でできれば…と思いますが、皆さんはどのようにしていますか?

  • 【Access97】最適化

    Access97でデータの編集作業(インポートや削除など)を繰り返した時は、定期的に”最適化”を実行しています。 毎回ツールバーから”最適化”を選ぶのが面倒なのでボタンを作ろうと思いましたが、マクロのアクション一覧に該当するものがありません。”最適化”をもっと簡単に実行できる方法はありませんか?

  • Access2003にあった最適化

    Access2003にあったフォームをクローズするとき毎回最適化を実行してクローズするという設定がありましたがAccess2007ではこの操作を実行(セット)する方法を教えてください。 よろしくお願いします。

  • Access2000でデータベースの最適化

    お世話になります。 Accessのマクロのコマンドで データベースの最適化をしたいのですが、 「マクロまたはVisual Basicコードの実行中に、開いているデータベースを最適化することはできません。」とういうエラーメッセージが出て最適化されません。 マクロの一連の流れの「最後」で、データベースの最適化をしたいと 思っていますが、具体的にどのようにすれば、 データベースの最適化を実行できるのでしょうか? 条件としては、最適化をVBAなどでするのではなく、  マクロのコマンド:データベースの最適化 でしたいと思っております。 「マクロのコマンド:データベースの最適化」があるので、 必ずできるはずだとおもうのですが、 何卒宜しくお願いします。

専門家に質問してみよう