Click here to Skip to main content
16,005,222 members
Please Sign up or sign in to vote.
0.00/5 (No votes)
See more:
VB
'   The table in whih is displayed the login/logout history for this use
Response.Write "<table cellspacing=2 cellpadding=2 width=50% >"
Response.Write "<tr bgcolor=#333366>"
Response.Write "<td><font class=colltitle>SessionID:</a></td>"
Response.Write "<td><font class=colltitle>Login Time:</a></td>"
Response.Write "<td><font class=colltitle>Logout Time:</a></td>"
Response.Write "</tr>" & vbcrlf

i = 1
while not rs_Log.EOF
    if i mod 2 then
        Response.Write "<tr class=defaultsmall>"
    else
        Response.Write "<tr class=defaultsmall bgcolor=#dedede>"
    end if
    Response.Write "<td>" & rs_Log("SID") & "</td>"
    Response.Write "<td>" & rs_Log("Login_Time") & "</td>"
    if rs_Log("Logout_Time") <> "" then
        Response.Write "<td>" & rs_Log("Logout_Time") & "</td>"
    else
        Response.Write "<td>N/A</td>"
    end if
    Response.Write "</tr>" & vbcrlf
    i = i + 1
    rs_Log.MoveNext
wend
Response.Write "</table>"
Posted
Updated 31-Oct-13 7:08am
v2
Comments
ZurdoDev 31-Oct-13 13:09pm    
Please ask a question.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS


CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900