combobox Fermé

Question

Bonjour,je me nomme ines et je suis étudiante. présentement je suis en train d'écrir un programme sous visual basic pour la gestion de stock.cependant un problème se pose au niveau du code de mon combobox.en effet j'ai écrit ce code que voici:Private Sub Combo1_Click()
sql = ("select * from clients where codeclient='" & Combo1 & "'")
Set Rec = MaBase.OpenRecordset(sql)
If Combo1 <> "" Then
efface
If Rec.RecordCount > 0 Then
Text1 = UCase(Rec!codeclient)
Text2 = UCase(Rec!raisonsociale)
Text3 = (Rec!capitalsocial)
Text4 = (Rec!secteurdactivité)
Text5 = (Rec!Adresse)
Text6 = (Rec!Téléphone)
Text7 = (Rec!Fax)
Text8 = (Rec!nomDG)
Text9 = (Rec!prenomDG)
Text10 = (Rec!telephoneDG)
Text11 = (Rec!emailDG)
Text12 = (Rec!nomDAF)
Text14 = (Rec!prenomDAF)
Text13 = (Rec!telephoneDAF)
Text15 = (Rec!emailDAF)
Text16 = (Rec!nomrespoinfo)
Text17 = (Rec!prenomrespoinfo)
Text18 = (Rec!telephonerepoinfo)
Text19 = (Rec!emailrespoinfo)
End If
End If
End Sub
mais pendant l'exécution du programme rien ne s'affiche.le combobox ne réagi même pas au click.je vous pri de m'aider à trouver le bon code.merci

jjsteing · Answer

bonjour

essai de mettre ton code dans le combo1_change ;)

michel_m · Answer

Bonjour à tous

Aide microsoft recordcount (DAO) eh oui, ca sert !

"La propriété RecordCount n'indique pas le nombre d'enregistrements contenus dans un objet Recordset de type Feuille de réponses dynamique (Dynaset), Instantané (Snapshot) ou En avant seulement tant que vous n'avez pas eu accès à tous les enregistrements.... Pour forcer l'accès au dernier enregistrement, appliquez la méthode MoveLast à l'objet Recordset. Vous pouvez également utiliser une fonction SQL Count pour déterminer le nombre approximatif d'enregistrements que votre requête va renvoyer."


Avec ADO (DAO je ne sais pas) tu peux tester si la requete est vide
 If requete.EOF Then
et non vide
 If  NOT requete.EOF Then

Combobox

2 réponses

Discussions similaires