类型：转载 责任编辑：asp.net 日期：2007/05/23
热门软件下载：
我的论坛，经常备份数据的，数据备份在一个固定目录下
但我经常需要登陆服务器后下载，好麻烦
我想知道用VB怎么做，直接对这个文件进行下载
当然我知道用户名和密码的,给代码最好
网友回答：
Private Sub Command1_Click()
Dim b() As Byte
Dim strURL As String
strURL = "http://www.csdn.net/images/homeimage/csdn.gif"
b() = Inet1.OpenURL(strURL, icByteArray)
Open "c:\csdn.gif" For Binary Access _
Write As #1
Put #1, , b()
Close #1
End Sub