ASP.NET实现图象处理详解 --隨機數

最新推荐文章于 2019-04-28 13:10:03 发布

weixin_34175509

最新推荐文章于 2019-04-28 13:10:03 发布

阅读量79

点赞数

文章标签：数据库 photoshop

在ASP.NET下实现数字和字符相混合的验证码
http://dev.csdn.net/develop/article/22/22618.shtm
首先,我要简要说说Session和ViewState的用法,因为后面会用到它
       把数据存储在Session中:Session("key")="test"
       从Session取值:dim testvalue as string=Session("key")
      类似的:
       把数据存储在ViewState中:ViewState("key")="test"
       从ViewState中取值:dim testvalue as string=ViewState("key")
    关于ViewState的更详细的资料,你可以参看MSDN的 <<ASP.NET ViewState 初探>>一文
      百闻不如一见,有时代码本身就比任何解说更有表现力,所以在此就不对代码解说太多了,本文实现的验证码需要用到两个文件:
       gif.aspx           该文件用于生成验证码
       ValidateCode.aspx 该文件用来测试验证码(即如何使用)
   下面给出gif.aspx的完整代码:
<%@ import namespace="System"%>
<%@ import namespace="System.io"%>
<%@ import namespace="System.Drawing"%>
<%@ import namespace="System.Drawing.Imaging"%>
<script language="vb" runat="server">
Sub Page_Load(Sender as object,e as eventargs)
    'RndNum是一个自定义函数
    dim VNum as string=RndNum(4)
    Session("VNum")=VNum
    ValidateCode(VNum)
End Sub
'生成图象验证码函数
Sub ValidateCode(VNum)
   Dim Img as System.Drawing.Bitmap
   Dim g as Graphics
   Dim ms as MemoryStream
   dim gheight as integer=Int(Len(VNum)*11.5)
   'gheight为图片宽度,根据字符长度自动更改图片宽度
   img=new BitMap(Gheight,20)
   g=Graphics.FromImage(img)
   g.DrawString(VNum,(New Font("Arial",10)),(New SolidBrush(color.blue)),3,3)'在矩形内绘制字串（字串，字体，画笔颜色，左上x.左上y）
   ms=New MemoryStream()
   img.Save(ms,ImageFormat.Png)
   Response.ClearContent() '需要输出图象信息要修改HTTP头
   Response.ContentType="image/Png"
   Response.BinaryWrite(ms.ToArray())
   g.Dispose()
   img.Dispose()
   Response.End()
End Sub
'--------------------------------------------
'函数名称:RndNum
'函数参数:VcodeNum--设定返回随机字符串的位数
'函数功能:产生数字和字符混合的随机字符串
Function RndNum(VcodeNum)
    dim Vchar as string="0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,W,X,Y,Z"
    dim VcArray() as string=split(Vchar,",") '将字符串生成数组
    dim VNum as string=""
    dim i as byte
    For i=1 to VcodeNum
      Randomize
      VNum=VNum & VcArray(Int(35*Rnd)) '数组一般从0开始读取，所以这里为35*Rnd
    Next
    Return VNum
End Function
</script>
那么又应该如何使用该文件生成的图象验证码,看这句代码:
<asp:Image id="Image1" runat="server" ImageUrl="gif.aspx" />
这就是用来显示验证码的Image控件,你可以把它放在任何你喜欢的地方,下面的给出详细的使用代码,你把它保存为ValidateCode.aspx,并把它和gif.aspx放在同一目录下,在浏览器中打开ValidateCode.aspx,就可以测试它的效果了:
<script language="vb" Runat="Server">
Sub Page_Load(Sender as object,e as eventargs)
      dim VNum as string=Session("VNum")
      Session.Abandon()
      ViewState("VNum")=VNum
End Sub
'下面的事件代码是用来测试验证码,可以根据需要更改
Sub btnSubmit_click(sender as object,e as eventargs)
      '判断输入的验证码与所给是否相同
      If txtValidateCode.text=Cstr(ViewState("VNum")) then
          lblShow.text="<font color='red'>提示:验证通过</font>"
      Else
       lblShow.text="所填写的验证码与所给的不符"
      End If
