Evo mog koda sa kojim mogu samo ZIP.RAR.JPG itd dakle odredjene Extenzije
Ako neko moze da mi pomogne.
Da me uputi :)
Dim myFTPaddress As String = "ftp://adresa.net/"
Dim myFTPuserName As String = "usr"
Dim myFTPuserPassword As String = "sifra"
Dim myFiles() As String = {"C:\test1.zip", "}
Dim sTemp As String = Nothing
For Each mySelectedFile As String In myFiles
sTemp = IO.Path.GetFileName(mySelectedFile)
My.Computer.Network.UploadFile(mySelectedFile, myFTPaddress & sTemp, myFTPuserName, myFTPuserPassword)
Next
MsgBox("File(s) fajl je poslat.", MsgBoxStyle.Information)
"Odupri se snagom svom i daj otpor svakom ko te neizazvan pozva u boj"