Ciao a tutti
come posso modificare il codice sotto che visualizza il risultato di una ricerca affinchè possa fare la ricerca su 2 o 3 campi?
------------------------------------
SELECT *
FROM TabRicerca
WHERE NOME = 'MMColParam'
ORDER BY NOME ASC
------------------------------------
Pierhagi
Prova così:
Applica la stessa logica di controllo campi, per tutti quelli che (opzionali) hai nella tua pagina di ricerca e componi dinamicamente la query in funzione appunto di ciò.codice:strsql = "SELECT * " & _ "FROM TabRicerca " if NOME <> "" then strsql = strsql & "WHERE NOME = '" & MMColParam & "'" end if strsql = strsql & "ORDER BY NOME ASC
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Purtroppo lo scrivo con la "finestra" di DW e mi dice:
"inserire un'istruzione SELECT o una chimata a una stored procedure ceh restituiva un recordset".
X favore qlc sa rispondermi?
Pierhagi
Lo scrivi nel codice a mano
Comunque non ho molto capito il tuo problema
FEDERIX.IT - [Pillola] GRAFICA DEI FORM
...ho ancora quella forza che ti serve, quando dici "Si comincia!"
Credo che quanto gli ho scritto ieri sera, sia ciò che chiede, ma deve entrare nell'ottica di scrivere il codice a manina.Originariamente inviato da Federix
Lo scrivi nel codice a mano
Comunque non ho molto capito il tuo problema
Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!
Ciao Federix
ho fatto 2 due pagine una di ricerca che va a cercare un termine nel db e una di visualizzazione.
Il codice che ho scritto è della pagina di visualizzazione ma fa la ricerca in un campo solo della tabella del mio db. Io vorrei che facesse la ricerca su + campi.
Purtroppo conosco il codice tramite DW...quindi poco!
Pier
Hai ragione maximum xrò è un pò dura.
Dato che ho molti vi passo il codice dell'inizio della pagina visualizza :
---------------------------------------------------------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rs_fulminanti__MMColParam
rs_fulminanti__MMColParam = "1"
If (Request.QueryString("CampoRicerca") <> "") Then
rs_fulminanti__MMColParam = Request.QueryString("CampoRicerca")
End If
%>
<%
Dim rs_fulminanti
Dim rs_fulminanti_numRows
Set rs_fulminanti = Server.CreateObject("ADODB.Recordset")
rs_fulminanti.ActiveConnection = MM_Conn_Fulminanti_STRING
strsql = "SELECT * " & _
"FROM TabFulminanti "
if NOME <> "" then
strsql = strsql & "WHERE NOME = '" & MMColParam & "'"
end if
strsql = strsql & "ORDER BY NOME ASC"
rs_fulminanti.CursorType = 0
rs_fulminanti.CursorLocation = 2
rs_fulminanti.LockType = 1
rs_fulminanti.Open()
---------------------------------------------------------------------
Il codice mi dava errori sull'ultima riga e cioè:
rs_fulminanti.Open()
Purtroppo non sono sicuro anche del codice della pagina di ricerca . Credo che faccia la ricerca solo nel campo nome, vero?
---------------------------------------------------------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rs_fulminanti__MMColParam
rs_fulminanti__MMColParam = "1"
If (Request.QueryString("CampoRicerca") <> "") Then
rs_fulminanti__MMColParam = Request.QueryString("CampoRicerca")
End If
%>
<%
Dim rs_fulminanti
Dim rs_fulminanti_numRows
Set rs_fulminanti = Server.CreateObject("ADODB.Recordset")
rs_fulminanti.ActiveConnection = MM_Conn_Fulminanti_STRING
rs_fulminanti.Source = "SELECT CATEGORIA, NOME, DATA, DESCRIZIONE, LINK, LINK2 FROM TabFulminanti WHERE NOME = '" + Replace(rs_fulminanti__MMColParam, "'", "''") + "'"
rs_fulminanti.CursorType = 0
rs_fulminanti.CursorLocation = 2
rs_fulminanti.LockType = 1
rs_fulminanti.Open()
rs_fulminanti_numRows = 0
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Documento senza titolo</title>
</head>
<body>
<form action="risultato2.asp" method="get" name="FormRicerca" target="_blank" id="FormRicerca">
<input name="CampoRicerca" type="text" id="CampoRicerca">
</p>
<input type="submit" name="Submit" value="Invia">
</p>
</form>
Risultato</p>
</body>
</html>
<%
rs_fulminanti.Close()
Set rs_fulminanti = Nothing
%>
---------------------------------------------------------------------
Ieri sono riuscito a fargli fare la ricerca su 2 campi, xrò nn come ci sono arrivato. Preferisco che mi correggete questo codice così so che è il modo giusto di fare e nn mi produce altri errori.
Pier
Ho provcato a scriverlo a mano ma sblaglio qlc.
Nessuno sa?
Pier
posta l'errore
Permessi di invio
Rispondi quotando