从专页内容到母版页的会话 [英] Session from Page content to Masterpage
本文介绍了从专页内容到母版页的会话的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
您好,程序员在这里遇到了问题,因为您看到IVE创建了一个登录页面,在该页面中,我将正确登录时将会话发送到母版页.我的问题是如何将数据输入到母版页.请帮忙
我的代码内容页:
Hello programmers, got a problem here as you see ive created a log-in page where i put session to be sent to masterpage when the login the correct. My problem is how can i input the data to master page. Please help
My code content page:
Imports System.Data.SqlClient
Imports System.Data
Partial Class Login
Inherits System.Web.UI.Page
Dim con As SqlConnection = New SqlConnection("Data Source=ML0003135586\SQLEXPRESS;Initial Catalog=ecom;Integrated Security=True")
Dim sqlstr As String = String.Empty
Protected Sub log_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles log.Click
Dim strUserURL As String
sqlstr = "SELECT * FROM [Users] WHERE ([Username]=@Username) AND ([Password]=@Password)"
con.Open()
Dim cmd As New SqlCommand(sqlstr, con)
cmd.Parameters.AddWithValue("@Username", tbUser.Text)
cmd.Parameters.AddWithValue("@Password", tbPass.Text)
strUserURL = cmd.ExecuteScalar()
con.Close()
If strUserURL <> "" Then
lblInvalid.Text = ""
FormsAuthentication.SetAuthCookie(tbUser.Text, True)
Session("username") = tbUser.Text
Response.Redirect("Home.aspx")
Else
lblInvalid.Text = "Sorry... try again..."
End If
End Sub
End Class
Home.aspx代码
Home.aspx code
Partial Class Home
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim username As String = Session("username")
Dim mpLabel As Label
mpLabel = CType(Page.Master.FindControl("lblName"), Label)
username = "" + mpLabel.Text
End Sub
End Class
香港专业教育学院尝试了该代码,但无法正常工作,请帮助
ive tried that code but is not working please help
推荐答案
您是否尝试过在母版页上添加会话?
代码
Have you tried adding session on your master page?
codes
Dim str As String
str = Convert.ToString(Session("username"))
lblName.Text = str
这篇关于从专页内容到母版页的会话的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文