vb点虐 保存流 vbnet recordset

请问VB点虐 中如何保存BMP/jpg图像

我理解你

丰润网站建设公司创新互联建站,丰润网站设计制作，有大型网站制作公司丰富经验。已为丰润上千多家提供企业网站建设服务。企业网站搭建\成都外贸网站建设公司要多少钱，请找那个售后服务好的丰润做网站的公司定做！

我写过图片网络传输的和你要求的一样

为了不把图片写到硬盘 又从硬盘读取

而直接保存图片内存流 进行网络传输

从网络读取的图片byte数组转成图片代码如下

Dim mStream As New IO.MemoryStream

mStream.Write(b, 0, b.length) '这里b就是你的一维数组了

Dim Img As New Bitmap(mStream)

mStream.Close()

mStream.Dispose()

下面是把图片保存到一维数组的方法

Dim Stream As New IO.MemoryStream

im.Save(Stream, System.Drawing.Imaging.ImageFormat.Jpeg)

im = Nothing

Stream.Flush()

Dim b As Byte() = Stream.ToArray

Stream.Dispose()

VB.NET 本地保存数据

VB可以用任何格式保存文件数据不仅仅是注册表\XML\INI

甚至于未知的格式。我教你命令：

open "C:\setup.safe" for output as #1

print #1,"object"

close #1

其中setup.safe就是一个文件，后缀为.safe，当然可以改成.dat包括其他任何后缀.

object就是你要写入setup.safe的内容.

vb点虐 webbrowser 自动保存文件到指定文件夹

老实说不一定要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大同小异

文章名称：vb点虐 保存流 vbnet recordset
标题网址：https://www.cdcxhl.com/article14/ddspcde.html

成都网站建设公司_创新互联，为您提供品牌网站设计、全网营销推广、自适应网站、用户体验、网页设计公司、网站制作

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联