Based on the SQl statement below, I want to print out the results of the recordset. However, nothing is printing to the screen even though there are definitely results for the query. If I remove the following line (MEMBER.TODAYS_DATE Between " & viewDate1 & " And " & viewDate2 & "") from the SQL statement, the results print out.
Can anyone help me please???
Code:
<!--#INCLUDE FILE="Connect2DB.asp"-->
<%
dim newMemSQL
dim rsNewMem
Dim viewDate1, viewDate2
viewDate1 = Request.Form("date1")
viewDate2 = Request.Form("date2")
Dim status
status = "Approved"
newMemSQL = "SELECT MEMBER_ID, TITLE, FIRST_NAME, M_INITIAL, SURNAME, COMMENTS FROM MEMBER Where MEMBER.APP_STATUS = '" & status & "' And MEMBER.TODAYS_DATE Between " & viewDate1 & " And " & viewDate2 & ""
Set rsNewMem= Server.CreateObject("ADODB.Recordset")
rsNewMem.CursorType = 2
rsNewMem.LockType = 3
rsNewMem.Open newMemSQL, adoCon
Do While NOT rsNewMem.EOF
Response.Write (rsNewMem(0) & " ")
Response.Write (rsNewMem(1) & " ")
Response.Write (rsNewMem(2) & " ")
Response.Write (rsNewMem(3) & " ")
Response.Write (rsNewMem(4) & "</br>")
Response.write("<b>Comment: </b>")
Response.Write (rsNewMem(5) & " ")
Response.Write("<BR><HR>")
'Move to the next record in the recordset
rsNewMem.MoveNext
Loop
rsNewMem.close
set rsNewMem = nothing
adoCon.close
%>