[リストへもどる]
一括表示
投稿時間：2002/12/04(Wed) 15:50
投稿者名：べる
Ｅメール：
ＵＲＬ　：
タイトル：読取り専用
コマンドボタンでアクセスのデータベースファイルを開いています。
コードは
    On Error Resume Next
    MyFile1 = "\\Kameoka\access危安協\危険物安全協会\安全協会.mdb"
    MyFile = MyFile1
    If StrComp(Right$(MyFile1, 3), "mdb", 1) = 0 Then
        MyFile2 = "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE"
        MyFile1 = Chr$(34) & MyFile1 & Chr$(34)
        MyFile2 = Chr$(34) & MyFile2 & Chr$(34)
    End If
    Name MyFile As MyFile
    If Err.Number Then
        MsgBox "ファイルは使用中です。"
        Err.Clear
    Else
        ret = Shell(MyFile2 & MyFile1, vbMaximizedFocus)
    End If
上記のように書いています。この『ファイルは使用中です。』のメッセージのところを
読み取り専用にしてファイルを開かせたいのですが、読取り専用でファイルを開くには
どうしたらいいでしょうか？

投稿時間：2002/12/04(Wed) 17:07
投稿者名：魔界の仮面弁士
Ｅメール：
ＵＲＬ　：
タイトル：Re: 読取り専用
> 読み取り専用にしてファイルを開かせたいのですが、読取り専用でファイルを開くには
> どうしたらいいでしょうか？

コマンドライン オプションで指定可能です。


/ro
  読み取り専用で開く。

/excl
  排他モードで開く。

/user ユーザー名
  指定したユーザー名でAccessを起動する。

/pwd パスワード
  指定したパスワードを使用してAccessを起動する。

/profile ユーザープロファイル
  ユーザープロファイル設定を使用してAccessを起動する。
  なお、このオプションを指定した時は、標準のレジストリ設定は無視される。

元データベース /compact 最適化先データベース
  データベースを最適化する。
  最適化先のデータベースを省略すると、元データベース名が利用される。

/repair
  データベースを修復する。Access2000以上では/compactと同義。

変換元データベース名 /convert 変換先データベース名
  以前のバージョンのデータベースを変換する。

/x マクロ名
  Access起動時に、指定したマクロを自動的に実行する。

/nostartup
  スタートアップダイアログを表示せずにAccessを起動する。

/wrkgrp ワークグループ情報ファイル
  ワークグループ情報ファイルを使用してAccessを起動する。

/cmd コマンド値
  ここに指定した「コマンド値」が、VBAのCommand 関数に渡される。
  このオプションはコマンドラインの最後に指定する必要がある。
  なお、セミコロン「;」やスラッシュ「/」を指定したい場合は、
  それらの文字を2回続けて記述する必要がある。

; コマンド値
  /cmd オプションと同義。

投稿時間：2002/12/06(Fri) 08:29
投稿者名：べる
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: 読取り専用
コマンドオプションというのがわからないです。
初心者なのでどこで指定したらいいかわかりません。

投稿時間：2002/12/07(Sat) 09:04
投稿者名：A221
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: 読取り専用
> コマンドオプションというのがわからないです。
> 初心者なのでどこで指定したらいいかわかりません。

http://yougo.ascii24.com/gh/61/006110.html
とか、
http://www.atmarkit.co.jp/fwin2k/operation/command001/command1.html
を、読んでください。

投稿時間：2002/12/09(Mon) 15:35
投稿者名：べる
Ｅメール：
ＵＲＬ　：
タイトル：Re^4: 読取り専用
> http://yougo.ascii24.com/gh/61/006110.html
> http://www.atmarkit.co.jp/fwin2k/operation/command001/command1.html

見ましたがいまいちよくわかりません。
Dir (MyFile2 & MyFile1) / ro
このコードで実行してみたのですが普通に開くだけで読取り専用になりません。

投稿時間：2002/12/10(Tue) 13:37
投稿者名：A221
Ｅメール：
ＵＲＬ　：
タイトル：Re^5: 読取り専用
> 見ましたがいまいちよくわかりません。

MS-DOSとかUNIXとか使用されたことがないのですね。

Shell("C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE C:\db1.mdb /ro")
こうなります。

この先は参考です。

１．アクセサリからコマンドプロンプトを起動して、
C:\>
ってでたら、
２．下記のコマンドでディレクトリが移動します。（Windows流ならフォルダです。）
    CD C:\Program Files\Microsoft Office\Office10
３．さらにコマンドを入力します。（この場合起動するファイル名）
    MSACCESS.EXE C:\db1.mdb /ro

これで読み取り専用で起動できましたか？

投稿時間：2002/12/11(Wed) 10:53
投稿者名：べる
Ｅメール：
ＵＲＬ　：
タイトル：Re^6: 読取り専用
> これで読み取り専用で起動できましたか？

読み取り専用で開く事ができました。ありがとうございます。
ただコマンドラインのことについてはよくわからないので
もう少し勉強しようと思います。