VB.NET Dropbox ile Form'u Güncelleme Sistemi

Public Class Form1

    Public Sub CheckForUpdates()

        Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("YOUR LINK HERE")
        Dim response As System.Net.HttpWebResponse = request.GetResponse()

        Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())

        Dim newestversion As String = sr.ReadToEnd()
        Dim currentversion As String = Application.ProductVersion

        If newestversion.Contains(currentversion) Then
            MsgBox("Yazılımınız güncel.")

        Else

            MsgBox("Hilenin Yeni Sürümü Çıktı Sizi İndirme Linkine Yönlendirecem.")
            System.Diagnostics.Process.Start("YOUR LINK HERE")

        End If
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        CheckForUpdates()
    End Sub
End Class