वीबीस्क्रिप्ट में कमांड लाइन आउटपुट प्राप्त करना (फ़ाइलों को लिखने के बिना)

Question

मैं वीबीस्क्रिप्ट का उपयोग कर रहा हूं, और मेरा लक्ष्य मेरे चयन के पथ के लिए ड्राइव लेटर को प्रतिस्थापित करने में सक्षम होना है। मुझे डी ड्राइव की ज़रूरत है, और यदि यह उपलब्ध नहीं है तो मुझे यह जांचने की ज़रूरत है कि यह पहले से ही सही जगह पर मैप किया गया है या नहीं; तो उपयोगकर्ता को सूचित करें यदि यह नहीं है। मैं इस पाया: http://technet.microsoft.com/en-us/library/ee156605.aspx और मैं अपने दूसरे उदाहरण के अनुकूल करने के लिए कोशिश कर रहा हूँ:

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 

तब मैं शायद स्ट्रिंग है जो बताता है कि जहां विकास ड्राइव के लिए खोज करेंगे मैप किया गया है मैंने objShell.Exec("subst") भी कोशिश की है, लेकिन मुझे अभी भी कोई आउटपुट नहीं मिला है। क्या किसी के पास कोई विचार है कि मैं क्या गलत कर रहा हूं? या ड्राइव मैपिंग के बारे में बताने का एक बेहतर तरीका है? धन्यवाद,

Answer 1

क्योंकि आप आदेश नाम ग़लत टाइप किया आपकी स्क्रिप्ट काम नहीं करता है - यह subst, नहीं substr है।