هذا هو الكود المستخدم :
كود PHP:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Clickcheckforupdates()End SubPublic Sub checkforupdates()TryDim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://www/Updater/Updater.txt")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.ProductVersionIf newestversion.Contains(currentversion) ThenMessageBox.Show(" ")ElseMessageBox.Show(" ")System.Diagnostics.Process.Start("http://www/Updater/Updater.exe")End IfCatch ex As ExceptionEnd TryEnd Sub
[/PHP]