Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidorUsei código VB6 para enviar o arquivo do meu computador e funcionou perfeitamente, sem erros, mas o arquivo não aparece na minha pasta de armazenamento
ESTE É O CÓDIGO QUE EU USEI :
Dim host_name As String
Ativado = Falso
MousePointer = vbHourglass
txtResults.Text = "Em andamento"
txtResults.SelStart = Len(txtResults.Text)
DoEvents
host_name = "ftp.drivehq.com"
Se LCase$(Left$(host_name, 6)) <> "ftp://" Então host_name = "ftp://" & host_name
inetFTP.URL = nome_do_host
txtLocalFile.Text="D:\TTT.TXT"
txtRemoteFile.Text="TEXT.TXT"
inetFTP.UserName = txtUserName.Text ' MEU NOME DE USUÁRIO
inetFTP.Password = txtPassword.Text ' MINHA SENHA
inetFTP.Execute , "Put " & _
txtLocalFile.Text & " " & txtRemoteFile.Text
O código funcionou perfeitamente, sem erros, mas ao verificar meus arquivos de armazenamento, não consegui encontrá-lo
POR FAVOR, SE HOUVER ALGUMA SOLUÇÃO OU CÓDIGO VB6 QUE EU POSSA USAR
OBRIGADO