\ DriveHQ Customer Support Forum \
Ler/Responder : 76789/7
  • 12padams
  • (1posts)
Criando um aplicativo em Visual Basic para enviar arquivos para um servidor

Ok, consigo baixar arquivos deste servidor usando

My.Computer.Network.DownloadFile("http://www.drivehq.com/webdav/12padams/test.txt", "c:/test.txt", "meu_nome_de_usuário", "minha_senha")

Mas não consigo fazer o upload funcionar usando este código:

My.Computer.Network.UploadFile("c:/vcredist_x86.log", "http://www.drivehq.com/webdav/12padams/test.txt", "meunomedeusuário", "minhasenha")

Não apresenta nenhum erro quando executo o programa (aparece um erro se eu digitar a senha errada), mas depois que termina de "enviar", o arquivo nunca aparece.

Será que estou enviando para o lugar errado?

Por favor, me ajude a conseguir enviar arquivos usando o Visual Basic.NET


04/09/2010 18:18:55

  • DriveHQ Webmaster
  • (1098posts)
Assunto: Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor
Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor

Lamentamos, mas não utilizamos Visual Basic aqui... portanto, não podemos responder a essa pergunta. Espero que alguém mais possa respondê-la.

Você pode querer dar uma olhada no DriveHQ FileManager ou no DriveHQ Online Backup. Você pode sincronizar automaticamente uma pasta local com uma pasta remota ou fazer backup automático dos seus arquivos no DriveHQ Online Storage.


Responder
08/09/2010 02:20:52

  • Friend
  • (1posts)
Assunto: Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor
Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor

Eu não uso Visual Basic, mas estou com o mesmo problema que ela... tudo funciona até eu digitar minha senha, aí aparece a mensagem de que a senha está errada. Engraçado, porque eu nunca defini uma senha antes 


Responder
30/11/2010 13:56:11

  • iipg
  • (1posts)
Assunto: Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor
Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor

Olá, gostaria de enviar todas as minhas pastas para o meu servidor Apple, pois agora desejo utilizar minha conta do DriveHQ como backup


Responder
19/05/2011 23:15:40

  • X-Man-Tactical
  • (2posts)
Assunto: Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor
Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor

 Na verdade, não consigo baixar, mas consigo enviar. Ainda estou programando para verificar o erro.


Responder
08/01/2014 05:04:14

  • X-Man-Tactical
  • (2posts)
Assunto: Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor
Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor

 Legal. Agora tudo está funcionando.

Olá, 2010!

"http://www.drivehq.com/webdav/12padams/test.txt"

Mas mude para isso e funcionará perfeitamente

ftp://ftp.drivehq.com\caminho\arquivo.txt

legal

por 


Responder
08/01/2014 05:19:33

  • ezaldeen1
  • (2posts)
Assunto: Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor
Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor

Olá... existe algum código VB6 que eu possa usar para enviar um arquivo para o DriveHQ?


Responder
22/01/2015 13:39:23

  • ezaldeen1
  • (2posts)
Assunto: Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor
Re: Criando um aplicativo Visual Basic para enviar arquivos para o servidor

Usei 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

 


Responder
10/04/2016 13:59:34

Adicionar aos favoritos e compartilhar
Resposta rápida

Leading Cloud Surveillance service

Leading Enterprise Cloud IT Service Since 2003