मैं अपने वेब ब्राउज़र में विजुअल स्टूडियो में लिंक कैसे खोलूं और विजुअल स्टूडियो में नहीं?

Question

यदि कोई स्रोत फ़ाइल टिप्पणी में कोई URL है, तो मैं "CTRL + लिंक का पालन करने के लिए क्लिक कर सकता हूं।" हालांकि, जब मैं ऐसा करता हूं, लिंक विजुअल स्टूडियो के अंदर खुलता है। मैं इसे अपने वेब ब्राउज़र में कैसे खोल सकता हूं - मेरे मामले में, Google क्रोम?

Answer 1

एक ऐसा एक्सटेंशन है जो Open in External Browser नामक इस व्यवहार को प्रदान करता है। यह दृश्य स्टूडियो 2012, 2013 2015 और 2017 में काम करता है

धन्यवाद इस इस समान प्रश्न के his answer में उनका कहना है के लिए Dmitry को जाता है (एक पुराने संस्करण available on GitHub विजुअल स्टूडियो 2010 का समर्थन करता है)।

संपादित करें: विजुअल स्टूडियो टीम आखिरकार विजुअल स्टूडियो में यह अधिकार डालने पर काम करना शुरू कर रही है। this सुविधा अनुरोध की स्थिति बस "समीक्षा अधीन" से "प्रारंभ" में स्थानांतरित हो गई।

Answer 2

वीएस -2008 में, बस लिंक पर राइट क्लिक करें और "बाहरी विंडो में लिंक खोलें" का चयन करें। आपको क्रोम को अपने डिफ़ॉल्ट ब्राउज़र के रूप में चुनना होगा।

Answer 3

मुझे इसके लिए कोई सेटिंग नहीं मिल सका इसलिए मैंने एक साधारण मैक्रो लिखा जिसे आप उपयोग कर सकते हैं। आप इसे सभी मैक्रोज़ की तरह एक कुंजी-कॉम्बो से बांध सकते हैं। जब तक हमें बेहतर उत्तर नहीं मिल जाता तब तक यह काम पूरा हो जाएगा।

Sub OpenURLInChrome() 
    'copy to end of line 
    DTE.ActiveDocument.Selection.EndOfLine(True) 

    'set var 
    Dim url As String = DTE.ActiveDocument.Selection.Text 

    'launch chrome with url 
    System.Diagnostics.Process.Start(_ 
     Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) _ 
     + "\Google\Chrome\Application\chrome.exe", url) 
End Sub 

बस यूआरएल के सामने अपना कर्सर रखें और मैक्रो चलाने ...

Answer 4

यह mracoker से ऊपर सुझाए गए मैक्रो पर एक सुधार है।

यह मैक्रो वर्तमान रेखा पर एक यूआरएल की तलाश करता है और पिछले उत्तर के रूप में यूआरएल के बाद टेक्स्ट कैप्चर नहीं करता है।

Sub OpenURLInChrome() 

    ' Select to end of line 
    DTE.ActiveDocument.Selection.EndOfLine(True) 
    Dim selection As TextSelection = DTE.ActiveDocument.Selection 

    ' Find URL within selection 
    Dim match = System.Text.RegularExpressions.Regex.Match(_ 
     selection.Text, ".*(http\S+)") 

    Dim url As String = "" 
    If (match.Success) Then 
     If match.Groups.Count = 2 Then 
     url = match.Groups(1).Value 
     End If 
    End If 

    ' Remove selection 
    selection.SwapAnchor() 
    selection.Collapse() 

    If (url = String.Empty) Then 
     MsgBox("No URL found") 
    End If 

    ' Launch chrome with url 
    System.Diagnostics.Process.Start(_ 
     Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) _ 
     + "\Google\Chrome\Application\chrome.exe", url) 
End Sub 

उपयोग करने के लिए: URL से पहले कहीं कर्सर रखें; मैक्रो चलाएं (मैंने Ctrl-Shift-G में मैप किया है)