Oppure

Loading
02/12/06 19:29
jamby
Come da oggetto come posso fare?
Ho utilizzato questo codice:

' Apro la connessione
conn1.Open()

' Imposto la Stringa SQL (si potrebbe assegnare una tabella o una query)
Dim dbComm As OleDbCommand = New OleDbCommand("SELECT connessioni.id, connessioni.data, utenti.cognome, utenti.nome, connessioni.inizio, connessioni.durata, connessioni.tot_euro FROM utenti, connessioni WHERE connessioni.id_utente=utenti.id AND connessioni.data='" & appu.Text & "'", conn1)

' Ovviamente comando di tipo testo (in questo caso)
dbComm.CommandType = CommandType.Text

' Assegno il comando al Data Adapter
dbApt.SelectCommand = dbComm

' ***********
ds1 = New DataSet

' ripulisco il dataset
ds1.Clear()

' popolo il dataset
dbApt.Fill(ds1, "connessioni";)


'modifico i titoli delle colonne
ds1.Tables("connessioni";).Columns("id";).ColumnName = "COD."
ds1.Tables("connessioni";).Columns("data";).ColumnName = "DATA"
ds1.Tables("connessioni";).Columns("cognome";).ColumnName = "COGNOME"
ds1.Tables("connessioni";).Columns("nome";).ColumnName = "NOME"
ds1.Tables("connessioni";).Columns("inizio";).ColumnName = "INIZ. ORA"
ds1.Tables("connessioni";).Columns("durata";).ColumnName = "DURATA"
ds1.Tables("connessioni";).Columns("tot_euro";).ColumnName = "TOT. €"

'Assegno la sorgente al Datagrid
DataGrid1.DataSource = ds1

' Assegno la tabella da visualizzare
DataGrid1.DataMember = "connessioni"

DataGrid1.Enabled = True

' chiudo la connessione
conn1.Close()




Nella colonna ds1.Tables("connessioni";).Columns("inizio";).ColumnName = "INIZ. ORA" invece di scrivere un valore di tipo data come questo 1.43.22 mi scrive 30/12/189
....COME DEVO FARE?
aaa
02/12/06 19:41
jamby
Come non detto risolto....:asd:
Ho cambiato il valore del Campo in Testo
:k:
aaa