189 8069 5689
其
成都创新互联公司专注于罗江网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供罗江营销型网站建设，罗江网站制作、罗江网页设计、罗江网站官网定制、小程序设计服务，打造罗江网络公司原创品牌,更为您提供罗江网站排名全网营销落地服务。
FileName
属性可以取到点击确定之后的完整路径地址，是带文件名的，再利用
System.IO.Path.GetDirectoryName()
方法就可以取到文件夹路径。
其
InitialDirectory
属性可以设置打开时默认指向的路径。
老实说不一定要webBrowser，这是Windows下载文件界面啊，不是VB.Net画出来的。
真的是做下载文件，WebClient.DownloadFile方法就足够了，调用方法后会自动弹出Windows下载任务窗口。
在VS.NET里也提供了一个com接口，可以直接调用迅雷的dll，下载文件可以让你自由选择是用迅雷下载还是通过Windows下载任务来执行下载。
webBroser下载文件
FileInfo file = new System.IO.FileInfo(Server.MapPath(path));
if (File.Exists(Server.MapPath(path)))
{
string name = Path.GetFileName(Server.MapPath(path));
//存在文件
Response.Clear();
Response.Buffer = false;
//通知浏览器下载文件而不是打开
Response.ContentType = "application/octet-stream";
//下载的文件名
Response.AppendHeader("content-disposition", "attachment;filename=" + name);
//文件的大小
Response.AppendHeader("Content-Length", file.Length.ToString());
Response.WriteFile(path);
}
介绍一个更简单的方法给你，从webbrowser获取点击的超连接，然后自由选择下载，先在引用里引用com组件
然后在点击事件中加代码
string url = webBrowser1.Document.Links[1].GetAttribute("href");
ThunderAgentLib.AgentClass agent = new ThunderAgentLib.AgentClass();//创建对象
agent.AddTask(url, "默认保存文件名", "C:\\默认路径", "", "", 1, 0, 5);
agent.CommitTasks2(1);//提交
我用的是C#代码，VB.NET大同小异
如果TextBox1.Text包括了路径文件名；
PictureBox1.Image.Save(TextBox1.Text)
在控件的属性窗口设置控件的绑定键就可以
在ApplicationSetting下的
PropertyBinding ， 这个属性可以打开一个表格对话框，凡是能绑定的控件属性都列出来了，你可以给Filename 选择或新建一个关键字。
可以用你上面的窗口查看新建的条目。
一个参考过程，你试试 这里写下一个过程为： insert into pub_infor values('1234',0x,'this is a sample') 然后读入图片： sp_textcopy @srvname = '.', @login = 'sa', @password = 'sa', @dbname = 'pubs', @tbname = 'pub_info', @colname = 'logo', @filename = 'c:\picture.bmp', @whereclause = " WHERE pub_id='1234' ", @direction = 'I' 读出为： sp_textcopy @srvname = '.', @login = 'sa', @password = 'sa', @dbname = 'pubs', @tbname = 'pub_info', @colname = 'logo', @filename = 'D:\picture.bmp', @whereclause = " WHERE pub_id='1234' ", @direction = 'O' 清空：update 表 set 列=null 最后注意事项：因为filename的字符长度只有30个：即： @filename varchar (30), 所以实际应用的时候最好改为255个，当含有比较长的路径的时候就会报错： ERROR: Augment 'xxx' unrecognize 还有参数的长度@exec_str varchar （255）也修改下比较好： 我改成了这样子： CREATE PROCEDURE sp_textcopy ( @srvname varchar (30), @login varchar (30), @password varchar (30), @dbname varchar (30), @tbname varchar (30), @colname varchar (30), @filename varchar (255), @whereclause varchar (40), @direction char(1)) AS DECLARE @exec_str varchar (400) SELECT @exec_str = 'textcopy /S ' + @srvname + ' /U ' + @login + ' /P ' + @password + ' /D ' + @dbname + ' /T ' + @tbname + ' /C ' + @colname + ' /W "' + @whereclause + '" /F ' + @filename + ' /' + @direction EXEC master..xp_cmdshell @exec_str 就只这样子了，感觉上T_SQL编程还是挺强大的，有时间应该好好学习下。 回答： 这里以SQL_server2000中的pubs数据库中的pub_info表为例来说说其中的过程：pub_info表包含：pub_id,logo,pr_info，其中logo属于image超长字段，应用存储过程奖图像存储在数据库的步骤包括： 1：首先：是插入一个列： 比如：insert into pub_infor values('1234',0x,'this is a sample')其中0x只是为了确保image字段不能为空：因为下面的存储过程：textcopy 用textcopy把图片或者文件拷贝到image类型字段之前，image类型的字段不能为空。先插入0x(或者0x0)到这个字段,然后就可以用textcopy了。 否则就会报这样的错误： ERROR: Text or image pointer and timestamp retrieval failed. 2：接下来建立存储过程： CREATE PROCEDURE sp_textcopy ( @srvname varchar (30), @login varchar (30), @password varchar (30), @dbname varchar (30), @tbname varchar (30), @colname varchar (30), @filename varchar (30), @whereclause varchar (40), @direction char(1)) AS DECLARE @exec_str varchar (255) SELECT @exec_str = 'textcopy /S ' + @srvname + ' /U ' + @login + ' /P ' + @password + ' /D ' + @dbname + ' /T ' + @tbname + ' /C ' + @colname + ' /W "' + @whereclause + '" /F ' + @filename + ' /' + @direction EXEC master..xp_cmdshell @exec_str 说明： 其中xp_cmdshell: 以操作系统命令行解释器的方式执行给定的命令字符串，并以文本行方式返回任何输出。授予非管理用户执行 xp_cmdshell 的权限。我自己的理解是: textcopy就像是一个dos命令：就是说实际的文件copy命令是类似操作系统执行的。
采纳哦
保存文件的步骤为：
关闭流，特别是写入流
关闭并保存文件
示例代码如下：
Imports System.Windows.Forms
Imports System.IO
Imports System.Text
Sub SaveFileDemo()
'打开文件。如果文件不存在则创建新的文件
Dim myFile As New IO.FileStream("d:\data.txt", _
FileMode.OpenOrCreate, _
FileAccess.Write)
'在文件末尾添加一行
Dim tw As New StreamWriter(myFile)
myFile.Seek(0, SeekOrigin.End)
tw.WriteLine("白刃格斗英雄连英模部队方队亮相阅兵")
'关闭流
tw.Close()
'关闭文件并保存文件
myFile.Close()
End Sub