Imports System.Runtime.InteropServices
public class DownloadAFile
Private Declare Function DoFileDownload Lib "shdocvw.dll" (ByVal lpszFile As String) As Integer
Public Shared Sub Main
Try
DoFileDownload("www.rntsoft.com")
Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString())
End Try
End Sub
End Class