Pup up

freevideogame

Nuovo Utente
2 Lug 2004
10
0
0
www.freevideogame.net
Ciao a tuti ho un piccolissimo problema che non riesco a risolvere.
Ho creato un form di ricerca sul mio sito, che come vedete porta ad una pagina chiamata search.asp, ora come posso far aprire questa pagina in un pop up?
Questo il codice del form.
<form method="POST" action="search.asp">
<br>
<input type="text" name="search" size="14"> <input type="submit" value="CERCA">
</form>


Questo della pagina search..
<%
Dim Cerca
Cerca = Replace(Request.Form("search"), "'", "")
if Cerca = "" then
Response.write "Errore. Non hai inserito nessun termine da cercare"
Response.end
end if

Dim DbPath, Conn
DbPath="/mdb-database/****"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DbPath)

Dim strSQL, Rs
strSQL = "Select * from RICERCA where NOME_PAGINA like '%" & Cerca & "%' or SEARCH_WORDS like '%" & Cerca & "%' order by ID desc"
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open strSQL, Conn, 3, 3

if Rs.EOF then
Response.write "Nessun risultato trovato!"
else
Do while NOT Rs.EOF
Response.write "<a href=" & Rs("URL") & ">" & Rs("NOME_PAGINA") & "</a><br>" & Rs("DESCRIZIONE") & "<br><br>"
Rs.MoveNext
Loop
End If

Rs.close
Set Rs = Nothing
Conn.close
Set Conn = Nothing
%>
 
Penso di aver trovato la soluzione!

Scusa se mi dedico solo adesso al tuo problema, ma il tempo è tiranno!

Ho pensato e realizzato questo script che lo devi applicare nella pagina di invio dati! In questa pagina togli pure l'azione verso search.asp!

<script language="JavaScript" type="text/JavaScript">
function ricerca() {
param=document.NOMEFORM.NOMECAMPO.value;
window.open("search.asp?search="+param+"","serach","width=30 height=30");
}
</script>


Al pulsante del form, applichi lo script e dovrebbe funzionare!

Attento però nella pagina search.asp, invece di richiamare con Request.Form, devi cambiare con Request.QueryString!

<%
Dim Cerca
Cerca = Replace(Request.QueryString("search"), "'", "")
if Cerca = "" then
Response.write "Errore. Non hai inserito nessun termine da cercare"
Response.end
end if



Ciao e buon lavoro!
 

Discussioni simili