login ให้แสดงชื่อผู้ที่ login โดยดึงชื่อมาจากฐานข้อมูล ทำไงค่ะ ช่วยบอกที

โค้ดส่วนหน้า login
Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLogin.Click
        Dim sql As String
        Dim dv As DataView
 
        sql = "SELECT * FROM tb_staff WHERE login_name = '" & Me.txtUsername.Text & "'"
        sql += " AND password1 = '" & Me.txtPassword.Text & "'  "

        Response.Write(sql)

        dv = ObjDb.GetDataSet(sql).Tables(0).DefaultView

        If dv.Count > 0 Then

            Session("name") = Me.txtUsername.Text
            Response.Redirect("hadder1.aspx")

        Else

            Me.pnlLogin.Visible = False
            Me.lblStatus.Visible = True
            lblStatus.ForeColor = System.Drawing.Color.Red
            lblStatus.Text = "Username or Password wrong!"

        End If

    End Sub

Imports System.Data
Imports System.IO
Imports System.Data.OleDb

Partial Class AddCom
    Inherits System.Web.UI.Page
    Private Property BinaryReader As StreamReader
    Public ObjDb As New Datacenter.Data.clsDBSQLBased(ConfigurationManager.ConnectionStrings("ConStr").ToString)
        Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        If Not Page.IsPostBack Then
          

        End If
    End Sub
    Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLogin.Click
        Dim sql As String
        Dim dv As DataView
 
        sql = "SELECT * FROM tb_staff WHERE login_name = '" & Me.txtUsername.Text & "'"
        sql += " AND password1 = '" & Me.txtPassword.Text & "'  "

        Response.Write(sql)

        dv = ObjDb.GetDataSet(sql).Tables(0).DefaultView

        If dv.Count > 0 Then

            Session("name") = Me.txtUsername.Text
            Response.Redirect("hadder1.aspx")

        Else

            Me.pnlLogin.Visible = False
            Me.lblStatus.Visible = True
            lblStatus.ForeColor = System.Drawing.Color.Red
            lblStatus.Text = "Username or Password wrong!"

        End If

    End Sub
End Class

Public NAME AS String
Public LAST NAME AS String

NAME=dt.rows(0)("NAME").tostring
LAST NAME=dt.rows(0)("LAST NAME").tostring
lable_name.text=NAME
lable_lastname.text=LAST NAME

Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLogin.Click
        Dim sql As String
        Dim dv As DataView
   
        sql = "SELECT staff_id,staff_name,password1 FROM tb_staff WHERE  login_name = '" & Me.txtUsername.Text & "'  AND  password1 = '" & Me.txtPassword.Text & "'"
    
        dv = ObjDb.GetDataSet(sql).Tables(0).DefaultView
        If dv.Count > 0 Then

            Session("staff_name") = dv.Table.Rows(0)(1).ToString()  'Me.txtUsername.Text
            Response.Redirect("hadder1.aspx")

        Else

            Me.pnlLogin.Visible = False
            Me.lblStatus.Visible = True
            lblStatus.ForeColor = System.Drawing.Color.Red
            lblStatus.Text = "Username or Password wrong!"

        End If

    End Sub