\ DriveHQ Customer Support Forum \
已读/回复 : 76988/7
  • 12padams
  • (1帖子)
用 Visual Basic 编写一个应用程序,用于将文件上传到服务器

好的,我可以使用以下命令从该服务器下载文件

My.Computer.Network.DownloadFile("http://www.drivehq.com/webdav/12padams/test.txt", "c:/test.txt", "myusername", "mypass")

但我用这段代码无法上传文件:

My.Computer.Network.UploadFile("c:/vcredist_x86.log", "http://www.drivehq.com/webdav/12padams/test.txt", "myusername", "mypass")

运行程序时没有出现任何错误(如果我输入错误的密码,它会报错),但是“发送”完成后,文件却始终没有出现。

我是不是发错地方了?

请帮我实现使用 Visual Basic.NET 上传文件的功能


2010/9/4 18:18:55

  • DriveHQ Webmaster
  • (1098帖子)
主题: 回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器
回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器

抱歉,我们这里不使用 Visual Basic,所以无法回答这个问题。希望其他人能帮您解答。

您不妨了解一下 DriveHQ 文件管理器或 DriveHQ 在线备份。您可以将本地文件夹与远程文件夹自动同步,或者将文件自动备份到 DriveHQ 在线存储空间。


回复
2010/9/8 2:20:52

  • Friend
  • (1帖子)
主题: 回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器
回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器

我没用 Visual Basic,但遇到了和她一样的问题……一切正常,直到我输入密码,然后它就提示我密码错误。真奇怪,我以前从来没设置过密码 


回复
2010/11/30 13:56:11

  • iipg
  • (1帖子)
主题: 回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器
回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器

您好,我想将所有文件夹上传到我的苹果服务器,因为我现在想使用我的云端硬盘帐户作为备份


回复
2011/5/19 23:15:40

  • X-Man-Tactical
  • (2帖子)
主题: 回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器
回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器

 我实际上无法下载,但可以上传。我还在编写代码来检查错误。


回复
2014/1/8 5:04:14

  • X-Man-Tactical
  • (2帖子)
主题: 回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器
回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器

 太好了,一切正常了。

嘿,2010!

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

但改成这样它就能正常工作了

ftp://ftp.drivehq.com\path\file.txt

凉爽的

经过 


回复
2014/1/8 5:19:33

  • ezaldeen1
  • (2帖子)
主题: 回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器
回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器

您好,请问是否有可以用来将文件上传到DriveHQ的VB6代码?


回复
2015/1/22 13:39:23

  • ezaldeen1
  • (2帖子)
主题: 回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器
回复:使用 Visual Basic 开发一个应用程序来上传文件到服务器

我使用 VB6 代码从我的电脑上传文件,上传过程一切正常,没有任何错误,但是文件没有显示在我的存储文件夹中

这是我使用的代码 :

Dim host_name As String

    已启用 = 否
    鼠标指针 = vbHourglass
    txtResults.Text = "正在运行"
    txtResults.SelStart = Len(txtResults.Text)
    DoEvents

    host_name = "ftp.drivehq.com"
    如果 LCase$(Left$(host_name, 6)) <> "ftp://" 则 host_name = "ftp://" & host_name
    inetFTP.URL = 主机名
txtLocalFile.Text="D:\TTT.TXT"

txtRemoteFile.Text="TEXT.TXT"


    inetFTP.UserName = txtUserName.Text '我的用户名
    inetFTP.Password = txtPassword.Text '我的密码

    inetFTP.Execute,"Put" & _
        txtLocalFile.Text & " " & txtRemoteFile.Text

 

代码运行正常,没有任何错误,但是当我返回检查存储文件时,却找不到该文件

请问是否有任何解决方案或可以使用的VB6代码

谢谢

 


回复
2016/4/10 13:59:34

收藏并分享
快速回复

Leading Cloud Surveillance service

Leading Enterprise Cloud IT Service Since 2003