28-10-17, 08:20 PM
PHP كود :
Dim url As String = "http://............."
Dim length As Integer = 20 'Chars length'
Dim client As HttpWebRequest = WebRequest.Create(url)
Dim bytes(length - 1) As Byte
Dim stream As Stream = client.GetResponse().GetResponseStream()
Dim read As Integer = stream.Read(bytes, 0, bytes.Length)
Dim txt As String = System.Text.Encoding.UTF8.GetString(bytes)
MsgBox(txt)
