Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("USERNAMEURL")
        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 = ""
        If newestversion.Contains(currentversion) Then
        Password()
        Else
        MessageBox.Show("There Was A Error", "ERROR")
        End If