VB 2010 : Mise à jour de mon application
racacax
Messages postés
117
Date d'inscription
Statut
Membre
Dernière intervention
-
racacax Messages postés 117 Date d'inscription Statut Membre Dernière intervention -
racacax Messages postés 117 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je suis entrain de créer une application. Pour l'instant, tout va bien mais j'aimerai que lorsque je publie une nouvelle version, un message comme quoi il y en a une s'affiche. Je créerai un fichier texte sur mon serveur qui indiquera le numéro de la dernière version.
Comment faire pour récupérer les données de mon fichier texte sur mon serveur ?
Je suis entrain de créer une application. Pour l'instant, tout va bien mais j'aimerai que lorsque je publie une nouvelle version, un message comme quoi il y en a une s'affiche. Je créerai un fichier texte sur mon serveur qui indiquera le numéro de la dernière version.
Comment faire pour récupérer les données de mon fichier texte sur mon serveur ?
A voir également:
- VB 2010 : Mise à jour de mon application
- Clé activation office 2010 gratuit - Télécharger - Sécurité
- Vb - Télécharger - Langages
- Word 2010 - Télécharger - Traitement de texte
- Vb cable - Télécharger - Audio & Musique
- Waptrick java football 2010 - Télécharger - Jeux vidéo
2 réponses
Bonjour,
Ceci devrait t'aider :
https://support.microsoft.com/en-us/help/301102
Il permet de lire le contenu d'une URL.
Ceci devrait t'aider :
https://support.microsoft.com/en-us/help/301102
Il permet de lire le contenu d'une URL.
racacax
Messages postés
117
Date d'inscription
Statut
Membre
Dernière intervention
17
Merci mais je n'arrive pas à l'utiliser.
racacax
Messages postés
117
Date d'inscription
Statut
Membre
Dernière intervention
17
>
racacax
Messages postés
117
Date d'inscription
Statut
Membre
Dernière intervention
j'ai trouvé mon bonheur ici : https://www.quent1.fr/2011/08/lire-une-page-web-en-vb-net/
Je n'arrive pas lancer le code automatiquement. Je suis obligé d'utiliser un bouton. Comment faire pour qu'il se lance automatiquement ?
Le code :
Le code :
Private Sub Workbook_Open()
Dim source As New System.Text.StringBuilder
Dim html As String = ""
Dim maximum As Integer
Dim request As HttpWebRequest = WebRequest.Create("http://forum-racacax.ga/allfrtv/allfrtvversion.txt")
Dim response As WebResponse = request.GetResponse()
Dim reader As StreamReader = New StreamReader(response.GetResponseStream())
Do
source.Append(reader.ReadLine() + vbCrLf)
Loop Until reader.ReadLine() Is Nothing
maximum = source.Length - 2
For i As Integer = 0 To maximum
html = html + source(i)
Next
reader.Close()
response.Close()
If html = "0.1 Alpha v2" Then
Else
If MsgBox("Une nouvelle version est disponible, voulez-vous la télécharger ?", vbYesNo + vbInformation, "Mise à jour") = vbYes Then
Process.Start("http://forum-racacax.ga/viewforum.php?f=69")
Else
End If
End If
End Sub