\ DriveHQ Customer Support Forum \
已讀/回覆 : 76976/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 上傳檔案的功能


4/9/2010 18:18:55

  • DriveHQ Webmaster
  • (1098貼文)
主題: 回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器
回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器

抱歉,我們這裡不使用 Visual Basic,所以無法回答這個問題。希望其他人能幫您解答。

您不妨了解 DriveHQ 檔案管理器或 DriveHQ 線上備份。您可以將本機資料夾與遠端資料夾自動同步,或將檔案自動備份到 DriveHQ 線上儲存空間。


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

  • Friend
  • (1貼文)
主題: 回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器
回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器

我沒用 Visual Basic,但遇到了和她一樣的問題…一切正常,直到我輸入密碼,然後它就提示我密碼錯誤。真奇怪,我以前從來沒設定過密碼 


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

  • iipg
  • (1貼文)
主題: 回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器
回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器

您好,我想將所有資料夾上傳到我的蘋果伺服器,因為我現在想使用我的雲端硬碟帳戶作為備份


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

  • X-Man-Tactical
  • (2貼文)
主題: 回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器
回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器

 我實際上無法下載,但可以上傳。我還在編寫程式碼來檢查錯誤。


回覆
8/1/2014 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

涼爽的

經過 


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

  • ezaldeen1
  • (2貼文)
主題: 回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器
回覆:使用 Visual Basic 開發一個應用程式來上傳檔案到伺服器

您好,請問是否有可以用來將檔案上傳到DriveHQ的VB6程式碼?


回覆
22/1/2015 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代碼

謝謝

 


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

收藏並分享
快速回覆

Leading Cloud Surveillance service

Leading Enterprise Cloud IT Service Since 2003