Discussion :

[guefrachi]

bonsoir à tous

est ce qu'il est possible d'ouvrir une base de donnée acces avec avec un objet dbtable

j'utilisait cet objet pour gérer une base de donnée dbase for windows *.dbf*
avec les instructions suivantes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
table1.open
table1.fieldbyname('TI1').AsFloat
.
.
.

je veux maintenant changer le base de donnée sans modifier le programme (si possible)

Merci d'avance

[philnext]

Tu as une ADOTable.

[guefrachi]

j'ai essayé avec mais en exécutant cette instruction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Table2.Filter:='date ='+  QuotedStr(datetostr(DateTimePicker1.Date));
table2.Filtered:=true;

un message d'erreur s'affiche;

project project2.exe raised exeption class EOleExeption with message "impossible de trouver l'objet dans la collection correspondant au non ou à la référence ordinale demandé". Process stopped.Use step or run to continue.

de même pour table2.eof "informations sur la colonne clé insuffisantes ou incorrectes. trop de lignes sont affectées par la mise à jours.
il me semble que je ne peux que lire les données (problème que je n'avais pas avec ttable et la base *.dbf*

[Rayek]

1- Date est un mot réservé au niveau des bases de données (surtout niveau SQL) donc avoir un champ qui s'appel date, ca peut générer des problèmes

2- Au vue des messages que tu nous indiques, jepense qu'il faudrait revoir la structure de la base de données. Mais la il nous faudrait déjà plus de détails sur celle-ci pour confirmer

[guefrachi]

Merci bcp

Pour le premier problème, je l'avoue, c'était une faute de bêtise et je m'excuse;
le nom de champ de la table est DAT et non pas date, donc c résolu

Pour le deuxième problème voilà une question plus précise

avec le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
while (not table2.eof) do
begin
table2.delete;
edit1.Text:=booltostr(table2.Eof);
end;

si j'utilise une table avec 3 records ça marche et les records sont supprimés avec aucun problème, mais si le nombre de records est grand (220) un message d'erreur s'affiche et rien ne se passe (au niveau de suppression)

"informations sur la colonne clé insuffisantes ou incorrectes. trop de lignes sont affectées par la mise à jours".

Et ceci avec le même code

[philnext]

De manière générale je te conseille plutôt d'utiliser des requêtes SQL pour travailler sur tes tables y compris pour les suppressions.
Sinon, pour ton code, j'aurais pensé que table.delete supprime la table et non pas l'enregistrement pointé, donc pas à mettre dans une boucle, d'autant que tu ne 'parcours' pas ta table avec ta boucle : je ne vois par de 'next'.

[Rayek]

Ne connaissant pas la structure de ta base de données, ma réponse pourra être incorrecte.

En général ce type de message apparait lorsqu'on a des doublons dans une table et qu'on essai d'en supprimer un. Le soucis vient du fait que quand tu fais Delete qui ne sait pas lequel des deux supprimer.

2 solutions :

1- Soit tu rajoutes une colonne autoincrément dans ta base de données et tu gardes ton fonctionnement de suppression
2- Soit tu rajoutes toujours un autoincrément (pas bon les doublons dans une table :p), et tu passes à la suppression par le SQL (qui sera beaucoup plus rapide en traitement)