ciao a tutti, devo realizzare una parte del programma per visualizzare i dati presenti in un db di tipo access nell'intervallo di tempo che va da giorno X al giorno Y.

Ho creato un db access dove ho un tabella denominata: report ed i seguenti campi: dataRegistrazione, articolo, quantita, prezzo.

Vi posto il codice delle pagine in asp da me scritte che però non riesco a far ancora funzionare:

form.asp:

<form action="report_Date.asp" method="get" name="data" target="_self" id="data">
<table width="400" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="110" class="testo">Data iniziale </td>
<td width="290" class="testo"><label>
<input name="dataInizio" type="text" class="testo" id="dataInizio" size="20" />
Formato data: gg/mm/aaaa
</label></td>
</tr>
<tr>
<td colspan="2" class="testo">[img]immagini/null.gif[/img]</td>
</tr>
<tr>
<td class="testo">Data finale </td>
<td class="testo"><input name="dataFine" type="text" class="testo" id="dataFine" size="20" />
Formato data: gg/mm/aaaa </td>
</tr>
<tr>
<td colspan="2" class="testo">[img]immagini/null.gif[/img]</td>
</tr>
<tr>
<td colspan="2" align="center" class="testo"><input name="button22" type="submit" class="testo" value="Cerca" /></td>
</tr>
</table>
</form>

report_date.asp:


<%
Dim rsReport__MMColParam
rsReport__MMColParam = "1"
If (Request.QueryString("dataRegistrazione") <> "") Then
rsReport__MMColParam = Request.QueryString("dataRegistrazione")
End If
%>
<%
dataInizio = month(Request.QueryString("dataInizio")) & "/" & day(Request.QueryString("dataInizio")) & "/" & year(Request.QueryString("dataInizio"))
dataFine = month(Request.QueryString("dataFine")) & "/" & day(Request.QueryString("dataFine")) & "/" & year(Request.QueryString("dataFine"))

Dim rsReport
Dim rsReport_numRows

Set rsReport = Server.CreateObject("ADODB.Recordset")
rsReport.ActiveConnection = MM_magazzino_STRING
rsReport.Source = "SELECT * FROM report WHERE (dataRegistrazione BETWEEN #"&dataInizio&"# And #"&dataFine&"#) ORDER BY articolo DESC"



rsReport.CursorType = 0
rsReport.CursorLocation = 2
rsReport.LockType = 1
rsReport.Open()

rsReport_numRows = 0
%>

connesione.asp

<%
Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("db.mdb")
%>

L'errore che mi esce quando eseguo la pagina è il seguente:

Tipo di errore:
ADODB.Recordset (0x800A0BB9)
Gli argomenti non sono di tipo valido, non sono compresi nell'intervallo consentito o sono in conflitto.
/test/report_Date.asp, line 21


chi mi sa aiutare per favore?


connessione.asp