MS-DOSコマンドを実行し、結果を取得する - kurukuru-papaのブログ
' DOSコマンドを実行する ' 2008/12/22 新規作成 Public Sub U_Exec(cmd As String, resultArr As Variant) Dim wsh Dim exec Dim resultStr ' 前準備 Set wsh = CreateObject("WScript.Shell") Set exec = wsh.exec("%ComSpec% /c " & cmd) ' コマンド実行 Do While exec.Status = 0 DoEvents Loop ' 標準出力を取得する resultStr = exec.StdOut.ReadAll resultArr = Split(resultStr, vbCrLf) ' 後始末 Set exec = Nothing Set wsh = Nothing End Sub
サクラエディタでバッチファイルを書く - kurukuru-papaのブログ
背景 Windowsを使っていて、簡単ないくつかのコマンドを組み合わせてバッチファイルを作りたくなってきました。Windows上でバッチファイルを作成する場合は、バッチファイルをエディタで作成し、コマンドプロンプトを起動し、作成したバッチファイルを実行する。バッチファイルに問題があれば、再編集し、再実行するという流れになりますが、いくつかのウインドウを行ったり来たりして手間がかかります。 そこで、私が使用しているサクラエディタに注目していました。以前から、このエディタには外部コマンドを実行する機能があるのは知っていたのですが、まったく使用していませんでした。お手軽にバッチファイルを書くという観点で、サクラエディタを見た場合、どのような機能があるのか調べてみました。 外部コマンド実行機能 メニューの「ツール＞外部コマンド実行...」（Ctrl+F5）から編集中のバッチファイルを実行し、標準出
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
