VB6 : Recordset et dblist

VB6 : Recordset et dblist - Programmation

Marsh Posté le 26-03-2002 à 15:27:36    

SAlut a tous,
je vous explique j'ai une dblist sur ma feuille avec tous les noms de ma table et lorsque je clique sur un nom j'aimerai que le recordset se positionne sur cet enregistrement mais je sais pas comment faire, aidez moi svp :jap:

Reply

Marsh Posté le 26-03-2002 à 15:27:36   

Reply

Marsh Posté le 26-03-2002 à 19:37:04    

up

Reply

Marsh Posté le 26-03-2002 à 21:59:48    

dim rs as recordset
 
set rs = ce que tu veux.
 
rs.movefirst
rs.movenext  
etc.....

Reply

Marsh Posté le 26-03-2002 à 22:05:38    

couitchy a écrit a écrit :

dim rs as recordset
 
set rs = ce que tu veux.
 
rs.movefirst
rs.movenext  
etc.....  




je comprends pas ce que tu veux dire

Reply

Marsh Posté le 27-03-2002 à 09:02:06    

Je te file la reponse avec un DBGrid...je pense que ca doit marcher avec un dblist...
 
Private Sub DBGrid1_DblClick()
 
Base de donnée.Table.Recordset.MoveFirst
Base de donnée.Table.Recordset.FindFirst ("Titre = '" & DBGrid1.Columns(0) & "'" )
Form1.Hide
form2.Show
 
End Sub

Reply

Marsh Posté le 27-03-2002 à 12:37:32    

turk182 a écrit a écrit :

Je te file la reponse avec un DBGrid...je pense que ca doit marcher avec un dblist...
 
Private Sub DBGrid1_DblClick()
 
Base de donnée.Table.Recordset.MoveFirst
Base de donnée.Table.Recordset.FindFirst ("Titre = '" & DBGrid1.Columns(0) & "'" )
Form1.Hide
form2.Show
 
End Sub  




j'ai essayé avec ma dblist voici le code:
Data3.Recordset.FindFirst ("nom='" & DBList1.Text & "'" )
mais j'ai le message d'erreur suivant sur cette ligne:
Erreur d'execution '3426'
Cette méthode à été annulé par un objet associé

Ca veut dire koi ca, je comprends pas.
Merci pour votre aide

Reply

Marsh Posté le 27-03-2002 à 14:50:34    

up

Reply

Marsh Posté le 27-03-2002 à 16:34:30    

leohnart a écrit a écrit :

 
j'ai essayé avec ma dblist voici le code:
Data3.Recordset.FindFirst ("nom='" & DBList1.Text & "'" )
mais j'ai le message d'erreur suivant sur cette ligne:
Erreur d'execution '3426'
Cette méthode à été annulé par un objet associé

Ca veut dire koi ca, je comprends pas.
Merci pour votre aide  




 
TU doit avoir un probleme dans la creation de ta base de donnée...verifie bien les champs...

Reply

Marsh Posté le 27-03-2002 à 18:44:18    

turk182 a écrit a écrit :

 
 
TU doit avoir un probleme dans la creation de ta base de donnée...verifie bien les champs...  




tu penses que c dans l'orthographe du nom des champs???

Reply

Marsh Posté le 27-03-2002 à 21:52:04    

t'as essayé sans mettre les ' qui encadrent le nom du champ ?

Reply

Marsh Posté le 27-03-2002 à 21:52:04   

Reply

Marsh Posté le 28-03-2002 à 09:28:19    

leohnart a écrit a écrit :

 
tu penses que c dans l'orthographe du nom des champs???  




 
non...en fait j'ai eu cette erreur aussi a un moment et en changeant un ligne de code de place ca c'et arrangé mais je ne me rapelle plus du tout....desolé :(

Reply

Marsh Posté le 28-03-2002 à 09:31:45    

couitchy a écrit a écrit :

t'as essayé sans mettre les ' qui encadrent le nom du champ ?  




c'est pareil :(

Reply

Marsh Posté le 28-03-2002 à 09:32:14    

turk182 a écrit a écrit :

 
 
non...en fait j'ai eu cette erreur aussi a un moment et en changeant un ligne de code de place ca c'et arrangé mais je ne me rapelle plus du tout....desolé :(  




Essaye de te rappeler please, je craque :cry:

Reply

Marsh Posté le 28-03-2002 à 10:01:35    

leohnart a écrit a écrit :

 
Essaye de te rappeler please, je craque :cry:  




 
Essaye deja de respecter les espaces  
 
ta version : Data3.Recordset.FindFirst ("nom='" & DBList1.Text & "'" )
 
 
ma version : Data3.Recordset.FindFirst ("nom = '" & DBList1.Text & "'" )

Reply

Marsh Posté le 28-03-2002 à 11:47:35    

turk182 a écrit a écrit :

 
 
Essaye deja de respecter les espaces  
 
ta version : Data3.Recordset.FindFirst ("nom='" & DBList1.Text & "'" )
 
 
ma version : Data3.Recordset.FindFirst ("nom = '" & DBList1.Text & "'" )  




c tjs ce putain de message d'erreur :crazy:

Reply

Marsh Posté le 28-03-2002 à 12:52:58    

leohnart a écrit a écrit :

 
c tjs ce putain de message d'erreur :crazy:  




 
Tu veux pas m'envoyer ton prog (source ) par mail ? pour ke j'y jette un oeuil

Reply

Marsh Posté le 28-03-2002 à 14:08:37    

turk182 a écrit a écrit :

 
 
Tu veux pas m'envoyer ton prog (source ) par mail ? pour ke j'y jette un oeuil  




pas de problème je te l'envoie des ce soir vers 18h00 je suis au boulot là!Merci ;)

Reply

Marsh Posté le 28-03-2002 à 15:43:57    

Je t'ai mis l'adresse a laquelle tu dois me l'envoyer sur un message privée, car celle qui apparait sur le forum ne marche pas...confirme moi que tu l'as recu....


---------------
Mes mémoires de Retrogamer - Le Retroblog de Turk182! en livres - Suivez le blog sur Facebook
Reply

Marsh Posté le 29-03-2002 à 18:45:53    

turk182 a écrit a écrit :

Je t'ai mis l'adresse a laquelle tu dois me l'envoyer sur un message privée, car celle qui apparait sur le forum ne marche pas...confirme moi que tu l'as recu....  




c bon j'ai bien recu je te l'envoie tout a l'heure

Reply

Marsh Posté le 24-08-2008 à 16:07:13    

j'ai un problème qui nécessite la fermeture et puis l'ouverture d'une connexion à la base de donné Access en VB6! j'ai entré Data.recordset.close pour la fermeture, il l'a accepté mais j'ai pas trouvé un moyen pour l'ouvrir (un truc telque Data.Recordset.Open). quelqu'un peut m'aider s'il vous plais c'est urgent! et merci d'avance...

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed