shell関数を用いて、cmdを実行のログ取得

れんれん  2007-11-16 15:27:06  No: 99733  IP: 192.*.*.*

shell関数を用いて、cmdを実行でDOSプロンプトで。exeを実行します。

DOSプロンプトの実行ログとかエラーログ（黒い画面の文字）
をVBで取得したです。

どうすればよいのでしょうか？

編集 削除
魔界の仮面弁士  2007-11-16 16:48:46  No: 99734  IP: 192.*.*.*

> をVBで取得したです。
「取得したです。」とは?
「取得したのです。」の意味…では無さそうですので、
「取得したいのです。」の意味でしょうか。


Shell に拘らないなら、WshExec オブジェクトを使うとか。

  Dim oExec As Object
  With CreateObject("Wscript.Shell")
    Set oExec = .Exec("cmd.exe /c ipconfig.exe")
    Debug.Print oExec.StdOut.ReadAll
  End With


Shell 関数でやるなら、"cmd 〜.exe > log.txt" のようにして
実行結果をテキストファイルにリダイレクトして、それを読むとか。


以下おまけ。

http://homepage2.nifty.com/nihon-nouen/programming-stdinout.htm
http://scripting.cocolog-nifty.com/blog/2006/09/vb6excel_vbawin_4acb.html
http://support.microsoft.com/kb/171654/ja
http://support.microsoft.com/kb/173085/ja
http://www.koalanet.ne.jp/~akiya/vbtaste/vbp/#else02

編集 削除