nel form:
<asp
ropDownList id="Disciplina" runat="server" OnSelectedIndexChanged="Carica_Menu"></asp
ropDownList>
codice:
Sub Carica_Menu(Sender As Object, E As EventArgs)
Dim objCmd as new OleDbCommand(Query_Carica_Menu(elemento selezionato del DropDownList) , objConn)
objConn.Open
'valore della dropdown list
Categoria.DataValueField = "Menu"
' testo della dropdown list
Categoria.DataTextField = "Menu"
'esecuzione della query
Categoria.DataSource = objCmd.ExecuteReader()
Categoria.DataBind()
objConn.Close
End Sub
function Query_Carica_Menu(ByVal disciplina as string) as string
return "SELECT * FROM Menu WHERE Cat='"& disciplina &"' "
end function