[moin2010]

also das ist der code vom anderen prog:

Das ist das Form-Load Ereignis:

Me.Hide()
ShowDialog:
SaveFileDialog1.ShowDialog()
If SaveFileDialog1.FileName = Nothing Then
GoTo ShowDialog
End If
Pfad = SaveFileDialog1.FileName

Try
Me.Show()
httpclient = New WebClient
Dim URL As String = "http://meine-domain/ordner/ordner/programm.exe"
Application.DoEvents()
httpclient.DownloadFileAsync(New Uri(URL), Pfad)
Application.DoEvents()
Catch ex As Exception
MsgBox("Es ist folgender Fehler aufgetreten:" & vbNewLine & ex.ToString, MsgBoxStyle.Critical, "Es ist ein Fehler aufgetreten!")
End
End Try

Und das ist der code vom httpclient-downloadfilecompledet:

MsgBox("Die aktuelle Version wurde im angegebenen Verzeichnis gespeichert!", MsgBoxStyle.Information, "Erfolg")
Shell(Pfad)