Classic ASP Discussion - Delete problem

Print Page | Close Window

Delete problem

Printed From: Web Wiz Forums
Category: General Discussion
Forum Name: Classic ASP Discussion
Forum Description: Discussion on Active Server Pages (Classic ASP).
URL: https://forums.webwiz.net/forum_posts.asp?TID=8533
Printed Date: 01 April 2026 at 7:19am
Software Version: Web Wiz Forums 12.08 - https://www.webwizforums.com

Topic: Delete problem

Posted By: twooly
Subject: Delete problem
Date Posted: 03 January 2004 at 7:10pm

I am trying to create a script that will show users online without using global.asa. I almost have it working besides one thing. I want my sql to delete entries in a table once an entry reaches a certain point. So here is what I have. My problem is it deletes everything in the table.
Suggesstions.

Here is the code:

strTimeout = 5
StrOnlineTimedout = dateadd("n",-strtimeout*60,onlinedate)

StrSql = "DELETE FROM active_users WHERE Last_Seen < '" & StrOnlineTimedout & "'"
adoCon.execute (StrSql)

I am using an access db and the column Last_Seen has a type "memo" and the form that the date entered into the column is 1/3/2004 2:40:17 PM using the now() function.

Thanks

Replies:

Posted By: ljamal
Date Posted: 03 January 2004 at 7:35pm

Change the last_seen data type to datetime

-------------
L. Jamal Walton

http://www.ljamal.com/" rel="nofollow - L. Jamal Inc : Web/ Print Design and ASP Programming

Posted By: twooly
Date Posted: 03 January 2004 at 7:49pm

I tried that when I do that I get this.

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

Posted By: twooly
Date Posted: 03 January 2004 at 8:15pm

When I change the sql to this I then get the following error

StrSql = "DELETE FROM active_users WHERE Last_Seen < " & StrOnlineTimedout

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Last_Seen < 1/3/2004 2:16:39 PM'.

Posted By: ljamal
Date Posted: 03 January 2004 at 9:06pm

Access dates need to be surrounded by number signs (#)
StrSql = "DELETE FROM active_users WHERE Last_Seen < #" & StrOnlineTimedout &"#"

-------------
L. Jamal Walton

http://www.ljamal.com/" rel="nofollow - L. Jamal Inc : Web/ Print Design and ASP Programming

Posted By: twooly
Date Posted: 03 January 2004 at 9:10pm

That did it

Thanks