LiveUpdate. Downloads from web and updates multiple client files.

[adamm83]

Hey Woka,

I've been testing out the liveupdate and I have run into some problems:

1) Whenever I set the .SaveTo path to a subfolder of a drive, or any folder OTHER THAN the root path of a drive, I get a path not found error.

2) I have made a folder on my server (at {link removed}). This folder contains Updates.txt, with the necessary information in it, as well as 2 exe files that i would like to download in the liveupdate (which are referenced in the Updates.txt file. When I run the liveupdate, it seems to find the Updates.txt file properly, but doesnt seem to download anything, and it finishes with a successful message. No downloads though.

This is the code I changed in the liveupdate demo source you supplied with the zip file:

Form_load event:

Private Sub Form_Load()
    Set mobjLiveUpdate = New LiveUpdate
    mobjLiveUpdate.server = "www.acmdesigns.ca"
    mobjLiveUpdate.RemotePath = "clients/sss_lu/"
    mobjLiveUpdate.SaveTo = "C:\"
End Sub

AddProducts sub routine:

Private Sub AddProducts()
Dim x As Integer
Dim arrProducts() As String
x = 1
 
    With mobjLiveUpdate.Products
        .Clear
        Do Until GetSetting("TrinityScheduler", "LiveUpdate", x) = ""
            'arrProducts = Nothing
            arrProducts = Split(GetSetting("TrinityScheduler", "LiveUpdate", x), ";")
            .Add arrProducts(0), arrProducts(1), arrProducts(2)
            x = x + 1
        Loop
    End With
    
End Sub

The rest is the same as the demoUI code from the example vb project you made.

Any help would be appreciated! Thanks.