Guten Morgen,
Ich habe vor mir einen Updater zu Schreiben . Ein Programm das vom Inhalt größer wird , und deswegen muss ich es updaten lassen .
Ich bekomme 3 Fehlermeldungen wie diese : "downloadstring" ist kein Member von "Web". , Die Variable "ex" verbirgt eine Variable in einem einschließendem Block.
Hier habe ich noch die Source und einen ScreenShot. Ich hoffe ihr könnt mir weiterhelfen.
Source :
Spoiler anzeigen
Mit freundlichen Grüßen
thelord189
Edit by Manschula: Code-Tag sowie Spoiler für bessere Lesbarkeit eingefügt!
Ich habe vor mir einen Updater zu Schreiben . Ein Programm das vom Inhalt größer wird , und deswegen muss ich es updaten lassen .
Ich bekomme 3 Fehlermeldungen wie diese : "downloadstring" ist kein Member von "Web". , Die Variable "ex" verbirgt eine Variable in einem einschließendem Block.
Hier habe ich noch die Source und einen ScreenShot. Ich hoffe ihr könnt mir weiterhelfen.
Source :
VB.NET-Quellcode
- Public Class Form1
- Function TestInternetConnection()
- Dim ping As New Net.NetworkInformation.Ping
- Try
- ping.Send("http://google.com")
- Return True
- Catch ex As Exception
- Return True
- End Try
- End Function
- Sub RunUpdate()
- If TestInternetConnection() = True Then
- Try
- Catch ex As Exception
- Dim version As String = Web.downloadstring("http://pfad/current_ver.txt")
- version = CInt(version)
- If version > CInt(lblversion.text) Then
- Try
- Dim path As String = "http://pfad.de/hello.exe"
- My.Computer.Network.DownloadFile(path, Application.StartupPath & "/[Update" & version & "]" & "hello.exe")
- MsgBox("Ein Update wurde erkannt und heruntergeladen!")
- Catch ex As Exception
- MsgBox(ex.ToString)
- End Try
- End If
- Catch ex As Exception
- 'nothing
- End Try
- End If
- End Sub
- Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
- TestInternetConnection()
- RunUpdate()
- End Sub
- Private Sub BetaBlueButton1_Click(sender As System.Object, e As System.EventArgs) Handles BetaBlueButton1.Click
- Me.Close()
- End Sub
- Private Sub BetaBlueButton5_Click(sender As System.Object, e As System.EventArgs) Handles BetaBlueButton5.Click
- Form2.Show()
- End Sub
- End Class
Mit freundlichen Grüßen
thelord189
Edit by Manschula: Code-Tag sowie Spoiler für bessere Lesbarkeit eingefügt!
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Manschula“ ()