Member Avatar for priyam_maheshwa

Hi All

I am creating a database archiving tool,in which a user can delete all the data before a date he would specify.But the problem is i am not able to create a delete query which can delete a range of data.

I had created the following query

<% 
pdt=request.form("prevdate")   'contains the date starting from which data has to be deleted
cdt=request.form("currdate")    'contains the date till which data has to be deleted
' declaring variables
' not neccesary but a good habit
Dim DataConn
Dim CmdDeleteRecord
Dim MYSQL
    
Set DataConn = Server.CreateObject("ADODB.Connection")
  

Set CmdDeleteRecord = Server.CreateObject("ADODB.Recordset")
    
' The line below shows how to use a system DSN instead of a DNS-LESS connection
' DataConn.Open "DSN=System_DSN_Name"
DataConn.Open "DBQ=" & Server.Mappath("../fpdb/taxireq.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
    
MYSQL = "DELETE FROM Request_detail WHERE Repdate between '" & pdt &"' and '" & cdt &"'"
    
CmdDeleteRecord.Open MYSQL, DataConn
    
' closing objects and setting them to nothing
' not neccesary but a good habit
DataConn.Close
Set DataConn = Nothing
%>

please suggest any changes so that i can delete a range of data from the database

Thank You!!

  • 2 Contributors
  • 1 Reply
  • 78 Views
  • 13 Hours Discussion Span
  • Latest Post Latest Post by aparnesh
Member Avatar for aparnesh

For Access, use

MYSQL = "DELETE FROM Request_detail WHERE Repdate between CDate('" & pdt &"') and CDate('" & cdt &"')"
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.