VB 2010 DownLoad Manager Yapımı

Lethality

Yeni üye
Katılım
7 Nis 2012
Mesajlar
37
Tepkime puanı
0
Merhaba,

-2 Text Box
-2 Button
-2 Label
TextBox1 İndirilicek Yer.
TextBox2 Yüklenecek URL


Visual Basic 2010 TF-THT DownLoad Manager - YouTube


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
My.Computer.Network.DownloadFile(TextBox1.Text, TextBox2.Text, "", "", True, "90", False)' 90 Orayı alçaltırsanız İNDİRME Bastığınızda 20 ise 20 sn bekler. False Bunu True yaparsanız İndirmeyi Göstermez eğer False Olursa İndirmeyi Gösterir...
MsgBox("Dosya indirimi başarılı", MsgBoxStyle.Information, "Başarılı")

End Sub

--------------

Private Sub Button2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

TextBox1.Text = ("")
TextBox2.Text = ("")
End Sub

--------------
 
Son düzenleme:
Kendin resim atıp gösterseydin iyi olurdu,
+Sağol.
 
Geri
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.