Ciao a tutti, io dovrei fare eseguire alla pagina asp una ricerca per data, ho provato a leggere i vari post ma non ho trovato esempi calzanti.
I campi data1 e data2 non esistono nel db ma esiste il campo data che deve essere confrontata con data1 e data2 per restituire i record corretti
Mi hanno suggerito di usare i request.form invece del request.querysting ma non ho avuto successo: in tutti i modi e con relative sintassi mi appare sempre 1 errore di questa natura
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query 'data BETWEEN AND'.
/alphyra2/elenco5.asp, line 70
Qualcuno può aiutarmi, please???? :berto:
<%
data1=replace(Request.querystring("data1"),"'","'' ")
data2=replace(Request.querystring("data2"),"'","'' ")
Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("db\alphyra.mdb")
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Prima pagina</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body topmargin="0" leftmargin="0">
<table width="100%" border="0">
<tr>
<td>[img]palmare.jpg[/img]</td>
<td><font face="Verdana, Arial, Helvetica, sans-serif"><font color="#0033CC" size="6">GESTIONE
RESO SCONTRINI ALPHYRA</font></font></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="136" background="label.jpg"><div align="center"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Inserisci</font></div></td>
<td width="137" background="label.jpg"><div align="center"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Elenco</font></div></td>
<td width="135" background="label.jpg"><div align="center"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Sintesi</font></div></td>
</tr>
</table>
<form name="form1" method="get" action="">
<font size="2" face="Verdana, Arial, Helvetica, sans-serif">data da
</font>
<input name="data1" type="text" id="data1">
a
<input name="data2" type="text" id="data2">
<input type="submit" name="Submit" value="Invia">
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">
</font>
</form>
<%
SQL="SELECT * FROM scontrini WHERE data BETWEEN "&data1&" AND "&data2&" "
Set rec = Server.CreateObject("ADODB.Recordset")
Set rec=Conn.Execute(SQL)
%>
<table width="48%" border="2" cellpadding="0" cellspacing="0">
<tr bordercolor="#FFFFFF" bgcolor="#8DB4B4">
<td width="43%"> <div align="left"><font color="#666666" size="1" face="Verdana, Arial, Helvetica, sans-serif"><font color="#000000">DATA</font></font></div></td>
<td width="57%"> <div align="left"><font color="#FFFFFF" size="1" face="Verdana, Arial, Helvetica, sans-serif"><font color="#000000">TOT
IMPORTO </font></font></div></td>
</tr>
<%
Do Until rec.EOF
%>
<tr bordercolor="#FFFFFF" bgcolor="#8DB4B4">
<td> <div align="left"><font color="#666666" size="1" face="Verdana, Arial, Helvetica, sans-serif"><font color="#333399" size="2" face="Verdana, Arial, Helvetica, sans-serif"><%=rec("ean")%></font></font></div></td>
<td> <div align="left"><font color="#333399" size="2" face="Verdana, Arial, Helvetica, sans-serif">€<font color="#333399" size="2" face="Verdana, Arial, Helvetica, sans-serif"><%=rec("importo")%></font></font></div></td>
</tr>
<%
rec.MoveNext
Loop
%>
</table>
</body>
</html>
Rispondi quotando
