Modifier une BDD via un true DBGrid

cs_Nicos77 Messages postés 13 Date d'inscription lundi 17 février 2003 Statut Membre Dernière intervention 12 mai 2003 - 4 mars 2003 à 12:09
isims20 Messages postés 1 Date d'inscription vendredi 18 février 2005 Statut Membre Dernière intervention 10 avril 2008 - 10 avril 2008 à 17:56
Alors j'ai une base de donnée qui s'affcihe dans un TDBGrid !!!
Ensuite en cliquant sur un bouton j'autorise l'ajout de ligne (enfin je crois)

TDBGrid1.AllowAddNew = True

Puis j'ai crée un text Box dans lekel je désire taper la modification puis validé. Ceci doit changer la donnée dans mon TDBGrid.

Voici le code

Private Sub cmdUser_Click()
TDBGrid1.CurrentCellModified = True
TDBGrid1.EditActive = True
TDBGrid1.Text = txtUser.Text
End Sub

Là lorsque je suis placé sur une cellule contenant une donnée j'ai "Erreur défini par l'application ou par l'objet" ==> Par contre en arrière plan je vois que la donnée est modifié dans le TDBGrid

par contre si je me place dans la cellule crée par TDBGrid1.AllowAddNew = True (qui est vide) j'ai "La classe ne gère pas soit Automation ou l'interface attendue" et la donnée n'a pas changé, toujours vide !!

Je sais que mon explication est vague mais j'ai fait de mon mieux !!

En espérant ne pas être délété, je vous remerci d'avance !!!

Excusez moi d'être débutant

4 réponses

Tigris94 Messages postés 27 Date d'inscription mardi 14 mai 2002 Statut Membre Dernière intervention 29 juillet 2004
4 mars 2003 à 14:46
aucune idée :)
dis moi ce que tu veux faire précisement. en truc final. jai jamais utilisé dbgrid mais bon y a ptet moyen de faire autrement.
0
cs_Nicos77 Messages postés 13 Date d'inscription lundi 17 février 2003 Statut Membre Dernière intervention 12 mai 2003
4 mars 2003 à 14:57
G pas le choix, je suis en alternance et mon tuteur veux que j'utilise un TDBgrid et pas un DBGrid

DOnc ma table s'affiche dans le TDBGrid et je voudrais modifié, ajouter ou supprimer des donnée via cet objet !!!
Excusez moi d'être débutant
0
ramm50 Messages postés 3 Date d'inscription mercredi 3 mars 2004 Statut Membre Dernière intervention 25 octobre 2004
15 oct. 2004 à 12:40
Il faut ecrire ca :

With rs
.ActiveConnection = cn
.CursorLocation = adUseClient
.LockType = adLockOptimistic
.Open strSQL
End With

TDBGrid1.allowAddnew
TDBGrid1.AllowUpdate

TDBGrid1.DataSource = rs
0
isims20 Messages postés 1 Date d'inscription vendredi 18 février 2005 Statut Membre Dernière intervention 10 avril 2008
10 avril 2008 à 17:56
 Private Sub cmdUser_Click()
> > TDBGrid1.datasource = True
> > TDBGrid1.EditActive = True
> > TDBGrid1.Text = txtUser.Text
> > End Sub
0
Rejoignez-nous