ACCESS2007のコマンドライン引数に関して

いつも大変お世話になっております。

コマンドプロントからaccessファイルを起動させて、/cmd以下の数字を起動したフォームのテキストボックス内に入れたいのですが、なかなかうまくいきません。

起動コマンドは、
"C:\Program Files\Microsoft Office\Office12\MSACCESS.EXE" C:Users\admin\Desktop\text.accdb /cmd 1
として、アクセスファイルの起動には成功しています。

つたない説明ですが、ご教授頂ければと思います。

No.1 回答者： piroin654 回答日時： 2010/12/30 14:32

以下。

http://www.accessclub.jp/bbs5/0028/vba8533.html

この回答への補足

ご回答ありがとうございます。

どうも、私が勘違いをしていたみたいで、/cmdでは、数字を指定したテキストボックスへ入れることはできないようですね。

補足日時：2010/12/30 16:58

No.2 ベストアンサー 回答者： nicotinism 回答日時： 2010/12/30 20:09

Acc2007 は持ち合わせておりませんので、あしからず。

提示された起動コマンドを実行後
Alt + F11 でVBE の画面にして
Ctrl + G にてイミディエイトウィンドウで
?command を実行
1 が返ってくるのを確認してから
お望みのフォームのOpen時イベントに
Me!テキストコントロール名 = Command
と記述すればファームが立ち上がったときに入っているかと？
検証できる環境ではありませんので、ここまで。

この回答へのお礼

ご回答ありがとうございます。

無事にテキストボックスへ数字を入れることができました。

お礼日時：2010/12/31 14:30

No.3 回答者： piroin654 回答日時： 2010/12/30 23:13

#1です。

リンク先の下のほうにCommandについて
説明と使い方が簡単にありますが、#2さんの方法でも、あるいは
テキストボックスのコントロールソースに
=Command()
とすればコマンドラインの値がテキストボックスに
入ります。
たとえば、以下はVBSの場合ですが、

Option Explicit
CreateObject("WScript.Shell").Exec """C:\Program Files\Microsoft Office\Office12
\MSAccess.Exe""" & _
"""C:Users\admin\Desktop\text.accdb""/x """ & "m1" & """ /cmd """ & 1 & """"

これはマクロm1(フォームを開くマクロ)を実行し、
数値の1を引き渡します。引き渡された1は
フォームを開くと自動的にテキストボックスに
表示されます。cmd、x　の順番のほうが早いかも
しれません。

この回答へのお礼

度々のご回答ありがとうございます。

無事に解決しました。

お礼日時：2010/12/31 14:30