Visualizzazione dei risultati da 1 a 5 su 5
  1. #1
    Utente di HTML.it
    Registrato dal
    Aug 2005
    Messaggi
    53

    query between campi data

    Ciao a tutti ho questo genere di problema:
    dopo aver fissato le variabili nel querystring e averle passate tramite il form all'Url mi dà errore sulla query e ho notato che mi passa le variabili in questa maniera:

    elenco3.asp?data1=22%2F11%2F2007&data2=24%2F11%2F2 007&Submit=Invia

    Potete aiutarmi?

    <%
    data1=replace(Request.querystring("data1"),"'","'' ")
    data2=replace(Request.querystring("data2"),"'","'' ")
    %>


    <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">
    </form>

    <%
    SQL="SELECT * FROM scontrini WHERE data BETWEEN '"&data1&"' AND '"&data2&"' "

    Set rec = Server.CreateObject("ADODB.Recordset")
    Set rec=Conn.Execute(SQL)
    %>

  2. #2
    Perchè non fai la form con method="post" ed usi reques.form invece di request.queryString ?

  3. #3
    Utente di HTML.it
    Registrato dal
    Aug 2005
    Messaggi
    53
    Ho provato a fare come mi hai suggerito ma mi dà sempre errore sulla query
    <%
    SQL="SELECT * FROM scontrini WHERE data BETWEEN '"&data1&"' AND '"&data2&"' "

    Set rec = Server.CreateObject("ADODB.Recordset")
    Set rec=Conn.Execute(SQL)
    %>

    L'errore è:
    Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

    [Microsoft][Driver ODBC Microsoft Access] Tipi di dati non corrispondenti nell'espressione criterio.

    /alphyra2/elenco4.asp, line 70

  4. #4
    codice:
    <%
    SQL="SELECT * FROM scontrini WHERE data BETWEEN #"&data1&"# AND #"&data2&"#"
    
    Set rec = Server.CreateObject("ADODB.Recordset")
    Set rec=Conn.Execute(SQL)
    %>

  5. #5
    Utente di HTML.it
    Registrato dal
    Aug 2005
    Messaggi
    53
    Niente da fare...prova a postarti il codice

    <%
    data1=replace(Request.form("data1"),"'","''")
    data2=replace(Request.form("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>
    <p align="left"><font face="Verdana, Arial, Helvetica, sans-serif"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Codice
    pdv:
    <% response.write idpdv %>
    </font>
    </font>

    </p>

    <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="post" 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("data")%></font></font></div></td>
    <td> <div align="left"><font color="#333399" size="2" face="Verdana, Arial, Helvetica, sans-serif">&euro;<font color="#333399" size="2" face="Verdana, Arial, Helvetica, sans-serif"><%=rec("totimporto")%></font></font></div></td>
    </tr>
    <%
    rec.MoveNext
    Loop
    %>
    </table>

    </body>
    </html>

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.