プログラム間のデータ引き渡し

質問

ＶＢで作成した複数のプログラムを次々に渡り、その間発生した計算値を
使用したいのですが…
一つのプログラムで発生したデータは、テキストファイルとして保存され
次のプログラムに処理を移してそのデータを使用する、といった操作をしたいのです
Shell関数やCommand関数を使用すればできるのでしょうか？
アドバイスお願いします

回答No.1

KojiS · ベストアンサー

その複数あるプログラムを次々に呼び出すプログラムを作成するとわかりやすくなると思います。
Ａの処理が終わればＢを呼び出して、Ｂが終わればＣを呼び出すようなプログラムです。それぞれのプログラムは保存したテキストファイルを読むだけですが、プログラム引数にファイル名を指定すると若干汎用的になりますね。
終了タイミングの検出は Win32APIを使わないとわかりづらくなるでしょう。CreateProcess や GetExitCodeProcess等を調べると良いでしょう。Win32APIは使用を誤るとシステムが落ちてしまう場合があるので注意しましょう。

　Win32APIのヘルプを持っていない場合や VBの機能だけで実行したい場合は、ファイル処理のタイミングが難しいかもしれません。Ａでファイルを書き込みＡを終了する前にＢを呼び出して、Ｂも同様、という形を取るしかないでしょう。その場合はＯＳやシステムによっては若干の相性が出るかもしれません。

お礼

アドバイスありがとうございます
まずはプログラムを呼び出し渡っていくという操作から
やってみます
ＡＰＩ関数は使用したことがないので、ＭＳＤＮで検索しながら
勉強してみたいと思います

回答No.2

TAGOSAKU7

どもども 田吾作７です。
アプリ間の通信ですね。MSDNでATOMというのを検索してください。
複数のデータをアプリ間で受け渡すことが出来ます。
(ADDATOM,FINDATOMなどなど・・・)
それがいやならWINSOCKを使うという手もあります。
コントロールを一切使用したくないのであれば、たとえば

アプリＡとアプリＢにおいて
１．アプリＢにコマンドボタンを一つ用意する
２．そのコマンドボタンに「受け渡し用ボタン」というキャプションにしておく。

処理の流れとしては
３．アプリＡで計算を行う
４．アプリＢを起動する
５．アプリＢのハンドルを得る
wkWnd = FindWindow(アプリＢのキャプション)
６．アプリＢのコマンドボタンのハンドルを得る
'ボタンを探す
BtnHwnd = FindWindowEx( _
wkWnd , 0&, vbNullString, "受け渡し用ボタン"& vbNullChar)

７．アプリＢのコマンドボタンのキャプションを変更しちゃう
call SetWindowText(BtnHwnd , "計算で得た値" & vbNullChar)

８．アプリＢのボタンをボタンダウンとボタンアップをするようにする
Call SendMessage(BtnHwnd , WM_LBUTTONDOWN, 0, 0)
Call SendMessage(BtnHwnd , WM_LBUTTONUP, 0, 0)

８の処理を行うことにより、アプリＢは値を渡されたことを認識できるので、アプリＢのコマンドボタンのボタンアップ・もしくはダウンのイベント時に、値を受け取った時の処理のコードを書いたらいいと思いますよ。

途中に記してあるＡＰＩ関数や定数は、ＡＰＩビューワで探してくださいね。
でわでわ

お礼

アドバイスありがとうございます
具体例が書かれていたので、大変参考になりました
↓にも書いたとおり、ＡＰＩ関数を使用したことがないため
そこからの学習となります
複数のプログラムを渡るものは初めてなので、解らないことだらけです
でも、そういう方法はきちんと理解しておかなくてはダメですね
頑張ってみます