Cuestión : ejemplo simple de la transferencia directa del archivo de VB

He mirado varios ejemplos aquí y en el Internet, todos parecen ellos tienen un diverso propósito. Sin mencionar la mayor parte de una cierta clase de error en ellos. Quisiera transferir un archivo en un pequeño programa cada mes. Quiero encenderlo con una tarea programada cada mes en un servidor así que una persona no tiene que cuid losar nin¢os el program. class= del

Respuesta : ejemplo simple de la transferencia directa del archivo de VB

Pozo que es algo el completley diferente:)  No noté ningún requirment credencial así que fue asumido que usted acaba de querer transferir de una localización del URL.  Hay unas par de maneras diferentes de conectar con un ftp que tengo gusto de usar los métodos de FtpWebRequest () puesto que puede darle una corriente para manipular.

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:

Fs dévil como FileStream
        Fwr dévil como FtpWebRequest
        Datos déviles (4096) como octeto
        bytesRead dévil como número entero = 1

        ftpUrl dévil como secuencia = “ftp://ftp.server.com:21/” 'ftp URL + puerto
        ftpUser dévil como secuencia = “username”
        ftpPass déviles como secuencia = “contraseña”
        ftpFile dévil como secuencia = “TEST/myfile.txt” 'carpeta/archivo en el servidor
        savePath dévil como secuencia = “C:\myfile.txt” 'excepto la localización

        ftpUrl = ftpUrl.Insert (ftpUrl.Length, ftpFile)
        fwr = FtpWebRequest.Create (ftpUrl)
        fwr. Credenciales = nuevo NetworkCredential (ftpUser, ftpPass)
        fwr. Método = WebRequestMethods.Ftp.DownloadFile
        fs = nuevo FileStream (savePath, FileMode.Create, FileAccess.Write, FileShare.Read)
        Hacer mientras que bytesRead > 0
            bytesRead = fwr.GetResponse.GetResponseStream.Read (datos, 0, datos. Longitud)
            fs. Escribir (datos, 0, bytesRead)
        Lazo
        fs. Cerrarse ()
        fs. Disponer ()
        fs = nada
        fwr = nada
Otras soluciones  
 
programming4us programming4us