Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > it.comp.lang.visual-basic > #19764

VB .NET update application

Newsgroups it.comp.lang.visual-basic
Date 2020-04-16 00:53 -0700
Message-ID <bfe82526-df33-408a-9192-e48d37e310cd@googlegroups.com> (permalink)
Subject VB .NET update application
From Marco75 <marcoporzi75@gmail.com>

Show all headers | View raw


Ciao,
nel mio progetto visual studio 2017 ho un timer che ogni tanto va a vedere se ci sono aggiornamenti dell'applicazione e se li trova avvisa l'utente e aggiorna.
In questi giorni lavoro da casa e ogni tanto la connessione WiFi si disconnette causando un errore nell'applicazione che viene chiusa per eccezione non gestita. In pratica, se manca la rete non può verificare l'aggiornamento e va in errore.

Qui il codice lanciato dal Timer, come faccio a gestire l'eccezione inserendo una MsgBox di avviso che la rete non c'è e poi riavvia l'app? Ho messo il codice in On Error GoTo ma ora mi compare il messaggio anche quando la rete è presente!

il timer lancia UpdateMyApplication

Public Sub UpdateMyApplication()

Dim fileReader As String
        Dim updateExist As Boolean = ApplicationDeployment.CurrentDeployment.CheckForUpdate

        fileReader = My.Computer.FileSystem.ReadAllText("\\NomeServer\Applicazioni Visual Studio\iUtility\Testo info versione.txt")
        If updateExist Then
            CercaAgg.Stop()
            MsgBox("Nuova versione rilevata!" & vbNewLine & vbNewLine _
                   & fileReader & vbNewLine & vbNewLine _
                   & "Click su OK ed attendere installazione aggiornamento...", MsgBoxStyle.OkOnly + MsgBoxStyle.Information, "Ricerca aggiornamenti...")
            ApplicationDeployment.CurrentDeployment.Update()
            MsgBox("Aggiornamento completato..." & vbNewLine _
                   & "premere OK per riavviare l'applicazione", MsgBoxStyle.Information + MsgBoxStyle.OkOnly, "Ricerca aggiornamenti...")
            Application.Restart()
        End If
End Sub

grazie
Marco

Back to it.comp.lang.visual-basic | Previous | NextNext in thread | Find similar


Thread

VB .NET update application Marco75 <marcoporzi75@gmail.com> - 2020-04-16 00:53 -0700
  Re: VB .NET update application Marco75 <marcoporzi75@gmail.com> - 2020-04-17 04:11 -0700

csiph-web