知识大全 ASP.NET图象处理详解[2]

Posted 2022-07-16 函数

篇首语：水至清则无鱼，人至察则无徒。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 ASP.NET图象处理详解[2]相关的知识，希望对你有一定的参考价值。

ASP.NET图象处理详解[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　二读取和改变图象文件大小

　　读取图片？直接使用HTML不就可以了？当然可以我们这里只是提供一种选择和方法来实现这一功能具体这一功能的使用我们可能需要在实践中更多的学习先来看程序源代码

＜% import all relevant namespaces %＞＜%@ import namespace= System %＞＜%@ import namespace= System Drawing %＞＜%@ import namespace= System Drawing Imaging %＞＜%@ import namespace= System IO %＞　＜script runat= server ＞ Sub sendFile() dim g as System Drawing Image = System Drawing Image FromFile(server mappath(request( src ))) dim thisFormat=g rawformat dim imgOutput as New Bitmap(g cint(request( width )) cint(request( height ))) if thisformat equals(system drawing imaging imageformat Gif) then response contenttype= image/gif else response contenttype= image/jpeg end if imgOutput save(response outputstream thisformat) g dispose() imgOutput dispose() end sub　 Sub sendError() dim imgOutput as New bitmap( pixelformat format bpprgb) dim g as graphics = graphics fromimage(imgOutput) g clear(color yellow) g drawString( 错误！ New font( 黑体 fontstyle bold) systembrushes windowtext New pointF( )) response contenttype= image/gif imgOutput save(response outputstream imageformat gif) g dispose() imgOutput dispose() end sub ＜/script＞　＜% response clear if request( src )= or request( height )= or request( width )= then call sendError() else if file exists(server mappath(request( src ))) then call sendFile() else call sendError() end if end if response end %＞

　　在以上的程序中我们看到两个函数一个是SendFile 这一函数主要功能为显示服务器上的图片该图片的大小通过Width和Height设置同时程序会自动检测图片类型另外一个是SendError 这一函数的主要功能为服务器上的图片文件不存在时显示错误信息这里很有趣错误信息也是通过图片给出的（如图）

cha138/Article/program/net/201311/14864