VBScript में एक GUID Outputting सभी पाठ के बाद यह

Question

मैं एक क्लासिक एएसपी आवेदन में इस्तेमाल के लिए एक GUID बना रहा हूं, TypeLib का उपयोग करके ध्यान नहीं देता। हालांकि, इस तरह GUID स्क्रीन पर लिखने के रूप में भी एक साधारण परीक्षण मुझे समस्याओं दे रहा है - यह GUID प्रिंट लेकिन सब कुछ के बाद यह (जैसे HTML टैग अतिरिक्त शब्द, कुछ भी) पर ध्यान नहीं देता।

यहाँ इस परीक्षण करने के लिए मौलिक कोड है:

Set typeLib = Server.CreateObject("Scriptlet.TypeLib") 
myGuid = typeLib.Guid 
Response.Write myGuid & " is the new GUID" 
Set typeLib = Nothing 

इस तरह {9DDB27D1-F034-41D7-Bb88-D0D811DB91CE} और बस हो गया कुछ प्रदर्शित करेगा; शेष पाठ को अनदेखा किया जाता है और लिखा नहीं जाता है। हालांकि, अगर मैं GUID मान को हार्ड-कोड करता हूं और इसे एक चर से संदर्भित करता हूं, तो शेष पाठ ठीक दिखाई देता है। मैंने प्रदर्शित करने से पहले स्ट्रिंग मान में स्पष्ट रूपांतरण करने का प्रयास किया है, लेकिन यह अभी भी होता है।

Answer 1

मैं अपने ही समस्या हल हो गए हैं लगता है .. यह पाठ के लिए कुछ अतिरिक्त जोड़ने था, इसलिए मैं नहीं था:

myGuid = Left(myGuid, Len(myGuid)-2) 

और यह अब ठीक आउटपुट। अजीब।

Answer 2

GUID एक struct और नहीं एक स्ट्रिंग है, तो आप एक स्ट्रिंग के रूप में यह उत्पादन के लिए एक ToString() विधि जोड़ने की जरूरत है।

https://msdn.microsoft.com/fr-fr/library/97af8hh4(v=vs.110).aspx

Response.Write myGuid.ToString("D") 

Answer 3

मैं इस

Function GetGuid() 
     Set TypeLib = CreateObject("Scriptlet.TypeLib") 
     GetGuid = Left(CStr(TypeLib.Guid), 38) 
     Set TypeLib = Nothing 
End Function 

Answer 4

की तरह कुछ का उपयोग यह कहते हैं एक vbNullChar या Chr (0) GUID के अंत में। बदलें (myGuid, Chr (0), "") इसे ठीक करेगा। बाएं या मध्य कार्यों का उपयोग करने से बेहतर।