³ÌÐòº¯Êý¼Ç¼
<br><br>

 Public Function GetData(ByVal url As String, ByVal data As String) As String<br>
        Try<br>
            Dim request As HttpWebRequest = WebRequest.Create(url + "?" + data)<br>
            request.Method = "GET"<br>
            Dim sr As StreamReader = New StreamReader(request.GetResponse().GetResponseStream)<br>
            Return sr.ReadToEnd<br>
        Catch ex As Exception<br>
            Return ""<br>
        End Try<br>
    End Function<br>

<br><br>
<a href="https://beian.miit.gov.cn/">ÁÉICP±¸2020014480ºÅ-1</a>