6

私は 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

4

1 に答える 1

5

コマンド名を間違って入力したため、スクリプトは機能しません。それsubstは ではなくsubstrです。

于 2011-03-22T15:27:29.587 に答える