View Single Post
 
Old June 16th, 2004, 02:52 AM
gmoney060 gmoney060 is offline
Authorized User
 
Join Date: Mar 2004
Location: , , .
Posts: 84
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via AIM to gmoney060 Send a message via MSN to gmoney060
Default

I think that worked but, it is like still not working. (I am using MS-Access) This is what I am using now.

<%
Dim objConn
Dim connString
Dim news_recordset
Set objConn = Server.CreateObject("ADODB.Connection")
connString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
            Server.MapPath("/testing/News.mdb")
objConn.Open connString

Set news_recordset = Server.CreateObject("ADODB.Recordset")
news_recordset.Source = "SELECT tdcdate, tdcmessage FROM news_messages WHERE date() between tdcopendate AND tdcclosedate"
news_recordset.ActiveConnection = objConn
news_recordset.CursorLocation = 2
news_recordset.CursorType = 0
news_recordset.LockType = 1
news_recordset.Open()
%>

<% While Not news_recordset.EOF
    Response.Write news_recordset("tdcdate") & ": " & news_recordset("tdcmessage") & "<BR>"
news_recordset.MoveNext
Wend %>

I have 14 rows of data, and it is only showing 1 row, and it is not between the 2 dates. So any sujjestions, or comments would be great.