Dim FileURL as string = *insert file URL here*
Dim FileLocation as string = *insert file location + name here*
Dim web1 As System.Net.WebClient = New System.Net.WebClient
web1.DownloadFile(FileURL, Filelocation)
do If system.io.file.exists(FileLocation) then System.io.file.delete(FileLocation) end if loop
'500 = 500MS 1/2 a second :D
If My.Computer.Network.Ping("www.mpgh.net", 500) Then
MsgBox("Server pinged mpgh.net successfully.")
Else
'half a second to time out, increase to 1000 or 2000 depending on your needs
MsgBox("Ping request timed out.")
End If
My.Computer.Network.DownloadFile _
'from
("filelocationurl/yourfile.entenstion", _
'to
"filelocation\yourfile.extenstion")
My.Computer.Network.UploadFile( _ 'from "filelocation\file.extension", _ 'to , with trailing slash /, but no filename or extension, otherwise you will error "FileTargetUrl/")

Dim FileURL as string = "http://www.mpgh.net/forum/images/vuel/buttons/reply.gif"
Dim FileLocation as string = "C:\Users\Alex\Desktop\test.gif"
Dim web1 As System.Net.WebClient = New System.Net.WebClient
web1.DownloadFile(FileURL, Filelocation)
Dim FileURL As String = "http://www.mpgh.net/forum/images/vuel/buttons/reply.gif"
Dim FileLocation As String = "C:\test.gif"
Dim web1 As System.Net.WebClient = New System.Net.WebClient
web1.DownloadFile(FileURL, FileLocation)
web1.DownloadFile(FileURL, FileLocation)