VBScriptでコマンドライン出力を取得する(ファイルに書き込むことなく)

StackOverflow https://stackoverflow.com/questions/5393345

質問

私はvbscriptを使用していますが、私の目標は、私の選択のパスにドライブレターを置き換えることができることです。 Dドライブが必要です。利用できない場合は、既に適切な場所にマッピングされているかどうかを確認する必要があります。次に、そうでない場合はユーザーに通知します。私はこれを見つけました: http://technet.microsoft.com/en-us/library/ee156605.aspx そして、私は彼らの2番目の例を適応させようとしています:

Set objShell = WScript.CreateObject("WScript.Shell")
Set objExecObject = objShell.Exec("cmd /c ping -n 3 -w 1000 157.59.0.1")
Do While Not objExecObject.StdOut.AtEndOfStream
    strText = objExecObject.StdOut.ReadLine()
    If Instr(strText, "Reply") > 0 Then
        Wscript.Echo "Reply received."
        Exit Do
    End If
Loop

(私の適応):

Set objShell = WScript.CreateObject("WScript.Shell")
Set objExecObject = objShell.Exec("cmd /c substr")
strText = ""

Do While Not objExecObject.StdOut.AtEndOfStream
    strText = strText & objExecObject.StdOut.ReadLine()
Loop

Wscript.Echo strText

その後、Dドライブがマッピングされている場所を示す文字列を検索するでしょう。私も試しました objShell.Exec("subst"), 、しかし、私はまだ出力を取得していません。誰かが私が間違っていることについて何かアイデアを持っていますか?または、ドライブマッピングについて伝えるためのより良い方法はありますか?ありがとう、

213897

役に立ちましたか?

解決

コマンド名を間違えたので、スクリプトが機能しません - それは subst, 、 いいえ substr.

ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top