使用会话变量的 VB.net 标签

Question

我的 vb.net 应用程序需要使用会话变量。我真的不知道如何在 ASP.net 中使用它。我一直在尝试使用我的书所拥有的东西，但我无法让这个标签起作用。我需要针对数据库验证用户输入，如果他们的代码在数据库中，文本框应该会消失，并且会出现一个标签，上面写着欢迎。

按照我的编写方式，我收到一条错误消息，提示服务器标签格式不正确，并且在代码隐藏中它说我的标签 ID 未声明。谁能发现我写的代码有什么问题？

<asp:Label ID="lblIB" runat="server" DataSourceID="dsIBs" 
Text="Welcome, <%# Eval("First_Name") %> '&' <%# Eval("Last_Name")%>">
</asp:Label>


Protected Sub CustomValidator1_ServerValidate(ByVal source As Object, ByVal 
  args As System.Web.UI.WebControls.ServerValidateEventArgs) Handles
  CustomValidator1.ServerValidate
    args.IsValid = True
    For Each drv As DataRowView In dsIBs.[Select](DataSourceSelectArguments.Empty)
        If drv("baccount").ToString() = args.Value Then
            args.IsValid = False
            lblIB.Visible = False
            Exit For
        End If
    Next

    If args.IsValid Then
        IBTextBox.Visible = False
        IBTextBoxButton.Visible = False
        lblIB.Visible = True
    End If
End Sub

更新：

<asp:Label ID="lblIB" runat="server" Text=""></asp:Label>

    Protected Sub CustomValidator1_ServerValidate(ByVal source As Object, ByVal args As System.Web.UI.WebControls.ServerValidateEventArgs) Handles CustomValidator1.ServerValidate
    args.IsValid = True
    For Each drv As DataRowView In dsIBs.[Select](DataSourceSelectArguments.Empty)
        If drv("baccount").ToString() = args.Value Then
            args.IsValid = False
            lblIB.Visible = False
            Exit For
        End If
    Next

    If args.IsValid Then
        IBTextBox.Visible = False
        IBTextBoxButton.Visible = False
        lblIB.Visible = True
        lblIB.Text = String.Format("Welcome, {0} {1}", Session("FirstName"), Session("LastName"))

    End If
End Sub

更新 2：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) 
Handles Me.Load
    lblIB.Visible = False
End Sub


If args.IsValid Then
   IBTextBox.Visible = False
   IBTextBoxButton.Visible = False
   lblIB.Visible = True
   lblIB.Text = String.Format("Welcome, {0} {1}", Session("FirstName"),
   Session("LastName"))

    Protected Sub IBTextBoxButton_Click(ByVal sender As Object, ByVal e As 
    System.EventArgs) Handles IBTextBoxButton.Click
    Session("IB") = IBTextBox.Text
    Dim IB As String = Session("IB")
    Response.Redirect(Request.RawUrl + "&IB=" + Session("IB"))
End Sub

Answer 1

你的标记是错误的，因为 Label 控件没有 DataSourceID 属性，所以你应该删除它：

<asp:Label ID="lblIB" runat="server" 
Text="Welcome, <%# Eval("First_Name") %> '&' <%# Eval("Last_Name")%>">
</asp:Label>

我还将删除 Text 属性中的 Eval 表达式（除非它位于数据绑定控件 -gridview 等内部）并将其保留为：

<asp:Label ID="lblIB" runat="server" 
Text="">
</asp:Label>

最后，您应该能够在服务器端执行验证并以编程方式设置 Text 执行以下操作：

lblIB.Text = "Welcome " + First_Name + " " + Last_Name

First_Name 和 Last_Name 以某种方式从数据库中读取。

Answer 2

当您的服务器标签格式不正确时，这通常表明您的引用存在问题。

解析器对您使用的引号感到困惑。

幸运的是，有一个简单的解决方案。

改变：-

Text="Welcome, <%# Eval("First_Name") %> '&' <%# Eval("Last_Name")%>">

收件人：-

Text='Welcome, <%# Eval("First_Name") %> &#145;&amp;&#146; <%# Eval("Last_Name")%>'>

首先，我们在文本周围加上了单引号。这将有助于解析器识别您引用的文本实际结束的位置。

其次，我假设您实际上想要显示“&”，而不是将其用于连接。就是这个：-

‘&’

如果不需要，请删除。

最后，如果标签实际上没有被数据绑定，那么什么都不会发生。您要么需要对标签进行数据绑定，要么使用稍微不同的引用语法。

在早期版本的 VS 中发出字符串的引用语法是：-

<%= %>

.NET 4.0+ 中发出字符串的引用语法是

<%: %>

Answer 3

由于标签不包含在数据绑定控件中，因此您不能使用数据绑定语法（即<%#）。在代码隐藏中设置标签的文本，或者像这样内联：

<asp:Label ID="Label1" runat="server" Text='<%=String.Format("{0} {1}", Session("FirstName"), Session("LastName"))%>' ... />

或者在代码隐藏中：

Label1.Text = String.Format("{0} {1}", Session("FirstName"), Session("LastName"))