熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

ASP.NET圖象處理詳解[2]

2013-11-13 10:57:30  來源: .NET編程 

  讀取和改變圖象文件大小

  讀取圖片?直接使用HTML不就可以了?當然可以我們這裡只是提供一種選擇和方法來實現這一功能具體這一功能的使用我們可能需要在實踐中更多的學習先來看程序源代碼

<% import all relevant namespaces %>
 <%@ import namespace=System %>
 <%@ import namespace=SystemDrawing %>
 <%@ import namespace=SystemDrawingImaging %>
 <%@ import namespace=SystemIO %>
 
 <script runat=server
 Sub sendFile()
 dim g as SystemDrawingImage = SystemDrawingImageFromFile(servermappath(request(src)))
 dim thisFormat=grawformat
 dim imgOutput as New Bitmap(g cint(request(width)) cint(request(height)))
 if thisformatequals(systemdrawingimagingimageformatGif) then
 responsecontenttype=image/gif
 else
 responsecontenttype=image/jpeg
 end if
 imgOutputsave(responseoutputstream thisformat)
 gdispose()
 imgOutputdispose()
 end sub
 
 Sub sendError()
 dim imgOutput as New bitmap( pixelformatformatbpprgb)
 dim g as graphics = graphicsfromimage(imgOutput)
 gclear(coloryellow)
 gdrawString(錯誤! New font(黑體fontstylebold)systembrusheswindowtext New pointF())
 responsecontenttype=image/gif
 imgOutputsave(responseoutputstream imageformatgif)
 gdispose()
 imgOutputdispose()
 end sub
 </script>
 
 <%
 responseclear
 if request(src)= or request(height)= or request(width)= then
 call sendError()
 else
 if fileexists(servermappath(request(src))) then
 call sendFile()
 else
 call sendError()
 end if
 end if
 responseend
 %>

  在以上的程序中我們看到兩個函數一個是SendFile這一函數主要功能為顯示服務器上的圖片該圖片的大小通過Width和Height設置同時程序會自動檢測圖片類型另外一個是SendError這一函數的主要功能為服務器上的圖片文件不存在時顯示錯誤信息這裡很有趣錯誤信息也是通過圖片給出的(如圖)

[]  []  []  []  


From:http://tw.wingwit.com/Article/program/net/201311/14864.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.