यदि कनेक्शन विफल हो जाता है, तो MsgBox "कोई उपलब्ध कनेक्शन नहीं है।" किस कनेक्शन को 'कनेक्शन विफल' होना चाहिए?

अगर-क्‍लॉज में 'कनेक्‍शन फेल' को किस कमांड से बदला जाना चाहिए?

createobject("wscript.shell").run "Rasdial connection_name account_name password",0

If connection fails, then 
MsgBox "There is no available connection."
End If

windows-10 connection vbscript

— मैथ्यू वाई
स्रोत

रन के लिए उपयुक्त वापसी मूल्य जो एक त्रुटि का संकेत देगा।

— सेठ

मैं रिटर्न वैल्यू का पता कैसे लगा सकता हूं?

— मैथ्यू वाई

उस मान से वापसी मान को एक चर में सहेजें और चर का मूल्यांकन करें। डिबगिंग उद्देश्यों के लिए आप इसे प्रदर्शित भी कर सकते हैं।

— सेठ

रिटर्न मान बचाने के लिए क्या है?

— मैथ्यू वाई

चर को कैसे संभालना है, यह जाने बिना आप इसे कैसे प्रयोग करने योग्य बनाने की उम्मीद कर सकते हैं? आखिरकार आपको इसका मूल्यांकन करने के लिए वापसी मूल्य के लिए कुछ तर्क के साथ आना होगा। जैसा कि मैंने कहा कि आप एक चर का उपयोग करेंगे। हो सकता है कि एक स्पष्टीकरण जोड़ने पर विचार करें कि आपका वास्तविक लक्ष्य क्या है और आपने रिटर्न वैल्यू पाने की कोशिश कैसे की है? देखें: विलियम्स की घोषणा

— सेठ

पढ़ें रन विधि (विंडोज स्क्रिप्ट होस्ट) ;

एक नई प्रक्रिया में एक कार्यक्रम चलाता है।

वाक्य - विन्यास
object.Run(strCommand, [intWindowStyle], [bWaitOnReturn]) 
तर्क

object - WshShell ऑब्जेक्ट।

strCommand- स्ट्रिंग मान उस कमांड लाइन को इंगित करता है जिसे आप चलाना चाहते हैं। आपको निष्पादन योग्य फ़ाइल में पास होने के लिए कोई भी पैरामीटर शामिल करना होगा।

intWindowStyle- वैकल्पिक। कार्यक्रम की खिड़की की उपस्थिति का संकेत इंटर्गर मूल्य। ध्यान दें कि सभी प्रोग्राम इस जानकारी का उपयोग नहीं करते हैं।

bWaitOnReturn- वैकल्पिक। बूलियन मूल्य यह दर्शाता है कि स्क्रिप्ट को आपकी स्क्रिप्ट में अगले कथन को जारी रखने से पहले प्रोग्राम को निष्पादित करने के लिए इंतजार करना चाहिए या नहीं। तो करने के लिए सेट सच , स्क्रिप्ट निष्पादन जब तक कार्यक्रम खत्म रुकती है, और Runरिटर्न कार्यक्रम द्वारा लौटाए गए किसी भी त्रुटि कोड । यदि गलत (डिफ़ॉल्ट) पर सेट किया जाता है , तो Runप्रोग्राम शुरू करने के तुरंत बाद विधि वापस आ जाती है, स्वचालित रूप से वापस लौटती है 0(त्रुटि कोड के रूप में व्याख्या नहीं की जानी चाहिए)।

अगला कोड स्निपेट आपके लिए काम कर सकता है:

retValue = createobject("wscript.shell").run ( _
      "Rasdial connection_name account_name password",0 , True)

If retValue <> 0 then
    MsgBox "There is no available connection."
End If

— JosefZ
स्रोत

बिंगो! ठीक यही मैं चाहता हूं। यह पूरी तरह से काम करता है, हालांकि मैं बदलना पड़ा # 0करने के लिए <> 0। बहुत बहुत धन्यवाद, जोसेफ। ईमानदार होने के लिए, मैं ऊपर सेठ द्वारा सुझाए गए लेख को समझने के लिए बहुत बेवकूफ हूं।

— मैथ्यू वाई