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

Aggiornamento applicazione

X-Received	by 2002:a5d:4e12:0:b0:21b:ae89:73e7 with SMTP id p18-20020a5d4e12000000b0021bae8973e7mr5365596wrt.386.1656079839297; Fri, 24 Jun 2022 07:10:39 -0700 (PDT)
X-Received	by 2002:a81:2f84:0:b0:314:2bfd:bf1f with SMTP id v126-20020a812f84000000b003142bfdbf1fmr16612376ywv.320.1656079838645; Fri, 24 Jun 2022 07:10:38 -0700 (PDT)
Path	csiph.com!news.mixmin.net!proxad.net!feeder1-2.proxad.net!209.85.128.87.MISMATCH!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups	it.comp.lang.visual-basic
Date	Fri, 24 Jun 2022 07:10:38 -0700 (PDT)
Injection-Info	google-groups.googlegroups.com; posting-host=176.56.137.5; posting-account=yvxj_woAAABxrxq8XihQzP-tWUWpycQc
NNTP-Posting-Host	176.56.137.5
User-Agent	G2/1.0
MIME-Version	1.0
Message-ID	<dbe5815e-c265-4c76-ba38-84060d7c5210n@googlegroups.com> (permalink)
Subject	Aggiornamento applicazione
From	Marco75 <marcoporzi75@gmail.com>
Injection-Date	Fri, 24 Jun 2022 14:10:39 +0000
Content-Type	text/plain; charset="UTF-8"
Content-Transfer-Encoding	quoted-printable
Xref	csiph.com it.comp.lang.visual-basic:19976

Show key headers only | View raw

Ciao,
sto lavorando con Visual Studio 2019 e ho impostato le proprietà di ClickOnce.
oltre a questo, ho un timer che gira e ogni x minuti verifica se ci sono aggiornamenti dell'app. Se li trova apre un form con le info della versione e dopo l'ok dell'utente chiude e aggiorna. 
Questa modalità ha sempre funzionato ma dopo l'ultimo rilascio allo scadere del timer chiede di chiudere l'app anche se non ci sono aggiornamenti! (non mostra neanche il form con le info versione).

il codice che parte ogni X minuti è il seguente, magari c'è qualche errore o si può gestire meglio, di seguito il codice. Consigli?
grazie
Marco

Public Sub UpdateMyApplication()
        Try

Dim updateExist As Boolean = ApplicationDeployment.CurrentDeployment.CheckForUpdate

If updateExist Then
                CercaAgg.Stop() 'Fermo il timer

MessageBox.Show("Nuova versione rilevata!" & vbNewLine & vbNewLine _
                        & rtbInfoVersione.Text & vbNewLine & vbNewLine _
                        & "Click su OK ed attendere installazione aggiornamento...", "Ricerca aggiornamenti...", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1, MessageBoxOptions.ServiceNotification)

                ApplicationDeployment.CurrentDeployment.Update()
                MsgBox("Aggiornamento completato..." & vbNewLine _
                   & "premere OK per riavviare l'applicazione", MsgBoxStyle.Information + MsgBoxStyle.OkOnly, "Ricerca aggiornamenti...")
                Application.Restart()
            End If

Catch ex As Exception 
            MsgBox(ex.Message)
Finally
            Application.Restart()

        End Try

Back to it.comp.lang.visual-basic | Previous | Next | Find similar

Thread

Aggiornamento applicazione Marco75 <marcoporzi75@gmail.com> - 2022-06-24 07:10 -0700

csiph-web