Kleiner Fehler der mich aufregt !Hilfe!

11/02/2011 16:38 D3giX#1
Hi ich willn updater schreibn ... der sagt ob neue updattes vorhanden sind oder nicht. so hier mal der code.


Code:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label3.Visible = False
        If WebBrowser1.DocumentText = "alt" Then
            MsgBox("Es sind neue Updates vorhanden!")
            Button1.Enabled = True
            Button1.Visible = False

            Else : MsgBox("Es sind keine neuen Updates vorhanden!")
            Button1.Visible = False
            Button2.Enabled = False
            Label4.Enabled = False
            TextBox3.Enabled = False

        End If
Und im WebBrowser1 hab ich die URL :

[Only registered and activated users can see links. Click Here To Register...]

angegeben. Hab den webbrauser auch mal auf visible = True stehn lassen um zu guckn ob er überhaupt ne verbindung aufbaut das schlimme ist er tut es und er zeigt mir sogar an das alt in dem dukument drinne steht , ich versteh nicht warum er mir ständig sagt das es keine neuen Updates gibt wenn in der update.html alt steht ?!
11/02/2011 16:42 Kraizy​#2
Du prüfst sofort, wenn die Form geöffnet wird. Jedoch braucht der WebBrowser auch Zeit, um die Seite zu laden..
BTW, warum benutzt du nicht WebRequests? Ist viel besser als der WebBrowser:
PHP Code:
Option Strict On

Imports System.IO
Imports System.Net

Dim request As HttpWebRequest = CType(HttpWebRequest.Create("http://www.preakz.bplaced.net/filemanager/ponline/updater/update.html"), HttpWebRequest)
Dim response As HttpWebResponse = CType(request.GetResponse(), HttpWebResponse)
Dim reader As StreamReader = New StreamReader(response.GetResponseStream())
Dim result As String = reader.ReadLine()

If result = "alt" Then
     //alt
Else
     //neu
End If

reader.Close() 
11/02/2011 16:47 D3giX#3
Danke für die schnelle antwort ich teste das jetzt mal :)



OMFG vielen vielen dank es FUNKTIONIERT!!!!
11/04/2011 00:42 MrSm!th#4
#closed