Is there one for this? So the app is ready...how do i publish it so that users can download it and also be advised of Auto updates?
Sub DownLoadFileFromServer()
Dim client As WebClient = New WebClient
client.Credentials = New Net.NetworkCredential("username", "password")
Try
AddHandler client.DownloadProgressChanged, AddressOf client_ProgressChanged
AddHandler client.DownloadFileCompleted, AddressOf client_DownloadCompleted
Catch ex As Exception
MsgBox(ex.Message)
End Try
Try
Dim DownlaodFolder As String = FileName
'client.DownloadFileAsync(New Uri("ftp://ftp.xxxxxxxxxxxxxxxxxxxx/DB/xxx.jar"), "c:\cashbook\DB")
client.DownloadFileAsync(New Uri("ftp://ftp.xxxxxxxxxxxxxxxxxxxxDB/xxx.jar"), DownlaodFolder)
Catch ex As Exception
MsgBox("DB Download Error Line 11116 System Data is incomplete. Please call support " & ex.Message)
End Try
End Sub