你的算法非常的傻，剧慢没有可用性。
网站建设哪家好，找创新互联！专注于网页设计、网站建设、微信开发、小程序定制开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了蒙山免费建站欢迎大家使用！
用一个sql查询 查找 密码=输入密码，用户名等于输入的用户的记录，找到了即登录..
dim oRd as new recordset
dim db as connection ' 用db打开数据库
dim sa as string
sa=”select * from table where username='" txtDIM_Username.Text _
"' and userpassword='" txtDIM_Password.Text "'"
ord.open sa,db
if ord.eof() or ord.bof()
‘未找到，不能登录
else
'找到 登录成功....
endif
前台UI自己搞定，但是你说用域账号来登录，也就是Windows账号的话，那个东西，你还要看一下Windows API，调用相关的Windows 组件才能达到你的要求，我知道vmware server那个就是用Windows账号登录的。
一般登陆网站时候首先要打开一个网页对吧？
那首先要 GET 一个网址。GetResponse后，得到的流就是这个页面的源码。
源码里肯定会包含这个验证码的提问段（可能是个图片的网址，也可能是个 5+5=？ 之类的字符串之类的），可以分析一下这段代码出现的位置，让程序自动寻找。找到这个图片的网址，把这个图片 GET 下来，然后，就是orc识别或你人工识别咯。。。
Cookie丢了
登陆的时候，把CookieContainer保存下来，可以设置一个全局变量，然后再getBody的时候，
request.Cookiecontainer设置为这个CookieContainer即可
哈哈简单哪
第一步：登陆网页代码
第二步：登陆以后判断是否登陆成功
有两种方法：1.获取网页代码，判断网页字符有无”登陆成功”字样
源代码：
2.就是判断网页是否跳转到了某一页
源代码：
两种方法结合起来用，可以判断网页是否无法连接
身份验证
用Session，即简单又方便。。。
用其它的也行，比如说Cookie，，，
在A页面进行判断，没有登陆返回登陆页面。
IF Session("ddd") IS NULL
Then Response.Redirct("A.aspx")
Reponse.End()
Else
执行A页面。。。
