Dim m_Uri as new Uri("\\Server\Pfad\Backup.bak")
Dim m_Filename as String = "C:\Download\Backup.bak"
 
Using m_Client As New System.Net.WebClient
m_Client.UseDefaultCredentials = False
m_Client.Credentials = New System.Net.NetworkCredential("Loginname", "Kennwort")
m_Client.DownloadFile(m_Uri, m_Filename)
End Using