Base de données avec références DAO [VB6] - Programmation
Marsh Posté le 24-04-2001 à 11:50:12
charge d'abord la librairie DAO puis utilise les nouveaux objets adéquats ! 
 
sinon, passe à ADO, DAO nest de - en - utilisé ... 
bonne chasse...
Marsh Posté le 24-04-2001 à 15:58:15
Avec ADO : 
 
Dim Db As ADODB.Connection  
Dim myRs as ADODB.RecordSet  
Set Db = New ADODB.Connection  
Db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=monFichier.mdb"  
Set myRs = New ADODB.Recordset  
myRs.Open "Select * from Quelquepart", Db, adOpenForwardOnly, adLockReadOnly, adCmdText  
If Not myRs.EOF And Not myRs.BOF Then  
   do until myRs.eof  
      ComboBox1.additem myRs![Champ] & ""  
      myRs.movenext  
  loop  
End if  
myRs.close  
set myRs=nothing  
db.close  
set db=nothing
Marsh Posté le 24-04-2001 à 09:11:24
Encore une fois j'ai besoin de votre aide !
Comment afficher les champs d'une table sous access avec VB6, en utilisant les références DAO. J'ai regardé dans le help et j'ai pensé à la DBlist, mais j'ai vraiment de la peine à l'utiliser ! Quelqu'un aurait un exemple ?
Merci !