End Sub
</script>
<html>
<body>
<form runat="server">
<div align="center">
    <table width="750">
      
      <tr>
        <td width="256" height="46">  </td>
        <td width="9"> </td>
        <td width="88"> </td>
        <td width="87"> </td>
        <td width="100"> </td>
        <td width="68"> </td>
        <td width="97"> </td>
      </tr>
      <tr>
        <td height="21"></td>
        <td></td>
        <td colspan="3" valign="top"><asp:label ID="lblShow" runat="server"></asp:label></td>
        <td> </td>
        <td> </td>
      </tr>
      <tr>
        <td height="14"></td>
        <td></td>
        <td></td>
        <td></td>
        <td></td>
        <td></td>
        <td></td>
      </tr>
      <tr>
        <td height="21"> </td>
        <td colspan="2" valign="middle">验证码:</td>
        <td valign="top"><asp:Image id="Image1" runat="server" ImageUrl="gif.aspx" /></td>
        <td> </td>
        <td> </td>
        <td> </td>
      </tr>
      <tr>
        <td height="20"> </td>
        <td colspan="2" valign="top">输入验证码:</td>
        <td valign="top"><asp:textbox ID="txtValidateCode" runat="server" TextMode="SingleLine" /></td>
        <td colspan="2" valign="middle"><font color="#FF0000" size="2">*注意:区分大小写</font></td>
        <td> </td>
      </tr>
      <tr>
        <td height="25"> </td>
        <td> </td>
        <td> </td>
        <td> </td>
        <td> </td>
        <td> </td>
        <td> </td>
      </tr>
      <tr>
        <td height="19"> </td>
        <td> </td>
        <td> </td>
        <td valign="top"><asp:button ID="btnSubmit" runat="server" Text="比较" οnclick="btnSubmit_click" /></td>
        <td> </td>
        <td> </td>
        <td> </td>
      </tr>
    </table>
</div>
</form>
</body>
</html>

http://www.cnblogs.com/thcjp/archive/2006/07/06/444342.html
在使用ASP的时候，我们时常要借助第三方控件来实现一些图象功能。而现在，ASP.NET的推出，我们已经没有必要再使用第三方控件来实现，因为ASP.NET 已经具有强大的功能来实现一些图象处理。现在，我们就来看看怎样使用ASP.NET的这一强大功能。

　　一、System.Drawing的使用

　　以下的举例将演示在内存中生成一张图片，然后，将这张图片通过网页显示出来。需要了解的是，我们这里输出的不是HTML效果，而是实实在在的图片（图象），我们可以使用“另存为…”将输出图象保存起来。

　　我们先来看看效果：

　我们看到，这张图片是一个渐变背景上有“看见了吗”几个字，当然，这个效果在PhotoShop等图象处理软件里面很容易实现，但是，一些与数据库结合的应用我们不可能将所有图片都事先设计出来，这时候，利用ASP.NET来实现这些功能就显得很重要了。我们来看源代码：

＜%@ page language="vb" contenttype="image/jpeg" %＞ 
＜%@ import namespace="system.drawing" %＞ 
＜%@ import namespace="system.drawing.imaging" %＞ 
＜%@ import namespace="system.drawing.drawing2d" %＞ 

＜% 
'清空Response 
response.clear 

'建立一个120*30大小，24bit的BMP图象； 
dim imgOutput as New bitmap(120, 30, pixelformat.format24bpprgb) 

'根据以上BMP建立一个新图象； 
dim g as graphics = graphics.fromimage(imgOutput) 

g.clear(color.Green) 
g.smoothingMode = smoothingMode.antiAlias 

g.drawString("看见了吗？", New font("黑体",16,fontstyle.bold),new SolidBrush(Color.White),New pointF(2,4)) 

g.FillRectangle(New linearGradientBrush(New point(0,0), New point(120,30), color.fromArgb(0,0,0,0),color.fromArgb(255,255,255,255)),0,0,120,30) 

imgOutput.save(response.outputstream, imageformat.jpeg) 

g.dispose() 
imgOutput.dispose() 
response.end 
%＞

　　在以上代码中，我们看到和数据库程序不同，这里专门引入了图象处理的名字空间system.drawing等。程序首先清空了Response，确保没有输出；然后，程序建立了一个120乘30大的BMP图象，再在这个基础上建立一个新图象，建立图象以后，我们首先“画”出了字符串“看见了吗”，该字符串为16大粗黑体，颜色为白色，位置为（2，4）；最后，我们实现渐变效果。

　　以上举例很简单，但是如果和数据库结合，我们可以实现很多使用ASP可能不敢想的效果。
二、读取和改变图象文件大小

