vb.net updater funktioniert nicht(anfänger)

[Dogukan47]

Hey

ich habe versucht für meinen bot einen updater zu machen
der code sieht so aus :

PHP Code:

Imports System.Net, System.Net.NetworkInformation
Public Class Form1
    Dim ServerVersion As String
    Dim Web As New Net.WebClient


    Function TestinternetConnection()

        Dim myPing As New Net.NetworkInformation.Ping
        Dim buffer As Byte() = New Byte(31) {}
        Dim timeout As Integer = 3000
        Dim pingOptions As New PingOptions()
        Dim hostip1 As String = "www.google.de"
        Dim reply_host1 As PingReply = myPing.Send(hostip1, timeout, buffer, pingOptions)

        Try
            myPing.Send(hostip1)
        Catch ex As Exception
            'nothing
        End Try

        If reply_host1.Status = IPStatus.Success Then
            Return True
        ElseIf reply_host1.Status = IPStatus.TimedOut Then
            Return False
        ElseIf reply_host1.Status = IPStatus.BadDestination OrElse reply_host1.Status = IPStatus.BadOption Then
            Return False
        End If
    End Function

 Function CheckForUpdates()
        ServerVersion = Web.DownloadString("https://www.dropbox.com/s/agqpo870dy2r48q/Version.txt?m")
        If CInt(ServerVersion) > CInt(lblVersion.Text) Then
            Return True
        Else : Return False
        End If
    End Function


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As 
        If TestinternetConnection() = True And CheckForUpdates() = True Then
            MsgBox("Eine Neue Version ist verfügbar klicken sie auf Download.", MsgBoxStyle.Information, "Newest version = " & ServerVersion & "  //  Clientversion = " & lblVersion.Text)

        End If

    End Sub 


leider geht der nicht und ich weis nicht wo der Fehler ist beim load von form1 öffnet sich nichtmal eine msgbox

[Kraizy​]

setz nen haltepunkt und schau woran es liegt

[Dogukan47]

das zeigt er mir an :



()

[Kraizy​]

Aha, na das sagt natürlich unheimlich viel aus xD
Geh deinen Code schrittweise durch, da deine MsgBox nur bei True kommt, schaust du einfach nach an welcher Stelle False zurückgegeben wird in deiner Funktion. Aber deinen Ping-Befehl finde ich sowieso unnötig.

[Dogukan47]

Originally Posted by Kraizy​

Aha, na das sagt natürlich unheimlich viel aus xD
Geh deinen Code schrittweise durch, da deine MsgBox nur bei True kommt, schaust du einfach nach an welcher Stelle False zurückgegeben wird in deiner Funktion. Aber deinen Ping-Befehl finde ich sowieso unnötig.

ok wieso findest du den befehl unnötig?^^

[snow]

Was machst du, wenn Google offline ist?
Es reicht doch, wenn du die .txt ausliest, wenn die Verbindung offline ist, hast du keinen Wert -> Int-Wert (oder was auch immer Cint macht) ist 0 -> aktuelle Version größer -> Kein Update-Prompt.

[Dogukan47]

Originally Posted by snow911

Was machst du, wenn Google offline ist?
Es reicht doch, wenn du die .txt ausliest, wenn die Verbindung offline ist, hast du keinen Wert -> Int-Wert (oder was auch immer Cint macht) ist 0 -> aktuelle Version größer -> Kein Update-Prompt.

glaub aber nicht, dass google jemals offline sein wird

[Kraizy​]

Lass einfach dein Ping weg..sollte keine Verbindung bestehen wird sowieso ne Exception geworfen, somit auch kein Update möglich. Dann kannst auch ne MsgBox ausgeben lassen, dass es ein Problem beim Update-Check gab.