[VB6]: Access e FlexGrid

[vr-claudio]

Ciao ragazzi
sono qui con i miei soliti problemi con la flexgrid, cioè mi faccio capire meglio...
Io so' inserire un record alla volta in un record di una tabella access tramite le textbox, ma non so' assolutamente inserire i dati di una flexgrid all'interno di un record Access.

Qui sotto vi inserisco un pezzo di codice che utilizzo per inserire i dati delle text nel record di una tabella access:

Dim DB As ADODB.Connection
Dim T As ADODB.Recordset
Dim strCnn As String
Set DB = New ADODB.Connection
strCnn = "" _
& "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:\ESEMPIO\DB\PIPPO.mdb"
DB.Open strCnn
Set T = New ADODB.Recordset
T.LockType = adLockOptimistic
T.Open "ID", DB, , , adCmdTable
T.AddNew
T("NOME") = TXT_NOME.Text
T("COGNOME") = TXT_COGNOME.Text
T("DATA") = LBL_DATA.Caption
T.Update
T.Close
DB.Close

Se avete un esempio dove io possa indirizzarmi ve ne sarei molto grato...
grazie mille vr-claudio

[yyzyyz]

cambia controllo , utilizza datagrid > personalizza > generale > allowaddnew

[gibra]

Originariamente inviato da vr-claudio
Ciao ragazzi
sono qui con i miei soliti problemi con la flexgrid, cioè mi faccio capire meglio...
Io so' inserire un record alla volta in un record di una tabella access tramite le textbox, ma non so' assolutamente inserire i dati di una flexgrid all'interno di un record Access.

Il che non sarebbe proprio un errore.
Non so se tu sai i problemi a cui vai incontro nel permettere all'utente di aggiungere i dati da un griglia...
Oltretutto codice che riguarda la flexgrid, qui sotto non ne vedo. :rollo:
- qual'è il tuo problema?
- quale flexgrid usi?
- come sono caricati i dati nella griglia?

Originariamente inviato da vr-claudio
Qui sotto vi inserisco un pezzo di codice che utilizzo per inserire i dati delle text nel record di una tabella access:

Dim DB As ADODB.Connection
Dim T As ADODB.Recordset
Dim strCnn As String
Set DB = New ADODB.Connection
strCnn = "" _
& "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:\ESEMPIO\DB\PIPPO.mdb"
DB.Open strCnn
Set T = New ADODB.Recordset
T.LockType = adLockOptimistic
T.Open "ID", DB, , , adCmdTable
T.AddNew
T("NOME") = TXT_NOME.Text
T("COGNOME") = TXT_COGNOME.Text
T("DATA") = LBL_DATA.Caption
T.Update
T.Close
DB.Close

- come mai non controlli PRIMA se il record esiste già?
- perchè apri il recordset usando adCmdTable ?

Ciao

[vr-claudio]

e quindi?