ciao
mi occorre un aiutino
devo creare un pulsante cerca con una textbox in una pagina asp che inserendo una parola o un pezzo di una parola mi deve andare a cercare nel mio database di Access e tirare tutti i risultati.
grazie ...![]()
ciao
mi occorre un aiutino
devo creare un pulsante cerca con una textbox in una pagina asp che inserendo una parola o un pezzo di una parola mi deve andare a cercare nel mio database di Access e tirare tutti i risultati.
grazie ...![]()
andreacata
cos'è che non sai fare?
Testo = Replace(Trim(Request ("Testo")),"'","''")
SQL_Cerca = " SELECT * FROM Tabella WHERE 1=1 "
SQL_Cerca = SQL_Cerca & " AND Campo1 = '"& Testo &"' "
SQL_Cerca = SQL_Cerca & " OR Campo2 = '"& Testo &"' "
SQL_Cerca = SQL_Cerca & " OR Campo3 = '"& Testo &"' "
Set objRs = objConn.Execute(SQL_Cerca)
Testo = Replace(Trim(Request ("Testo")),"'","''")
non capisco questo passaggio e come lo devo inserire
ok la Select
dopo la Set objRs = objConn.Execute(SQL_Cerca)
come visualizzo i campi ?
ti chiedo troppo ?
grazie
andreacata
invii il contenuto con una form a un'altra pagina oppure alla stessa, poi visualizzi i risultati con..codice:<input type="text" name="Testo">
codice:Testo = Replace(Trim(Request ("Testo")),"'","''") SQL_Cerca = " SELECT * FROM Tabella WHERE 1=1 " SQL_Cerca = SQL_Cerca & " AND Campo1 = '"& Testo &"' " SQL_Cerca = SQL_Cerca & " OR Campo2 = '"& Testo &"' " SQL_Cerca = SQL_Cerca & " OR Campo3 = '"& Testo &"' " Set objRs = objConn.Execute(SQL_Cerca) Do while NOT objRs.EOF Response.Write objRs("Campo1 ") Response.Write objRs("Campo2 ") Response.Write objRs("Campo3 ") objRs.Movenext Lopp objRs.Close
Grazie StegcO
Adesso provo !!!
poi ti faccio ti ringrazio tantissimo per il momento.
![]()
andreacata
Il codice inserito è messo in un altra pagina !
facendo la Response.Write sql_cerca
mi da: SELECT * FROM glossario1 WHERE 1=1 AND descrizione_corta = 'halon' OR descrizione_estesa = 'halon'
objConn.Open strProvider
end sub
set objConn = server.createobject("ADODB.Connection")
objconn.mode = 3
set objRs= Server.CreateObject("ADODB.Recordset")
ApriConn
Testo = Replace(Trim(Request ("Testo")),"'","''")
sql_cerca = " SELECT * FROM glossario1 WHERE 1=1 "
sql_cerca = SQL_Cerca & " AND descrizione_corta = '"& Testo &"' "
sql_cerca = SQL_Cerca & " OR descrizione_estesa = '"& Testo &"' "
set objRs = objConn.execute(sql_cerca)
while not objRs.eof
Response.Write objRs("descrizione_corta")
Response.Write objRs("descrizione_estesa")
objConn.movenext
wend
objConn.close
Dove sbaglio ????
grazie
andreacata