Originally Posted by wtfiwantthatname
Ok. How is this advanced? It doesnt silently execute the file or hide it. It doesnt use BITS to download to prevent detection?
uh.... Yeah Use the BITS wrapper......BITS is a bad idea for a "smart" developer keeping the "Network" in mind.... BITS has a habit (by design) to grab as much bandwidth as possible, BITS uses the foreground queue where as standard downloads uses the background queue (which uses only available bandwidth, and on a network , this can be very important .
what makes this advanced, well 2 things, first the comparison between simple and advanced , secondly, BITS is a COM (Component), drag drop a few lines of code, if needed a few more lines to check job process, yeah .... very "advanced"
Simple :
Code:
Private Declare Function URLDownloadToFile Lib "urlmon" _
Alias "URLDownloadToFileA" (ByVal pCaller As Long, _
ByVal szURL As String, ByVal szFileName As String, _
ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
'inside a command click event or whatever
URLDownloadToFile 0, _
"http://www.yourwebsite.com/downloads/something.whatever", _
"C:\downloads\something.whatever", 0, 0
Code:
Ok Guys i will show you how to make and advanced file downloader. You will need:
Visual Basic 2008
A Brain
Ok Heres the TUT.
1. Make a new project named Advanved file downloader.
2. Add 2 buttons, a textbox, and a progress bar.
3. Name one button "Save As",and the other "Download"
4. Double click Save As and paste this code.
Code:
Dim save AsNew SaveFileDialog
save.Title = "Advanced Downloader"
save.ShowDialog()
TextBox1.Text = save.FileName
5. Double click Download and paste this code.
Code:
httpclient = New WebClient
Dim sourceurl = ("http://failblog.files.*********.com/2009/12/epic-fail-7-11-fail.jpg")
Dim filedir = TextBox1.Text
ProgressBar1.Minimum = "0"
ProgressBar1.Maximum = "100"
Try
httpclient.DownloadFileAsync(New Uri(sourceurl), (filedir))
Catch ex As Exception
'do nothing
EndTry
6. Now after the "end sub" of that code paste:
Code:
PrivateSub httpclient_DownloadProgressChanged(ByVal sender AsObject, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles httpclient.DownloadProgressChanged
ProgressBar1.Value = e.ProgressPercentage
EndSub
Note: This is the download percent
7. Now above PublicClass Form1 paste :
Code:
Imports System.Net
8. No under public class form 1 paste:
Code:
PrivateWithEvents httpclient As WebClient
Follow these steps correctly, run debug, select a save spot and download the picture. Make Sure To add .jpg to the end of you file name or else it will not show up as a picture.
Aight guys thats my TUT on how to make a basic downloader. Thank if you want more.
Good Job Bombsaway,
