Question

如何将仅包含域名的字符串转换为完全限定的URL？

示例：

google.com应为http://www.google.com
https://google.com应保持原样

Answer 1

    Dim str As String = "google.com" 'assign this to whatever your real url is....
    If str.IndexOf("http://") <0 And str.IndexOf("https://") <0 Then
        str = "http://www." & str
    End If

请注意，这适用于URL，因为该模式不可能在网址中出现两次，但是对于其他字符串，您应该小心使用此方法......

    Dim str As String = "google.com" 'assign this to whatever your real url is....
    If str.Contains("http://") = false And str.Contains("https://") = false Then
        str = "http://www." & str
    End If

另一种方法，与其他字符串相同的潜在陷阱。

    Dim str As String = "google.com" 'assign this to whatever your real url is....
    If str.StartsWith("http://") = False And str.StartsWith("https://") = False Then
        str = "http://www." & str
    End If

另一种方式......这可能是最安全的方法。

Answer 2

我使用了这个功能：

Private Function MakeURL(url As String)
    If url.StartsWith("http://") = True Or url.StartsWith("https://") = True Then
        Return New Uri(url)
    Else
        Dim StrResult As String = url
        StrResult = "http://www." & StrResult
        Debug.Print(StrResult)
        Return New Uri(StrResult)
    End If
End Function

将域名转换为URL字符串

2 个答案: