Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2539 connectés 

 


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
 
++

Votre réponse
Nom d'utilisateur    Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !
Le ton de votre message                        
                       
Votre réponse


[b][i][u][strike][spoiler][fixed][cpp][url][email][img][*]   
 
   [quote]
 

Options

 
Vous avez perdu votre mot de passe ?


Vue Rapide de la discussion
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
 
++
_naoua J'ai un peu du mal à m'y remettre. Je ne sais plus comment il fait faire pour éxécuter une  requète en visual basic.
Je ne sais plus comment in fait pour se balader d'enregistrement en enregistrement.
QQn pourrait me mettre un bout de code?? Je sais qu'il y  plusieurs variables telles que recordset, mais c'est le trou total. QQn pour m'éclairer... please!!!!!!!!!!!!!

Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)