Funzione Cerca ?!

[wertax]

Ciao a tutti,
ho sviluppato una pagina che cerca in un db
cerca dalla data alla data...
Poi ho fatto una pagina che restituisce il risultato ma non mi visualizza nulla.
allego la select:


è corretta?!
questo è quello che scrive sulla barra degli indirizzi quando premo il bottone cerca:

http://intranet.pe92.it/edp/Storico_Attivita/elenco.asp?sviluppatore=&commessa=&stato_chiusura=&dat_apertura=11%2F05%2F2005+&dat_apertura2=27%2F05%2F2005+&Submit=Cerca

[rixx]

l'hai sviluppata tu o dw? :rollo:

[santino83]

ma forse ci devi postare il codice di come costruisci la query?

e poi cos'è "2F" prima del mese e dell'anno?

[wertax]

Questo è il codice del form di ricerca:

<form name="form1" method="get" action="elenco.asp">
                            <table width="95%"  border="0" align="center" cellpadding="5" cellspacing="0">
                              <tr>
                                <td colspan="4" class="verd12b"><center>
                                  Motore di Ricerca
                                </center></td>
                                </tr>
                              <tr>
                                <td width="16%" class="verd12b"><div align="right">Sviluppatore:</div></td>
                                <td colspan="3"><select name="sviluppatore" id="sviluppatore">
                                  <option value="">TUTTI</option>
                                  <%
While (NOT R_sviluppatore.EOF)
%>
                                  <option value="<%=(R_sviluppatore.Fields.Item("nome_cognom").Value)%>"><%=(R_sviluppatore.Fields.Item("nome_cognom").Value)%></option>
                                  <%
  R_sviluppatore.MoveNext()
Wend
If (R_sviluppatore.CursorType > 0) Then
  R_sviluppatore.MoveFirst
Else
  R_sviluppatore.Requery
End If
%>
                                </select></td>
                              </tr>
                              <tr>
                                <td class="verd12b"><div align="right">Commessa:</div></td>
                                <td colspan="3"><label>
                                  <select name="commessa" id="commessa">
                                    <option value="">TUTTE</option>
                                    <%
While (NOT R_commessa.EOF)
%>
                                    <option value="<%=(R_commessa.Fields.Item("commessa").Value)%>"><%=(R_commessa.Fields.Item("commessa").Value)%></option>
                                    <%
  R_commessa.MoveNext()
Wend
If (R_commessa.CursorType > 0) Then
  R_commessa.MoveFirst
Else
  R_commessa.Requery
End If
%>
                                  </select>
                                </label></td>
                              </tr>
                              <tr>
                                <td class="verd12b"><div align="right">Tipo Lavoro : </div></td>
                                <td colspan="3"><label>
                                  <select name="stato_chiusura" id="stato_chiusura">
                                    <option value="">TUTTE</option>
                                    <%
While (NOT R_stato_chiusura.EOF)
%>
                                    <option value="<%=(R_stato_chiusura.Fields.Item("stato_chiusura").Value)%>"><%=(R_stato_chiusura.Fields.Item("stato_chiusura").Value)%></option>
                                    <%
  R_stato_chiusura.MoveNext()
Wend
If (R_stato_chiusura.CursorType > 0) Then
  R_stato_chiusura.MoveFirst
Else
  R_stato_chiusura.Requery
End If
%>
                                  </select>
                                </label></td>
                              </tr>
                              <tr>
                                <td class="verd12b"><div align="right">dalla Data:</div></td>
                                <td width="23%"><label>
                                  <input name="dat_apertura" type="text" id="dat_apertura">
                                </label></td>
                                <td nowrap class="verd12b"><div align="right">alla data:</div></td>
                                <td nowrap class="verd12b"><input name="dat_apertura2" type="text" id="dat_apertura2">
                                  formato(gg/mm/aaaa)</td>
                              </tr>
                              <tr>
                                <td colspan="4" class="verd12b">
                                  <center>
                                    <label>
                                    <input type="submit" name="Submit" value="Cerca">

<input type="submit" name="Submit2" value="Svuota Campi">
                                    </label>
                                    </center></td>
                                </tr>
                            </table>
                          </form>

[Sypher]

Originariamente inviato da santino83
e poi cos'è "2F" prima del mese e dell'anno?

direi che %2F è lo slash o il trattino

[santino83]

beh

il form è bellissimo

ma esiste una query che processa i dati raccolti dal form e li usa per interrogare un database?

ma il metodo del form non dev'essere "post" invece di "get"? che fa elenco.asp?

ma da questo form io scelgo i parametri di ricerca e poi in elenco .asp mi visualizza i risultati? allora deve per forza essere post altrimenti ad elenco.asp non gli arriva una mazza.

[santino83]

eheheh sypher lo ammetto...so negato in molte cose non ci avevo pensato al trattino

[wertax]

Variando il metodo da get a post... carica la pagina elenco.asp con tutti i dati presenti nella tab. ma senza filtrare il range di date passate dal form.

Questo è il codice del recordset della elenco.asp:

<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_connessione_STRING
Recordset1.Source = "SELECT *  FROM T_attivita_edp  WHERE sviluppatore LIKE '" + Replace(Recordset1__MMColParam, "'", "''") + "' AND commessa LIKE '" + Replace(Recordset1__MMColParam1, "'", "''") + "' AND tipo_lavoro LIKE '" + Replace(Recordset1__MMColParam2, "'", "''") + "' and dat_apertura >= #" + Replace(Recordset1__MMColParam3, "'", "''") + "# and dat_apertura <= #" + Replace(Recordset1__MMColParam4, "'", "''") + "#  ORDER BY dat_apertura DESC"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>

[santino83]

non so se funge, però prova:

" and dat_apertura between #" + Replace(Recordset1__MMColParam3, "'", "''") + "# and #" + Replace(Recordset1__MMColParam4, "'", "''") + "#"

odio i prefatti di dreamweaver. w il manuale

[wertax]

non funziona...
magari è colpa mia...
prova a darmi il codice partendo dalla "SELECT * FROM T_attivita

Magari sbaglio io...

Con queste modifiche il form deve sempre inviare i dati in modalità get?