练习写了一段登陆验证的代码,可是label1和label2总是一点反应都没有,label1是想要根据情况出现一段不同的字,而label2则是出现一段超链接,出现的结果是什么都不显示
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim objconnection As New OleDbConnection
Dim strpath As String, strid As String, strpsw As String
strid = Request.Form("txtid")
strpsw = Request.Form("txtspw")
strpath = Server.MapPath("web.mdb")
Call dbconnection(objconnection, strpath)
Dim strSql = "select * from id where strid= " & strid
Dim objAdap As New OleDbDataAdapter(strSql, objconnection)
Dim objDSet As New DataSet
label2.Text="<a href="index.asp">返回上页</a>"
objAdap.Fill(objDSet, "user")
If objDSet.Tables("user").MinimumCapacity = 0 Then
Label1.Text = "没有该用户"
Else
If objDSet.Tables("user").Rows(0)("strpassword") <> strpsw Then
Label1.Text = "密码不正确"
Else
Label1.Text = "登陆成功"
Session("strid") = strid
End If
End If
objconnection.Close()
End Sub
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim objconnection As New OleDbConnection
Dim strpath As String, strid As String, strpsw As String
strid = Request.Form("txtid")
strpsw = Request.Form("txtspw")
strpath = Server.MapPath("web.mdb")
Call dbconnection(objconnection, strpath)
Dim strSql = "select * from id where strid= " & strid
Dim objAdap As New OleDbDataAdapter(strSql, objconnection)
Dim objDSet As New DataSet
label2.Text="<a href="index.asp">返回上页</a>"
objAdap.Fill(objDSet, "user")
If objDSet.Tables("user").MinimumCapacity = 0 Then
Label1.Text = "没有该用户"
Else
If objDSet.Tables("user").Rows(0)("strpassword") <> strpsw Then
Label1.Text = "密码不正确"
Else
Label1.Text = "登陆成功"
Session("strid") = strid
End If
End If
objconnection.Close()
End Sub
解决方案 »
- 各位有没有用过SharpMap?怎么扩展Provider类添加栅格图层,我想添加tiff文件,应该怎么做呢?
- 验证控件上传到服务器不好使,在本地好用啊。。急急急!!!
- 如何实时监控一个文件夹是否被修改过,即是否添加了子目录或者文件?急急急!!
- 急!急!急!急!急!急!关于日期控件的问题!!!(在线等待!)
- 我如何得到PAGE上所有的TEXTBOX,并且可以取出中间的任何一个
- 请教一个sql的问题
- DataGrid能嵌套显示吗?就是左边有一+号的,如每行显示的订单行左边都有一+号,点击后行伸展出详细订单数据,哪位先辈能给我一下
- 为什么提交数据之后,显示页不刷新数据咧?急,急,在线等待!
- 新手.登录界面,出现这样的编译错误,是什么原因?
- 我想学ASP。NET,可是有的资料上说ASP的安全性很差,是这样的吗?不如PHP?
- 高手们 : JIT调试失败,出现以下错误:拒绝访问。!!!!!!!!! 从来没有见过的大问题!!!!!
- 如何在IIS 6的日志中记录HTTP Header的信息?
改为
label2.Text="<a href='index.asp'>返回上页</a>"