change specific gridview text color

[dhaneshrs]

I have a small code that shows inactive and active users from the ms access DB.

<%@ Page Language="VB" MasterPageFile="~/MasterPageAdmin.master" Title="Welcome" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<%@ Import Namespace="System.Drawing" %>
 
<script language="VB" runat="server">
 
    Public Function GetInActiveDays(ByVal strLastLoginDate As String) As Integer
        Dim date1 As Date = New Date()
        Dim date2 As Date = New Date()
        Dim time As TimeSpan
 
        date1 = Date.Parse(strLastLoginDate)
        date2 = Date.Now
        time = date2.Subtract(date1)
 
        Return time.Days
    End Function
 
    Public Function IsInActiveUser(ByVal strLastLoginDate As String) As String
        Dim strStatus As String = "Active"
        Dim FontColor As Color = Color.Blue
 
        If (GetInActiveDays(strLastLoginDate) > 2) Then
            strStatus = "Inactive"
        End If
 
        Return strStatus
    End Function
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
        lbdt.Text = Date.Now
        BindGridView2()
        Dim myConnection As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data\origin_timesheet.mdb") & ";")
        myConnection.Open()
 
 
        Dim strQuery As String = "UPDATE Employee SET CurrentLoginDate=?"
        Dim myCommand As New OleDbCommand(strQuery, myConnection)
        myCommand.CommandType = CommandType.Text
 
 
        myCommand.Parameters.Add("@p1", OleDbType.DBDate).Value = Date.Now
        myCommand.ExecuteNonQuery()
        myConnection.Close()
    End Sub
 
    Sub BindGridView2()
        Dim myConnection As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data\origin_timesheet.mdb") & ";")
        myConnection.Open()
 
 
        Dim strQuery As String = "SELECT * FROM Employee"
        Dim myDataAdapter As New OleDbDataAdapter(strQuery, myConnection)
        Dim ds As New DataSet
 
 
        myDataAdapter.Fill(ds)
        GridView2.DataSource = ds
        GridView2.DataBind()
 
        ds.Dispose()
        myDataAdapter.Dispose()
        ds = Nothing
        myDataAdapter = Nothing
        myConnection.Close()
    End Sub
 
</script>
 
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
    <br />
    <br />
    <span
        style="color: #000033"><span style="font-family: Verdana"><span style="font-size: 11pt"><br />
            <br />
            <br />
            <span class="wtxt">Your status is set to: <span style="color: red">Administrator<br />
                <br />
                <asp:GridView id="GridView2" runat="server" Width="700px" AllowSorting="True" AutoGenerateColumns="False" Font-Names="Verdana" EmptyDataText="No record found." EmptyDataRowStyle-ForeColor="White" BackColor="White" BorderColor="White" BorderStyle="Ridge" BorderWidth="2px" CellPadding="3" CellSpacing="1" Font-Size="8pt" GridLines="None">
    <Columns>   
            <asp:TemplateField HeaderText="Users">
            <ItemStyle Width="400px" VerticalAlign="Top" BorderColor="Transparent"/>
                <HeaderStyle HorizontalAlign="Left"/>
                <ItemTemplate>
                    <asp:Label ID="lblUser" runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.UserName", "") %>'></asp:Label>
                </ItemTemplate>
         </asp:TemplateField>  
         <asp:TemplateField HeaderText="Real Name">
            <ItemStyle Width="400px" VerticalAlign="Top" BorderColor="Transparent"/>
                <HeaderStyle HorizontalAlign="Left"/>
                <ItemTemplate>
                    <asp:Label ID="lblRealName" runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.RealName", "") %>'></asp:Label>
                </ItemTemplate>
         </asp:TemplateField>                  
        <asp:TemplateField HeaderText="Last Login Date">
            <ItemStyle Width="400px" VerticalAlign="Top" BorderColor="Transparent"/>
                <HeaderStyle HorizontalAlign="Left"/>
                <ItemTemplate>
                    <asp:Label ID="lblDate" runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.LastLoginDate", "{0:MM/dd/yyyy}") %>'></asp:Label>
                </ItemTemplate>
         </asp:TemplateField>
         <asp:TemplateField HeaderText="InActive - More Than 2 Days?">
             <ItemStyle Width="800px" VerticalAlign="Top" BorderColor="Transparent"/>
                 <HeaderStyle HorizontalAlign="Left"/>
                 <ItemTemplate>
                     <asp:Label ID="lblInActive" runat="server" Text='<%# IsInActiveUser(DataBinder.Eval(Container, "DataItem.LastLoginDate", "{0:MM/dd/yyyy}")) %>'></asp:Label>
                 </ItemTemplate>
        </asp:TemplateField>
    </Columns>                
    <EmptyDataRowStyle ForeColor="White" />
                    <FooterStyle BackColor="#C6C3C6" ForeColor="Black" />
                    <RowStyle BackColor="#FFFFCC" ForeColor="Black" />
                    <SelectedRowStyle BackColor="#9471DE" Font-Bold="True" ForeColor="White" />
                    <PagerStyle BackColor="#C6C3C6" ForeColor="Black" HorizontalAlign="Right" />
                    <HeaderStyle BackColor="Gray" Font-Bold="True" ForeColor="Black" Font-Size="8pt" />
</asp:GridView>
<asp:Label ID="lblInActive" runat="server" Text='<%# IsInActiveUser(DataBinder.Eval(Container, "DataItem.Date", "{0:MM/dd/yyyy}")) %>'></asp:Label><br />
                <span class="wtxt">Current system date &amp; time:</span> 
                <asp:Label ID="lbdt" runat="server"></asp:Label></span></span></span></span></asp:Content>

Here i wanted to show the inactive users in red .. i think its got something to do with this function, but i dont know the color change code for string.

    Public Function IsInActiveUser(ByVal strLastLoginDate As String) As String
        Dim strStatus As String = "Active"
        Dim FontColor As Color = Color.Blue
 
        If (GetInActiveDays(strLastLoginDate) > 2) Then
            strStatus = "Inactive"
        End If
 
        Return strStatus
    End Function

Please advise
Thanks in advance ..

[jhardman]

moved to .NET forum .