Fout ?

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim wc As New Net.WebClient
        Dim CredCache As New Net.CredentialCache
        Try
            wc.DownloadFile("********/setup.exe", "c:\setup.exe")

        Catch
            MsgBox("Het is helaas niet mogelijk een update te downloaden. ")
        End Try
    End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim wc As New Net.WebClient
        Dim CredCache As New Net.CredentialCache
        Try
            wc.DownloadFile("********/setup.exe", "c:\setup.exe")
 
        Catch
            MsgBox("Het is helaas niet mogelijk een update te downloaden. ")
        End Try
    End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim wc As New Net.WebClient
    Dim CredCache As New Net.CredentialCache

    Try
        wc.DownloadFile("********/setup.exe", "c:\setup.exe")
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim wc As New Net.WebClient
    Dim CredCache As New Net.CredentialCache
 
    Try
        wc.DownloadFile("********/setup.exe", "c:\setup.exe")
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
End Sub