Pippo da vedere
Domini
.it GRATIS
Registrazione domini+Spazio web
Spot
Cerca in Pippo.it
Ultimi post del forum
Ultimi dal mercatino
|
<%@LANGUAGE = JScript%>
Cap - codici avviamento postale
Ricerca CAP: digitare il nome del Comune
<%
var cerca = new String(Request.QueryString("cerca"));
var testo = new String(Request.Form("stringa"));
var apice = testo.replace(/'/g,"''");
var stringa = apice.split(" ");
if (cerca == "OK")
{
if (testo == "" || testo == "undefined")
{
Response.Write("Inserire almeno una provincia per effettuare una ricerca ");
}
else
{
var Cn = new ActiveXObject("ADODB.Connection");
Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("CAP_db.mdb"));
var sql = "SELECT * FROM Comuni WHERE";
for (var i=0; i 0)
{
sql += " AND";
}
sql += " DES_COMUNE LIKE '%" + stringa[i] + "%'";
}
var Mostra = Cn.Execute(sql);
if (Mostra.EOF)
{
Response.Write("Nessun risultato ");
}
else
{
while (!Mostra.EOF)
{
with (Response)
{
Write("");
Write(Mostra("DES_COMUNE"));
Write(" ");
Write("(");
Write(Mostra("DES_PROVIN"));
Write(")");
Write(" ");
Write("codice cap: ");
Write("");
Write(Mostra("COD_CAP"));
Write("");
Write(" ");
Mostra.MoveNext();
}
}
}
Cn.Close();
}
}
%>
|
|
Spot
Pippo Bellezze
Da vedere in rete
|