Mi da errore di - Microsoft jvscript - runtime 800a13921

errore nella pagina.asp rigo 385 - al rigo 385 ho:


<%if (testo != "undefined") {%>

Avevo impicciato qualcosa ----------------------->

Va bene inserisco il codice ma il risultato non cambia non mi fa la ricerca per porte, x chiave si.

Codice midificato:

<%@LANGUAGE = JScript%>
<%
Response.Buffer = true;
var Cn = new ActiveXObject("ADODB.Connection");
Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("/mdb-database/cerca.mdb"));
var testo = new String(Server.HTMLEncode(Request.Form("cerca")));
//Response.Write(testo +"
")
var r_testo = testo.replace(/'/g,"''");
//Response.Write(r_testo +"
")
var cerca = r_testo.split(" "); //
var sql = "SELECT * FROM risultati WHERE 1=1 ";
var where=""
var i
for (i=0; i<cerca.length; i++)

for (i=0; i<cerca.length; i++)
{
if(i==0){
sql += " AND ";
}else{
sql += " OR ";
}
sql += "(chiave LIKE '%" + cerca[i] + "%' OR Porte LIKE '%" + cerca[i] + "%')";
}
sql += " ORDER BY Porte Asc";
//Response.Write(sql) ;
//Response.End;
var Mostra = Cn.Execute(sql);
%>