دانلود یک فایل تکست

[MiladMR]

سلام
من میخوام یک فایل تکست چند کیلو بایتی از اینترنت دانلود کنم با ویژوال بیسیک
اگه میشه کمک کنید
یه سورس بزارید واسم که درست حسابی باشه

[alimanam]

با سلام

میخوای دانلود کنی ( در هارد ذخیره بشه ) یا فقط میخوای اطلاعات اون فایل رو مثلاً در یه تکس باکس نمایش بدی ؟ ( در این روش فایل در هارد دیسک ذخیره نمیشه )

[MiladMR]

فکر کنم روش دوم بهتره ... چون اگه توی هارد ذخیره کنم واسه اینکه معلوم نشه باید هیدن و سیستمیش کنم و وقتی خوندمش پاکش کنم

ولی اولویت با اونی هست که ساده و کم حجم تر باشه

[alimanam]

برای روش دوم از کد زیر میتونی استفاده کنی :

Imports System.IO
Imports System.Net

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim URL As String = "Your Link Here" ' For sample -->> http://www.yoursite.com/yourText_File.txt
Dim req As WebRequest = WebRequest.Create(URL)
Dim rsp As WebResponse = CType(req.GetResponse, HttpWebResponse)
Dim rdr As New StreamReader(rsp.GetResponseStream())
Dim result As String = rdr.ReadLine
TextBox1.Text = result
Catch ex As Exception
MsgBox(Err.Description, MsgBoxStyle.Exclamation)
End Try
End Sub

End Class

موفق باشید ./