Popolare campi form in automatico

[[trodat]]

Ciao; dovrei popolare in automatico il secondo ed il terzo campo di un form a secondo di quanto selezionato nel primo campo dello stesso form.

I dati sono prelevati da un DB Access 2000; vi ringrazio.

[Mems]

Qual'è la relazione tra i dati nel primo campo con i dati del secondo e terzo campo?
Parlo di relazione nelle tabelle del db.

[[trodat]]

Nel DB la relazione è di tipo uno-a-molti.

La tabella ha questi campi:

ID;
Nome_attivita;
Luogo_attivita;
Codice_attivita;
id_centro_responsabile_attivita;
centro_responsabile_Attivita;

Il primo campo del form si popola prendendo il Luogo_attivita, selezionando una valore da luogo_attivita il secondo form dovrebbe restituire il nome_attivita ed il terzo campo del form il codice_attivita previsti per quel luogo_attivita selezionato dal primo campo del form.

[Mems]

E tutto sta in una sola tabella del db?

[[trodat]]

Si.

[Daisyland]

Ma i 3 campi del form sono 3 combobox ?

[[trodat]]

Si sono tre combobox, la chiave che rende i records raggruppabili è l'id_centro_responsabile, ad esempio:

id = 1
id_centro_responsabile = 1
centro_responsabile_attivita = Campobasso
Nome_attivita = ...
Luogo_attivita = ...
Codice_attivita = ...

id = 2
id_centro_responsabile = 1
centro_responsabile_attivita = Campobasso
Nome_attivita = ...
Luogo_attivita = ...
Codice_attivita = ...

Mi spiego?

[Daisyland]

Allora prova questo, ovviamente adattandolo per l'utilizzo dell'oggetto con cui accedi al database

<SCRIPT LANGUAGE="JavaScript"> 
   function dati_attivita(){ 
	   var valore_selezionato = 0;
	   valore_selezionato=document.form1.luogo_attivita.options[document.form1.luogo_attivita.selectedIndex].value; 
	   document.form1.nome_attivita.value=valore_selezionato; 
	   document.form1.codice_attivita.value=valore_selezionato;
   } 
</SCRIPT>

<form name="form1">
 <table width="80%" border="0" cellspacing="0" cellpadding="0">
    <tr><td>Luogo attività</td></tr>
    <tr><td>
<%
strSql = "SELECT ID, LUOGO_ATTIVITA, FROM TABELLA"
objRs.Open strSql, objConn, 3, 3
%>
        <select size="1" name="luogo_attivita" onChange="if(this.selectedIndex!=0){dati_attivita()}">
          <option value="0">-------- SELEZIONARE --------</option>
<%
If Not objRs.EOF Then
Do While Not objRs.EOF
%>
          <option value= "<% = objRs("ID") %>"><%  = Trim(objRs("LUOGO_ATTIVITA")) %></option>
<%
objRs.MoveNext
Loop
End If
objRs.Close
%>
        </select>
</td></tr>
    <tr><td>Nome attività</td></tr>
    <tr><td> 
<%
strSql = "SELECT ID, NOME_ATTIVITA FROM TABELLA"
objRs.Open strSql, objConn, 3, 3
%>
        <select name="nome_attivita" onChange="this.selectedIndex=valore_selezionato">
          <option value="0">---</option>
<%
If Not objRs.EOF Then
Do While Not objRs.EOF
%>
          <option value= "<% = objRs("ID") %>"><%  = objRs("NOME_ATTIVITA") %></option>
<%
objRs.MoveNext
Loop
End If
objRs.Close
%>
        </select>
</td></tr>

<tr><td>Codice attività</td></tr>
    <tr><td> 
<%
strSql = "SELECT ID, CODICE_ATTIVITA FROM TABELLA"
objRs.Open strSql, objConn, 3, 3
%>
        <select name="codice_attivita"onChange="this.selectedIndex=valore_selezionato">
          <option value="0">---</option>
<%
If Not objRs.EOF Then
Do While Not objRs.EOF
%>
          <option value= "<% = objRs("ID") %>"><%  = objRs("CODICE_ATTIVITA") %></option>
<%
objRs.MoveNext
Loop
End If
objRs.Close
%>
        </select>
</td></tr>
</table>
</form>

[Daisyland]

L'ID che ho messo sopra, nelle 3 select, intendo che sia la primary key della tua tabella.

[[trodat]]

Si grazie ho capito, ma restituisce:

document.form1.luogo_attivita è nullo o non è un oggetto