How to print dates of month in DROP DOWN

doosti · September 29th, 2006, 05:51 AM

Dear All,

I want to print dates of the month in a drop down menu. Actually i am designing a page which will extract transactions between the supplied dates by the user. Is there any way i can print dates in a drop down menu? LIke FROM (date) TO (date)?

Farzan Q.
MS(TeleCommunication)
Mohammad Ali Jinnah University.

tctekkie · September 29th, 2006, 12:55 PM

If I understand correctly, the following code is an example of what I use. I haven't tested it so it may need to be checked for spelling, etc.

Code:

<%
'Dimension your variables
Dim sSQL, rs, oConn
Dim sConnect

Dim sSelectFrom
Dim sSelectTo

'Define your connection string
sConnect = "<your connection string>"

'Create your connection object & open
SET oConn = Server.CreateObject("ADODB.Connection")
oConn.open sConnect

'Create your recordset object
Set rs = Server.CreateObject("ADODB.Recordset")


'define sql string
sSQL = "<your sql query>"

'open the recordset containing the dates of the transactions
rs.open sSQL, oConn

'Store your select list to a variable
sSelectFrom = "<select name=""TransFrom"" id=""TransFrom"">" & vbCrlf
sSelectTo = "<select name=""TransTo"" id=""TransTo"">" & vbCrlf

if NOT rs.EOF then 'test for empty recordset
  Do UNTIL rs.eof  'loop through your recordset
     sSelectFrom = sSelectFrom & "<option value=""" & rs("TransFrom") & """>" &_
                                  FormatDateTime(rs("TransFrom"),vbShortDate) & _
                                 "</option>" & vbCrlf
     sSelectTo = sSelectTo & "<option value=""" & rs("TransTo") & """>" &_
                                  FormatDateTime(rs("TransTo"),vbShortDate) & _
                                 "</option>" & vbCrlf
     rs.MoveNext
  Loop
End If

'Finish building your select lists
sSelectFrom = sSelectFrom & "</select>" & vbCrlf
sSelectTo = sSelectTo & "</select>" & vbCrlf


'Close & Destroy your Recordset & Connection Objects 
rs.close
set rs = nothing

oConn.close
set oConn = nothing
%>

then in your HTML Code simply response.write your variables.

Hope that helps! :D

doosti · September 29th, 2006, 11:36 PM

Quote:

quote:Originally posted by tctekkie
If I understand correctly, the following code is an example of what I use. I haven't tested it so it may need to be checked for spelling, etc.

Code:

<%
'Dimension your variables
Dim sSQL, rs, oConn
Dim sConnect

Dim sSelectFrom
Dim sSelectTo

'Define your connection string
sConnect = "<your connection string>"

'Create your connection object & open
SET oConn = Server.CreateObject("ADODB.Connection")
oConn.open sConnect

'Create your recordset object
Set rs = Server.CreateObject("ADODB.Recordset")


'define sql string
sSQL = "<your sql query>"

'open the recordset containing the dates of the transactions
rs.open sSQL, oConn

'Store your select list to a variable
sSelectFrom = "<select name=""TransFrom"" id=""TransFrom"">" & vbCrlf
sSelectTo = "<select name=""TransTo"" id=""TransTo"">" & vbCrlf

if NOT rs.EOF then 'test for empty recordset
  Do UNTIL rs.eof  'loop through your recordset
     sSelectFrom = sSelectFrom & "<option value=""" & rs("TransFrom") & """>" &_
                                  FormatDateTime(rs("TransFrom"),vbShortDate) & _
                                 "</option>" & vbCrlf
     sSelectTo = sSelectTo & "<option value=""" & rs("TransTo") & """>" &_
                                  FormatDateTime(rs("TransTo"),vbShortDate) & _
                                 "</option>" & vbCrlf
     rs.MoveNext
  Loop
End If

'Finish building your select lists
sSelectFrom = sSelectFrom & "</select>" & vbCrlf
sSelectTo = sSelectTo & "</select>" & vbCrlf


'Close & Destroy your Recordset & Connection Objects 
rs.close
set rs = nothing

oConn.close
set oConn = nothing
%>

then in your HTML Code simply response.write your variables.

Hope that helps! :D

Thanks for the reply. It seems that i have to extract dates from the database and then show in he drop down menu. What i want to do is i want to generate dates automatically and have to show them in the drop down menu. And when the dates got selected then query should be run to extract the dates between the supplied dates..

If you can help me with this too?

Farzan Q.
MS(TeleCommunication)
Mohammad Ali Jinnah University.

dparsons · October 2nd, 2006, 09:30 AM

Cross post: http://p2p.wrox.com/topic.asp?TOPIC_ID=50414

--Stole this from a moderator

I will only tell you how to do it, not do it for you.
Unless, of course, you want to hire me to do work for you.