Pergunta : exemplo simples de transferência da lima de VB

Eu olhei diversos exemplos aqui e no Internet, todo parecem eles têm uma finalidade diferente. Para não mencionar a maioria de algum tipo do erro neles. Eu gostaria de transferir uma lima em um programa pequeno cada mês. Eu quero atear-lhe fogo com uma tarefa programada cada mês em um usuário assim que uma pessoa não tem que babysit o program. class= do

Resposta : exemplo simples de transferência da lima de VB

Poço que é algo o completley diferente:)  Eu não observei nenhum requirment credencial assim que sups-se que você apenas quis transferir de uma posição do URL.  Há um par maneiras diferentes de conetar a um ftp que eu gosto de usar os métodos de FtpWebRequest () desde que pode lhe dar um córrego 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 não ofuscante como FileStream
        Fwr não ofuscante como FtpWebRequest
        Dados não ofuscantes (4096) como o byte
        bytesRead não ofuscante como o inteiro = 1

        ftpUrl não ofuscante como a corda = “ftp://ftp.server.com:21/” 'ftp URL + porto
        ftpUser não ofuscante como a corda = “username”
        ftpPass não ofuscantes como a corda = “senha”
        ftpFile não ofuscante como a corda = “TEST/myfile.txt” 'dobrador/lima no usuário
        savePath não ofuscante como a corda = “C:\myfile.txt” 'excepto a posição

        ftpUrl = ftpUrl.Insert (ftpUrl.Length, ftpFile)
        fwr = FtpWebRequest.Create (ftpUrl)
        fwr. Credenciais = NetworkCredential novo (ftpUser, ftpPass)
        fwr. Método = WebRequestMethods.Ftp.DownloadFile
        fs = FileStream novo (savePath, FileMode.Create, FileAccess.Write, FileShare.Read)
        Fazer quando bytesRead > 0
            bytesRead = fwr.GetResponse.GetResponseStream.Read (dados, 0, dados. Comprimento)
            fs. Escrever (dados, 0, bytesRead)
        Laço
        fs. Fechar ()
        fs. Dispr ()
        fs = nada
        fwr = nada
Outras soluções  
 
programming4us programming4us