c# 验证码组件 可vb，asp，net调用

      今天公司要求用C#写个验证码组件，让asp可以调用，在网上找了一堆资料，终于给我给搞出来了，因为本人第一次写组件，也是第一次发表文章，所有可能说的不是很好，大家请见谅。

      csdn上有这么篇文章，想学习写组件的可以去看看：http://blog.youkuaiyun.com/KimmKing/archive/2008/12/04/3445233.aspx，因为本人就是仿照这个写的验证码组件，因为怕上面的文章丢失，我就在这里简单说下创建的过程：

1、创建一类库

2、实现一个类（具体代码下面详写）

3、给文件签名

方法：选择开始菜单中Vistual Studio目录下的Vistual Studio Tools下的Vistual Studio 命令提示。使用sn -k c:/myKey.snk生成签名文件。在项目上右键，点击属性，选择签名，选中为程序集签名，选择myKey.snk文件。

 

4、生成解决方案

 在项目目录的/TestCom/bin/Debug中可以找到TestCom.dll

 

5、生成tlb类库

在Visual Studio命令提示符下，切换到此目录。
输入tlbexp TestCom.dll /out:TestCom.tlb

 

6、注册类型库
输入regasm TestCom.dll /tlb: TestCom.tlb /codebase，将类型库导入到注册表。提示成功注册了类型，说明操作成功，此时TestCom .dll可以作为一个com来使用。

 

7、添加dll到GAC
输入gacutil /i TestCom.dll，将此.net程序集添加到GAC。

 

这样创建组件的所有工作就完成了。剩下的就是调用了

在vb和net里面调用：导入dll，实例化对象就可以使用了

（Dim a As New TestCom.Class1）a.方法

（TestCom.Class1 aa = new TestCom.Class1（））aa.方法

 

在asp调用：

<%
SET s = CreateObject("TestCom.Class1")
s.test()
%>

 

 

 

以上就是我找到的创建组件的资料，那么现在就开始编写验证码组件的代码吧

首先编写类库：

using System; using System.Collections.Generic; using System.Text; using System.Runtime.InteropServices; using System.Drawing; using System.Security; namespace TestComs { [ComVisible(true)] public interface iClass1 { string DoCode(int num); byte[] DoImg(string code); } [ComVisible(true)] [ClassInterface(ClassInterfaceType.AutoDual)] public class Class1 : iClass1 { private double PI2; public Class1() { PI2 = 6.283185307179586476925286766559; } #region 生成验证码表达式 /// <summary> /// 生成验证码表达式 /// </summary> /// <param name="num">验证码的长度</param> /// <returns>验证码表达式</returns> public string DoCode(int num) { //要从这个数组中随机取字符来生成验证码 string[] Codesource ={"1","2","3","4","5","6","7","8","9", "a","b","c","d","e","f","g","h","i","j","k","l","m","n","p","q","r","s","t","u","v","w","x","y","z"}; string code = ""; Random rd = new Random(); for (int i = 0; i < num; i++) { code += Codesource[rd.Next(0, Codesource.Length)]; } return code; } #endregion #region 生成图片 /// <summary> /// 生成图片 /// </summary> /// <param name="code">验证码表达式</param> public byte[] DoImg(string code) { Bitmap image = new Bitmap((int)Math.Ceiling(code.Length * 19.5), 40); //创建画布 Graphics g = Graphics.FromImage(image); Random random = new Random(); //图片背景色 g.Clear(Color.White); //画图片背景线 for (int i = 0; i < 10; i++) { int x1 = random.Next(image.Width); int x2 = random.Next(image.Width); int y1 = random.Next(image.Height); int y2 = random.Next(image.Height); g.DrawLine(new Pen(Color.Black), x1, y1, x2, y2); } //画图片的前景噪音点 for (int i = 0; i < 50; i++) { int x = random.Next(image.Width); int y = random.Next(image.Height); image.SetPixel(x, y, Color.FromArgb(random.Next())); } Font font = new Font("Couriew New", 22, FontStyle.Bold); System.Drawing.Drawing2D.LinearGradientBrush brush = new System.Drawing.Drawing2D.LinearGradientBrush (new Rectangle(0, 0, image.Width, image.Height), Color.Blue, Color.SkyBlue, 1.2f, true); int w = 2; int h = 1; g.DrawString(code, font, brush, w, h); image = TwistImage(image, true, 5, 5); //画图片的边框线 g.DrawRectangle(new Pen(Color.Silver), 0, 0, image.Width - 1, image.Height - 1); System.IO.MemoryStream ms = new System.IO.MemoryStream(); image.Save(ms, System.Drawing.Imaging.ImageFormat.Gif); return ms.ToArray(); } #endregion #region 正弦曲线Wave扭曲图片 ///<summary> ///正弦曲线Wave扭曲图片（Edit By 51aspx.com） ///</summary> ///<param name="srcBmp">图片路径</param> ///<param name="bXDir">如果扭曲则选择为True</param> ///<param name="nMultValue">波形的幅度倍数，越大扭曲的程度越高，一般为3</param> ///<param name="dPhase">波形的起始相位，取值区间[0-2*PI)</param> ///<returns></returns> public Bitmap TwistImage(Bitmap srcBmp, bool bXDir, double dMultValue, double dPhase) { Bitmap destBmp = new Bitmap(srcBmp.Width, srcBmp.Height); // 将位图背景填充为白色 Graphics graph = Graphics.FromImage(destBmp); graph.FillRectangle(new SolidBrush(Color.White), 0, 0, destBmp.Width, destBmp.Height); graph.Dispose(); double dBaseAxisLen = bXDir ? (double)destBmp.Height : (double)destBmp.Width; for (int i = 0; i < destBmp.Width; i++) { for (int j = 0; j < destBmp.Height; j++) { double dx = 0; dx = bXDir ? (PI2 * (double)j) / dBaseAxisLen : (PI2 * (double)i) / dBaseAxisLen; dx += dPhase; double dy = Math.Sin(dx); // 取得当前点的颜色 int nOldX = 0, nOldY = 0; nOldX = bXDir ? i + (int)(dy * dMultValue) : i; nOldY = bXDir ? j : j + (int)(dy * dMultValue); System.Drawing.Color color = srcBmp.GetPixel(i, j); if (nOldX >= 0 && nOldX < destBmp.Width && nOldY >= 0 && nOldY < destBmp.Height) { destBmp.SetPixel(nOldX, nOldY, color); } } } return destBmp; } #endregion } }

安装前面的几个步骤生成和注册，然后就可以了

 

asp 调用：c.asp(显示图片)

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>无标题文档</title> </head> <body> <% set t = CreateObject("TestComs.Class1") dim aa aa = t.DoCode(4) Response.Clear() Response.ContentType = "image/Gif" Response.BinaryWrite (t.DoImg(aa)) Response.End %> </body> </html>

 

调用c.asp :a.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>无标题文档</title> <mce:script language="javascript" type="text/javascript"><!-- function fGetCode() { var aa = document.getElementById("getcode"); aa.src="c.asp?"+Math.random(); } // --></mce:script> </head> <body><% set t = CreateObject("TestComs.Class1") Response.Write(t.test()) Response.Write(t.DoCode(4)) %> </body> <img src="c.asp" mce_src="c.asp" οnclick="fGetCode()" id="getcode" alt="看不清楚？点击刷新"/> </html>

 

这样就完全OK了，希望对大家有帮助