Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Updater do Aplikacji innego wydawcy


Rekomendowane odpowiedzi

Opublikowano

Witajcie, potrzebuję zrobić updater, który będzie odczytywał dane ze strony, a następnie porównywał je z zapisanymi w pliku np. version.txt. Jeśli tekst się nie zgadza, to pobiera aplikację a następnie nadpisuje dane w pliku version.txt. Podpowie ktoś coś?

Edit: chodzi o stronę https://steelseries.com/engine

odczytywany ma być tekst ze stopki, "version:..."

Opublikowano

Mniej więcej coś takiego ?

 
Private Sub button1_Click(sender As Object, e As EventArgs)
Dim oldversion As String = File.ReadAllText("version.txt")
Dim newversion As String = ""
 
Dim request = DirectCast(WebRequest.Create("https://steelseries.com/engine"), HttpWebRequest)
 
Dim response = DirectCast(request.GetResponse(), HttpWebResponse)
 
Dim responseString = New StreamReader(response.GetResponseStream()).ReadToEnd()
 
Dim match As Match = Regex.Match(responseString, "Version: (.*?)" & vbCr)
If Not match.Success Then
Console.WriteLine("Version not found")
Else
newversion = match.Groups(1).Value
End If
 
If oldversion <> newversion Then
File.WriteAllText("version.txt", newversion)
startDownload()
End If
End Sub
 
Private Sub startDownload()
Dim thread As New Thread(Function() 
Dim client As New WebClient()
client.DownloadFileCompleted += New AsyncCompletedEventHandler(AddressOf client_DownloadFileCompleted)
client.DownloadFileAsync(New Uri("https://steelseries.com/engine/latest/windows"), "SteelseriesEngine.exe")
 
End Function)
thread.Start()
End Sub
 
Private Sub client_DownloadFileCompleted(sender As Object, e As AsyncCompletedEventArgs)
MessageBox.Show("Done")
End Sub
Opublikowano

Jak dokładniej to wkleić w visual studio? Widzę, że raczej jest ok w kodzie. Jestem zielony w pisaniu, więc jakbyś poprowadził "za rączke" byłbym bardzo wdzięczny

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...