Discussion :

[Yashin51]

Bonsoir,

Je me permets de poster, car j'aurais besoin d'un éclaircissement. Je souhaite, comme beaucoup de poste que j'ai pu lire faire un launcher.
Le projet avance à mon rythme, n'étant encore que peu qualifié en VB.NET.

2 questions :

Je suis sur la partie mise à jour de mon launcher et mise à jour du jeu :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
 
Public Class LauncherAurora
    Dim MAJ As New WebClient
    Dim DerniereVersion As String = MAJ.DownloadString("mon fichier string sur mon serveur ftp")
    Dim CheckStatus As New tcpclient
    Dim VersionActuelle As String
_______________________________________________________________________________________
Private Sub LauncherAurora_load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            If My.Computer.Network.IsAvailable = True Then
                CheckUpdatesLauncher()
                CheckUpdatesJeu()
                CheckStatutServeur()
            End If
        Catch ex As Exception
        End Try
    End Sub
_________________________________________________________________________________________________
   Private Sub CheckUpdatesLauncher()
 
        VersionActuelle = VersionPose.Text
        If DerniereVersion = VersionActuelle Then
        Else
            MsgBox("Aurora Launcher n'est pas à jour !", vbOKOnly + MsgBoxStyle.Critical, "Mise à Jour Nécessaire")
            MiseaJourLauncher()
        End If
    End Sub
____________________________________________________________________________________________________
   Private Sub MiseaJourLauncher()
        VersionPose.Text = DerniereVersion
   End Sub

Je ne met là que la base du code, le plus épurée possible. Cela reste un code de base aussi.
Mon problème, c'est lié à la sauvegarde d'objet, ma valeur VersionPose.text dans mon label est modifié mais pas sauvegarder. Donc mon launcher est perpétuellement à mettre à jour.
Si vous pouviez m'orienter vers ou se situe le problème, je devrais bien y trouver une solution.

Par ailleurs, sur ce même sujet, la valeur, contenu dans mon fichier que je dl de mon ftp, se traduit sous forme "adresseserveur;valeur actuelle du launcher".
J'aimerais savoir s'il y a moyen de récupérer uniquement la valeur du launcher, pour remettre en forme cela dans le label en question.
Pour que je colle de label : "Le launcher est en version" "2.1.6"

Merci d'avance pour l'aide.

[ebastien]

Bonjour,

Concernant ta première question sur la sauvegarde d'une valeur, tu peux regarder du côté de My.Settings. Tu trouveras des infos sur le net (un tuto ici).

Pour ce qui est de récupérer la valeur de ta chaîne contenue après le point-virgule (si j'ai bien comprise la question), tu peux utiliser la méthode MaChaine.Split(';') qui te retournera un tableau de String. Il suffira pour toi de prendre le deuxième élément de ce tableau (indice 1).

[Yashin51]

Merci pour ta réponse.

Je souhaitais avoir la version actuelle dans un label et vérifier si la version de ce label est à jour et sinon lancer la mise à jour.

Avec le système de paramètres, j'arrive à une chose comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Dim VersionActuelle As String
 
MessageBox.Show("La version actuelle du launcher est : " & My.Settings.Miseajourlaunchervaleur, "Version du Launcher Aurora")
VersionActuelle = My.Settings.Miseajourlaunchervaleur
 
        If VersionActuelle = DerniereVersion Then
 
        Else
            MsgBox("Aurora Launcher n'est pas à jour !", vbOKOnly + MsgBoxStyle.Critical, "Mise à Jour Nécessaire")
 
 
    Private Sub LauncherAurora__FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        VersionActuelle = My.Settings.Miseajourlaunchervaleur
        My.Settings.Save()
    End Sub

Je supprime donc ma variable dans mon label et utilise une valeur qui se trouve dans ce paramètre setting. Ma question est donc la suivante, ne serait pas plus simple que je fasse disparaître la variable "VersionActuelle" du même coup et que j'utilise la valeur de My.Settings ou il y a t'il un risque de planter le process de mise à jour ultérieure ensuite ?


Je vais me pencher en détail sur la fonction Split.