¿Cómo cargar archivos a un ftp específico en vb?

La forma más sencilla es utilizar el procesamiento por lotes ftp, el código es el siguiente

abra app.path & "\ftpcmd.ftp" para obtener el resultado #1 'Crear un comando ftp archivo

imprimir #1, "abrir " & "IP" 'Abrir servidor ftp

imprimir #1, "usuario " & "nombre de usuario"

imprimir #1, "contraseña" y "contraseña"

imprimir #1, "lcd " y "ruta del archivo local" 'Especifique el directorio donde se encuentra el archivo local

imprimir #1, "put " & "nombre de archivo"

cerrar #1 'El archivo de comando frp está terminado

shell "ftp -n -s:" & app.path & "\ftpcmd.ftp" 'Llamar al sistema ftp y ejecutar el ftpcmd.ftp escrito arriba