VB NET 中怎样实现动态验证码

需要写个验证码类：

创新互联建站成立10多年来，这条路我们正越走越好，积累了技术与客户资源，形成了良好的口碑。为客户提供成都网站制作、成都网站设计、外贸营销网站建设、网站策划、网页设计、域名注册、网络营销、VI设计、网站改版、漏洞修补等服务。网站是否美观、功能强大、用户体验好、性价比高、打开快等等，这些对于网站建设都非常重要，创新互联建站通过对建站技术性的掌握、对创意设计的研究为客户提供一站式互联网解决方案，携手广大客户，共同发展进步。

例如

public class ValidCode

public shared function Create() as integer

return Rand(0,100)

end Function

end class

需要在页面里面去调用类的共享方法，然后显示验证码（你也可以生成图片~~）

谁会用vb6.0做一个带有验证码识别的登陆界面

新建工程，添加一个picturebox，一个textbox，两个command button

Dim vCode As String

Private Sub Command1_Click()

drawvc

End Sub

Private Sub drawvc() '显示校验码

Dim i, vc, px, py As Long

Dim r, g, b As Byte

Randomize '初始化随机种子

'生成随机校验码

vc = CLng(8999 * Rnd + 1000)

vCode = vc

'显示校验码

Picture1.Cls

Picture1.Print vc

'添加噪点（防止自动图像识别）

For i = 0 To 2000 '画2000个噪点

'画点随机位置

px = CLng(Picture1.Width * Rnd)

py = CLng(Picture1.Height * Rnd)

'画点随机颜色

r = CByte(255 * Rnd)

g = CByte(255 * Rnd)

b = CByte(255 * Rnd)

Picture1.Line (px, py)-(px + 1, py + 1), RGB(r, g, b)

Next

End Sub

Private Sub Command2_Click()

If Text1.Text = vCode Then

MsgBox ("正确")

Else

MsgBox ("错误")

drawvc

End If

End Sub

Private Sub Form_Load()

Picture1.FontSize = 12

Picture1.FontBold = True

Picture1.AutoRedraw = True

drawvc

End Sub

你也可以自己画点其他的东西，增加识别难度

vb点虐 如何使用HttpWebRequest模拟登陆带验证码的网站

一般登陆网站时候首先要打开一个网页对吧？

那首先要 GET 一个网址。GetResponse后，得到的流就是这个页面的源码。

源码里肯定会包含这个验证码的提问段（可能是个图片的网址，也可能是个 5+5=？ 之类的字符串之类的），可以分析一下这段代码出现的位置，让程序自动寻找。找到这个图片的网址，把这个图片 GET 下来，然后，就是orc识别或你人工识别咯。。。

网站栏目：vb点虐 验证码识别的简单介绍
标题来源：http://kswjz.com/article/ddjsdsj.html