　　读取图片？直接使用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(120, 120, pixelformat.format24bpprgb) 
dim g as graphics = graphics.fromimage(imgOutput) 
g.clear(color.yellow) 
g.drawString("错误！", New font("黑体",14,fontstyle.bold),systembrushes.windowtext, New pointF(2,2)) 
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，这一函数的主要功能为服务器上的图片文件不存在时，显示错误信息，这里很有趣，错误信息也是通过图片给出的（如图）：

以上的程序显示图片并且改变图片大小，现在，我们将这个程序进一步，显示图片并且保持图片的长宽比例，这样，和实际应用可能比较接近，特别是需要制作电子相册或者是图片网站的时候比较实用。我们先来看主要函数：

Function NewthumbSize(currentwidth, currentheight) 
dim tempMultiplier as Double 
if currentheight ＞ currentwidth then 
tempMultiplier = 200 / currentheight 
Else 
tempMultiplier = 200 / currentwidth 
end if 
dim NewSize as New Size(CInt(currentwidth * tempMultiplier), CInt(currentheight * tempMultiplier)) 
return NewSize 
End Function

　　以上程序是增加的一个函数NewthumbSize，该函数专门处理改变一会的图片大小，这个图片的长宽和原图片的长宽保持相同比例。其他部分请参考上文程序代码。
三、画图特效

　　如果只是将图片显示在网页上，这样未免显得简单。现在，我们来进一步感受ASP.NET的强大功能。我们将学习图象处理中常用的图象反转、图象切割、图象拉伸等技巧。
先来看看程序效果：

仔细看，我们可以找到各种图象处理效果。现在，我们来看看程序代码：

＜%@ Page Language="vb" Debug="True" %＞ 
＜%@ import namespace="system.drawing" %＞ 
＜%@ import namespace="system.drawing.imaging" %＞ 
＜%@ import namespace="system.drawing.drawing2d" %＞ 
＜% 
dim strFilename as string 
dim i as System.Drawing.Image 
strFilename = server.mappath("./chris-fsck.jpg") 

i = System.Drawing.Image.FromFile(strFilename) 

dim b as New system.drawing.bitmap(i.width, i.height, pixelformat.format24bpprgb) 
dim g as graphics = graphics.fromimage(b) 

g.clear(color.blue) 

'旋转图片 
i.RotateFlip(System.Drawing.RotateFlipType.Rotate90FlipX) 
g.drawimage(i,New point(0,0)) 
i.RotateFlip(System.Drawing.RotateFlipType.Rotate270FlipY) 

g.RotateTransform(10) 
g.drawimage(i,New point(0,0)) 
g.RotateTransform(10) 
g.drawimage(i,New point(20,20)) 
g.RotateTransform(10) 
g.drawimage(i,New point(40,40)) 
g.RotateTransform(10) 
g.drawimage(i,New point(40,40)) 
g.RotateTransform(-40) 
g.RotateTransform(90) 
g.drawimage(i,New rectangle(100,-400,100,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel) 
g.RotateTransform(-90) 

' 拉伸图片 
g.drawimage(i,New rectangle(10,10,50,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel) 
g.drawimage(i,New rectangle(50,10,90,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel) 
g.drawimage(i,New rectangle(110,10,150,50),New rectangle(20,20,i.width-20,i.height-20),GraphicsUnit.Pixel) 


'切割图片 
g.drawimage(i,50,100,New rectangle(180,80,60,110),GraphicsUnit.Pixel) 
g.drawimage(i,140,100,New rectangle(180,80,60,110),GraphicsUnit.Pixel) 

'旋转图片 
i.RotateFlip(System.Drawing.RotateFlipType.Rotate180FlipX) 
g.drawimage(i,230,100,New rectangle(180,110,60,110),GraphicsUnit.Pixel) 

response.contenttype="image/jpeg" 

b.save(response.outputstream, imageformat.jpeg) 

b.dispose() 

%＞

　　在以上的程序中，我们看到实现图象处理的各种技巧，仔细观察，我们可以知道旋转图片其实是用了一个RotateFlip方法；而切割和拉伸图片，完全是通过设置DrawImage的不同参数来实现。

　　四、总结

　　 ASP.NET的图象处理可以实现的功能很多，我们在这里其实只是简单的介绍，更多功能的应用，需要我们在实践中摸索、总结。

weixin_34175509

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
ASP.NET实现图象处理详解 --隨機數

在ASP.NET下实现数字和字符相混合的验证码http://dev.csdn.net/develop/article/22/22618.shtm 首先,我要简要说说Session和ViewState的用法,因为后面会用到它把数据存储在Session中:Session("key")="test" 从Session取值:dim testvalue as string=Sess...
复制链接

扫一扫