62,269
社区成员
发帖
与我相关
我的任务
分享
Protected Sub imgbtnlogin_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles
imgbtnlogin.Click
If Session("username") = "" Then
pnl1.Visible = True
pnl2.Visible = False
Else
Me.Response.Write(" <script>alert('登录成功') </script>")
pnl1.Visible = False
pnl2.Visible = True
If Session("level") = 4 Then
Me.magmentLnk.Visible = False
Else
Me.magmentLnk.Visible = True
End If
lblUserName.Text = Session("UserName").ToString()
End If
'省掉了一部分,其中就是读取数据库中的信息与输入信息的比较,然后写到seesion("username")中去的过程
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Me.IsPostBack Then
If Session("username") = "" Then
pnl1.Visible = True
pnl2.Visible = False
Else
pnl1.Visible = False
pnl2.Visible = True
If Session("level") = 4 Then
Me.magmentLnk.Visible = False
Else
Me.magmentLnk.Visible = True
End If
lblUserName.Text = Session("UserName").ToString()
End If
End If
End Sub