Ya no hace falta chavales. Gracias de todas formas. PAra quien le sirva la solución es la siguiente:
Código PHP:
Try
Dim UserName, Password, Direccion As String
UserName = "usuario"
Password = "password"
Direccion = "ftp://ftp.pagina.com"
Dim client As New System.Net.WebClient
client.Credentials = New System.Net.NetworkCredential(UserName, Password)
client.UploadFile("ftp://ftp.paginacom", "C:\Carpeta\Archivoasubir.zip")
MsgBox("Se subió el archivo")
Catch ex As Exception
MsgBox("No se puede subir el archivo " + ex.ToString)
End Try