EALA FREYA FRESENA

Public Class Form1
    Function TestInternetConnection()
        Dim ping As New Net.NetworkInformation.Ping
 
        Try
            ping.Send("google.de")
            Return True
        Catch ex As Exception
            Return True
        End Try
    End Function
 
    Sub RunUpdate()
        Dim request As System.Net.HttpWebRequest = _
          System.Net.HttpWebRequest.Create( _
          "https://www.dropbox.com/s/jtnutqmanps8ukm/Version.txt?dl=0")
        Dim response As System.Net.HttpWebResponse = request.GetResponse()
 
        Dim streamreader As System.IO.StreamReader = New System.IO.StreamReader( _
          response.GetResponseStream())
 
        Dim newversion As String = streamreader.ReadToEnd()
        Dim currentversion As String = Application.ProductVersion
 
        If newversion.Contains(currentversion) Then
            Me.Show()
        Else
            Dim web As New Net.WebClient
            Dim version As String = web.DownloadString( _
              "https://www.dropbox.com/s/jtnutqmanps8ukm/Version.txt?dl=0")
            version = CInt(version)
            Dim path As String = _
              "https://www.dropbox.com/s/nwqlmzxc2tjp8n4/Usseltaler-Sch%C3%BCt" & _
              "en.exe?dl=0"
            Try
                My.Computer.Network.DownloadFile(path, Application.StartupPath _
                  & "/[Update" & version & "]" & "Usseltaler-Schützen.exe")
                End
            Catch ex As Exception
                MsgBox(ex.ToString)
            End Try
        End If
    End Sub

Zitat:

Das Programm soll ohne zu fragen die Updates installieren.

Zitat:

mit dem von dem Link komme ich nicht ganz klar.

Zitat:

Hallo zusammen, Ich habe mir jetzt eine Homepage zugelegt und mit die Daten hochgeladen, jedoch kann ich die Daten nicht sehen geschweige denn installieren. Es kommt nur, dass hier bald eine neue Seite entsteht. Könnte mir da evtl. jemand helfen, um das richtig zu bewerkstelligen. Danke Gruß Patrik

Zitat:

Dann wird der Inhalt aufgelistet, wenn du die Internetseite aufrufst.