A voir également:
- Executer des requetes sous VB access
- Access appdata - Guide
- Acer quick access - Forum logiciel systeme
- Désinstaller ACER QUICK ACCESS - Forum Logiciels
- Vb - Télécharger - Langages
- Exemple base de données access à télécharger gratuit ✓ - Forum Logiciels
1 réponse
Bonjour,
Ca dépend un petit peu de ce que tu veux faire après ...
En utilisant les objets DAO
Dim base as database
Dim SQL as string
Dim Enr as recordset
Set base = DBEngine.Workspaces(0).Databases(0)
SQL = "Select Chp1, chp2, chp n from MaTable"
Set Enr = base.OpenRecordset(SQL, dbOpenDynaset)
=> ensuite et en résumé, tu peux t'imaginer le résultat de ce bout de code comme un tableau.
Tu te promènes sur la ligne avec un Enr!Chp1 ou Enr!Chp n
Tu te promènes sur la colonne avec des Enr.Move
SINON
DoCmd.RunSQL "delete * from MaTable"
Ca marche aussi...
Bon courage.
Ca dépend un petit peu de ce que tu veux faire après ...
En utilisant les objets DAO
Dim base as database
Dim SQL as string
Dim Enr as recordset
Set base = DBEngine.Workspaces(0).Databases(0)
SQL = "Select Chp1, chp2, chp n from MaTable"
Set Enr = base.OpenRecordset(SQL, dbOpenDynaset)
=> ensuite et en résumé, tu peux t'imaginer le résultat de ce bout de code comme un tableau.
Tu te promènes sur la ligne avec un Enr!Chp1 ou Enr!Chp n
Tu te promènes sur la colonne avec des Enr.Move
SINON
DoCmd.RunSQL "delete * from MaTable"
Ca marche aussi...
Bon courage.
