| |||||
| Dernière réponse | |
|---|---|
| Sujet : ACCES: visual basic | |
| Bolino | Hello
voici un petit bout de code qui te rappellera peut etre des souvenirs: 'debut Dim MaBD As Database Dim srce As Recordset Dim MaRequete As String Dim somme as Integer Set MaBD = DBEngine.Workspaces(0).Databases(0) MaRequete="Select * from TableX;" Set srce = MaBD.OpenRecordset(MaRequete, DB_OPEN_SNAPSHOT) Do while not srce.EOF somme= somme + srce.NOMDUCHAMP Loop 'fin bon c'est du n'importe quoi, mais le principe est là.. j'espère que ca pourra t'aider ++ |
| Vue Rapide de la discussion |
|---|