Hi Smile,
Please refer below sample.
HTML
Login
<table>
<tr>
<td>User Login:<asp:TextBox ID="txtUserName" runat="server"></asp:TextBox></td>
</tr>
<tr>
<td>
<asp:Button ID="btnLogin" runat="server" Text="Login" OnClick="LoginUser" /></td>
</tr>
</table>
Default
<asp:GridView ID="gvDetails" runat="server" AutoGenerateColumns="false">
<Columns>
<asp:BoundField HeaderText="ID" DataField="ID" />
<asp:BoundField HeaderText="Name" DataField="Name" />
<asp:BoundField HeaderText="FName" DataField="FName" />
<asp:CommandField ShowEditButton="true" ShowDeleteButton="true" />
</Columns>
</asp:GridView>
Namespace
C#
using System.Data;
VB.Net
Imports System.Data
Code
Login
C#
protected void LoginUser(object sender, EventArgs e)
{
Session["User"] = txtUserName.Text;
Response.Redirect("Home.aspx");
}
VB.Net
Protected Sub LoginUser(ByVal sender As Object, ByVal e As EventArgs)
Session("User") = txtUserName.Text
Response.Redirect("Home.aspx")
End Sub
Home
C#
protected void Page_Load(object sender, EventArgs e)
{
if (!this.IsPostBack)
{
string userName = Session["User"].ToString();
DataTable dt = new DataTable();
dt.Columns.AddRange(new DataColumn[3] { new DataColumn("ID" ,typeof(int)),
new DataColumn("Name" ,typeof(string)),
new DataColumn("FName" ,typeof(string))});
dt.Rows.Add(1, "abc", "Sky");
dt.Rows.Add(2, "Sky", "abc");
gvDetails.DataSource = dt;
gvDetails.DataBind();
if (userName.ToUpper() == "B")
{
gvDetails.Columns[2].Visible = false;
gvDetails.Columns[3].Visible = false;
}
}
}
VB.Net
Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
If Not Me.IsPostBack Then
Dim userName As String = Session("User").ToString()
Dim dt As DataTable = New DataTable()
dt.Columns.AddRange(New DataColumn(2) {New DataColumn("ID", GetType(Integer)), New DataColumn("Name", GetType(String)), New DataColumn("FName", GetType(String))})
dt.Rows.Add(1, "abc", "Sky")
dt.Rows.Add(2, "Sky", "abc")
gvDetails.DataSource = dt
gvDetails.DataBind()
If userName.ToUpper() = "B" Then
gvDetails.Columns(2).Visible = False
gvDetails.Columns(3).Visible = False
End If
End If
End Sub
Screenshot