Dim Internet_ini As Net.WebClient = New Net.WebClient() Dim inid As String = "http://***/cats.ini" Dim Internet_rtf As Net.WebClient = New Net.WebClient() Dim rtf As String = "http://***/top.rtf" Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Internet_rtf.DownloadFile(rtf, Me.RichTextBox1.Text) Dim ini As String = Internet_ini.DownloadString(inid) End Sub