Harry Wheat
|
| Posted: 06/05/2002, 8:11 PM |
|
I cannot get the last Login date to store in the database. Can someone help
me. The Code I use is below.
Thanks
Dim Connection
If Login_DoLogin_OnClick = True Then
Set Connection = New clsDBmembers
Connection.Open
Connection.Execute("UPDATE users SET date_last_login=#" & Now() & "#,
last_login_ip=" & CCToSQL(Request.ServerVariables("REMOTE_ADDR"),"Text") & "
WHERE user_id=" & CCToSQL(CCGetUserID,"Integer"))
' Connection.Execute("UPDATE users SET last_login_date=#" & Now() & "#,
last_login_ip=" & CCToSQL(Request.ServerVariables("REMOTE_ADDR"),"Text") & "
WHERE user_id=" & CCToSQL(CCGetUserID,"Integer"))
Connection.Close
Set Connection = Nothing
|
|
|
 |
Chris Seymour
|
| Posted: 06/06/2002, 4:18 AM |
|
HI Harry,
Try this
Connection.Execute("UPDATE users SET date_last_login=#" & Now() & "#,
last_login_ip='" & CCToSQL(Request.ServerVariables("REMOTE_ADDR"),"Text") & "'
WHERE user_id=" & CCToSQL(CCGetUserID,"Integer"))
Just a thought.
Cheers.
|
|
|
|
Harry Wheat
|
| Posted: 06/06/2002, 5:48 AM |
|
Fixed the Problem. There was a simple Misspell in the Field Name in the
Common.Asp File.
Harry
"Harry Wheat" <sales@ifixpcs.com> wrote in message
news:admjsg$imd$1@news.codecharge.com...
> I cannot get the last Login date to store in the database. Can someone
help
> me. The Code I use is below.
> Thanks
> Dim Connection
> If Login_DoLogin_OnClick = True Then
> Set Connection = New clsDBmembers
> Connection.Open
> Connection.Execute("UPDATE users SET date_last_login=#" & Now() & "#,
> last_login_ip=" & CCToSQL(Request.ServerVariables("REMOTE_ADDR"),"Text") &
"
> WHERE user_id=" & CCToSQL(CCGetUserID,"Integer"))
> ' Connection.Execute("UPDATE users SET last_login_date=#" & Now() & "#,
> last_login_ip=" & CCToSQL(Request.ServerVariables("REMOTE_ADDR"),"Text") &
"
> WHERE user_id=" & CCToSQL(CCGetUserID,"Integer"))
> Connection.Close
> Set Connection = Nothing
>
>
|
|
|
|
|
