'per la casella periodo
dim objcmd as new oledbdataadapter ("select DISTINCT (nome_cognome) from indennita where data_ricevuta_anno="& annox &" order by id desc", objconn)
dim ds as dataset=new dataset()
objcmd.fill (ds,"indennita")
Dim strSQL as String = "select DISTINCT (nome_cognome) from indennita where data_ricevuta_anno="& annox &" order by id desc"
Dim objCmd2 as OleDbCommand
objConn.Open()
objCmd2 = new OleDbCommand(strSQL, objConn)
dim MyCommand As New OledbDataAdapter(strSQL,objConn)
ds = new DataSet()
MyCommand.Fill(ds, "nome_cognome")
objConn.Close
docenti.DataTextField="nome_cognome" ' campo visualizzato
docenti.DataValueField="nome_cognome" ' campo di valore
docenti.DataBind()
docenti.DataSource=ds
docenti.DataMember="nome_cognome"
docenti.DataTextField="nome_cognome" ' campo visualizzato
docenti.DataValueField="nome_cognome" ' campo di valore
docenti.DataBind()
''''