Capita spesso che da un database devo estrarre un solo record e mostrare in alcune textbox i valori per le modifiche.
Io attualmente utilizzo il classico sistema dell'adapter e faccio riempire la solita datatable o dataset, che avrà quindi una sola riga, cioè faccio una cosa del genere:
Dim Query As String = "SELECT * FROM PERSONE WHERE ID=" & Id
Dim DataAdapter As New OleDbDataAdapter(Query, StrCo)
Dim DS As New DataSet
DataAdapter.Fill(DS)
With DS.Tables(0).Rows(0)
txtNome.Text = .Item("NOME")
txtCognome.Text = .Item("COGNOME")
txtFax.Text = .Item("FAX")
txtEmail.Text = .Item("EMAIL")
txtSito.Text = .Item("SITO")
txtIndirizzo.Text = .Item("INDIRIZZO")
txtCitta.Text = .Item("CITTA")
txtProvincia.Text = .Item("PROV")
txtCap.Text = .Item("CAP")
End With
DS.Dispose()
Ovviamente qui potevo utilizzare una DataTable al posto di un dataset... ma più o meno il succo è lo stesso... Non penso sia tanto elegante utilizzare questo sistema del Rows(0) e quindi estrarre i singoli item... Voi per fare una cosa del genere che soluzione adottate?