select concatenate

**enrico16101990** · 12-07-2013, 14:40

salve a tutti ho scaricato questo script per estrarre regioni>comuni>città collegato ad un mdb.

codice:

 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">

<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type" />
<title>Script ASP - Ajax per popolare la select Regioni - Provincie - Comuni by 
alessio_1976</title>
<script type="text/javascript" language="javascript">
var estrai_province;
var id_regione
   
function cerca_province() 
{

id_regione=document.form.id_regione.options[document.form.id_regione.selectedIndex].value
    // branch for native XMLHttpRequest object
    if (window.XMLHttpRequest) {
        estrai_province= new XMLHttpRequest();
        estrai_province.onreadystatechange = ricevi_province;
        estrai_province.open("GET", "estrai-province.asp?id_regione="+id_regione, true);
        estrai_province.send(null);
    // branch for IE/Windows ActiveX version
    } else if (window.ActiveXObject) {
        estrai_province= new ActiveXObject("Microsoft.XMLHTTP");
        if (estrai_province) {
            estrai_province.onreadystatechange = ricevi_province;
            estrai_province.open("GET", "estrai-province.asp?id_regione="+id_regione, true);
            estrai_province.send();
        }
    }
}

     
  function ricevi_province() {   
    var province;       
	  if (estrai_province.readyState == 4) {	    
		  province=estrai_province.responseText;

			document.getElementById('provincia').innerHTML = province;
			 }
	}

var estrai_comuni;
var id_provincia
   
function cerca_comuni() 
{

id_provincia=document.form.id_provincia.options[document.form.id_provincia.selectedIndex].value
    // branch for native XMLHttpRequest object
    if (window.XMLHttpRequest) {
        estrai_comuni= new XMLHttpRequest();
        estrai_comuni.onreadystatechange = ricevi_comuni;
        estrai_comuni.open("GET", "estrai-comuni.asp?id_provincia="+id_provincia, true);
        estrai_comuni.send(null);
    // branch for IE/Windows ActiveX version
    } else if (window.ActiveXObject) {
        estrai_comuni= new ActiveXObject("Microsoft.XMLHTTP");
        if (estrai_comuni) {
            estrai_comuni.onreadystatechange = ricevi_comuni;
            estrai_comuni.open("GET", "estrai-comuni.asp?id_provincia="+id_provincia, true);
            estrai_comuni.send();
        }
    }
}

     
  function ricevi_comuni() {   
    var comuni;       
	  if (estrai_comuni.readyState == 4) {	    
		  comuni=estrai_comuni.responseText;

			document.getElementById('comuni').innerHTML = comuni;
			 }
	}

</script>
</head>

<body>
			<form method="post" action="" name="form">
			<table>
				<%nome_form="form"%>
	<tr>
		<td>Regione</td>
		<td>
			<select name="id_regione" id="id_regione" onChange="cerca_province();">
				<option value="0">Seleziona Regione</option>
		<%
Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("mdb-database/Regioni-Province-Comuni-Italia.mdb")
		SQL = "Select * From regioni order by regione asc"
		Set RS = MyConn.Execute(SQL)
		While Not RS.EOF
		%>
		<option value="<%=rs("id_regione")%>"><%=rs("regione")%></option>
		<%
		RS.MoveNext
		Wend
		RS.Close
		Set RS = Nothing
MyConn.Close
Set MyConn = Nothing
		%>
			</select>
		</td>
	</tr>
	<tr>
		<td>Provincia</td>
		<td id="provincia">
		</td>
	</tr>
	<tr>
		<td>Comune</td>
		<td id="comuni">
		</td>
	</tr>
			</table>
			</form>
</body>

</html>

per modificarlo successivamente ed inserire 9 select anziché 3, ma prima di arrivare al database access già mi redo conto che sarà un casino...

vorrei modificarlo in modo che il 2° e 3° select siano già presenti anche prima di selezionare la regione, ho provato in svariati modi ma non riesco a farli visualizzare.

estrai-province.asp

codice:

 			<select name="id_provincia" onChange="cerca_comuni();">
			<option value="0">Seleziona Provincia</option>
<%
Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("mdb-database/Regioni-Province-Comuni-Italia.mdb")
SQL = "select * from province where id_regione="&request.querystring("id_regione")&" order by provincia asc"
Set RS = MyConn.Execute(SQL)
While Not RS.EOF
	%>
		<option value="<%=rs("id_provincia")%>"><%=rs("provincia")%></option>
	<%
RS.MoveNext
Wend
RS.Close
Set RS = Nothing
MyConn.Close
Set MyConn = Nothing
%></select>

estrai-comuni.asp

codice:

 			<select name="id_comune">
			<option value="0">Seleziona Comune</option>
<%
Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("mdb-database/Regioni-Province-Comuni-Italia.mdb")
SQL = "select * from comuni where id_provincia="&request.querystring("id_provincia")&" order by comune asc"
Set RS = MyConn.Execute(SQL)
While Not RS.EOF
	%>
		<option value="<%=rs("id_comune")%>"><%=rs("comune")%> - <%=rs("cap")%></option>
	<%
RS.MoveNext
Wend
RS.Close
Set RS = Nothing
MyConn.Close
Set MyConn = Nothing
%></select>

qualcuno sa darmi qualche dritta?
grazie a tutti!!!

**cavicchiandrea** · 12-07-2013, 20:25

Di default le due select query
SQL = "select * from province where id_regione=qui-metti-id-regione-che-vuoi-che-appaia order by provincia asc"
Idem per i comuni le query saranno nella pagina iniziale al caricamento, non modificare le pagine estrai-provincie.asp e estrai-comuni.asp se ti serviranno in seguito

Discussione: select concatenate

Strumenti discussione

Ricerca discussione

Visualizza

select concarenati

Permessi di invio