Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
创新互联公司是专业的肃宁网站建设公司，肃宁接单;提供成都做网站、网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行肃宁网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
sub command1_click()
R= URLDownloadToFile(0,"
, "c:\1.exe", 0, 0)
end sub
下载，直接通过url读取文件，然后Response.OutputStream.Write()数据
下面提供个下载的静态方法，是C#的，供参考：
/// summary
/// 下载文件
/// /summary
/// param name="fileName"下载的文件名称（包括扩展名）/param
/// param name="filePath"下载文件的绝对路径/param
public static void DownFile(string fileName, string filePath)
{
//打开要下载的文件，并把该文件存放在FileStream中
System.IO.FileStream Reader = System.IO.File.OpenRead(filePath);
//文件传送的剩余字节数：初始值为文件的总大小
long Length = Reader.Length;
HttpContext.Current.Response.Buffer = false;
HttpContext.Current.Response.AddHeader("Connection", "Keep-Alive");
HttpContext.Current.Response.ContentType = "application/octet-stream";
HttpContext.Current.Response.Charset = "utf-8";
HttpContext.Current.Response.AddHeader("Content-Disposition", "attachment; filename=" + System.Web.HttpUtility.UrlEncode(fileName));
HttpContext.Current.Response.AddHeader("Content-Length", Length.ToString());
byte[] Buffer = new Byte[10000];//存放欲发送数据的缓冲区
int ByteToRead; //每次实际读取的字节数
while (Length 0)
{
//剩余字节数不为零，继续传送
if (HttpContext.Current.Response.IsClientConnected)
{
//客户端浏览器还打开着，继续传送
ByteToRead = Reader.Read(Buffer, 0, 10000); //往缓冲区读入数据
HttpContext.Current.Response.OutputStream.Write(Buffer, 0, ByteToRead);
//把缓冲区的数据写入客户端浏览器
HttpContext.Current.Response.Flush(); //立即写入客户端
Length -= ByteToRead;//剩余字节数减少 }
else
{
//客户端浏览器已经断开，阻止继续循环
Length = -1;
}
} //关闭该文件
Reader.Close();
}
QQ：121一九五五121
Dim strPath As String = Server.MapPath("xxx/xxx.xxx") '这里是你的文件路径以及名称后缀名，使用相对路径即可,不过记得路径最好是英文，用中文是否连接不到我就不知道了，记得是"/"哦！ Page.Response.Clear() Page.Response.AddHeader("Content-Type", "text/xml") Page.Response.AddHeader("Content-Disposition", "attachment;filename=") Page.Response.WriteFile(strPath) Page.Response.End() 路径的话你可以使用变量的 所以这样一来需要下载的文件就会相当灵活 顺便附送一个删除文件的方法 System.IO.File.Delete(Server.MapPath("xxx/xxx.xxx")) 不过删除文件跟写文件是一样的 需要WEB服务器开启可写功能！、 好用的话记得给分哦 嘿嘿！
给你一个遍历所有盘符下的文件夹的例子加一个遍历文件的就可以了。TreeNode node = new TreeNode("我的电脑"); treeView.Nodes.Add(node); //加入一个我的电脑节点 string[] drivesName = System.IO.Directory.GetLogicalDrives() //取得驱动器列表的集合 foreach(string name in drivesName) //用foreach遍历集合 { TreeNode drivesNode = new TreeNode(name); node.Nodes.Add(drivesNode); //加到我的电脑节点下 }
My.Computer.Network.DownloadFile("", "D:\s.bat", "ftp账号", "ftp密码", True, 100, True)
下载文件的话你要到这个名称空间找都这个函数
System.Net.WebClient.DownloadData(ByVal
String)
As
Byte(
)
--下载资源
DownloadData：
Public
Function
DownloadData(ByVal
address
As
String)
As
Byte(
)
System.Net.WebClient
的成员
摘要:
以
System.Byte
数组形式通过指定的
URI
下载资源。
参数:
address:
从中下载数据的
URI。
返回值:
一个
System.Byte
数组，其中包含下载的资源。
异常:
System.Net.WebException:
通过组合
System.Net.WebClient.BaseAddress
和
address
所构成的
URI
无效。-
或
-
下载数据时发生错误。
System.NotSupportedException:
该方法已在多个线程上同时调用。
System.Net.WebClient.DownloadFile(ByVal
String,
ByVal
String)
--下载文件
DownloadFile：
Public
Sub
DownloadFile(ByVal
address
As
String,
ByVal
fileName
As
String)
System.Net.WebClient
的成员
摘要:
将具有指定
URI
的资源下载到本地文件。
参数:
address:
从中下载数据的
URI。
fileName:
要接收数据的本地文件的名称。
异常:
System.Net.WebException:
通过组合
System.Net.WebClient.BaseAddress
和
address
所构成的
URI
无效。-
或
-
filename
为
null
或
System.String.Empty。-
或
-文件不存在。-
或
-
下载数据时发生错误。
System.NotSupportedException:
该方法已在多个线程上同时调用。
重庆分公司
重庆分公司
