Discussion :

[VARACH]

Bonjour , je suis plus que debutant en VB . Je doit creer un p ti logiciel de gestion de recette .
J ai creer un form avec la gestion ajout et suppression de recette accessible avec un mot de passe.

un second form " avec l aide des praticiel de jacma " ( excellent d ailler ) dans lequel , j ai un ADODC, un datalist ( avec le numero de chaque recette) et je voudrais dans un textbox en cliquant sur un numero de recette que son nom apparaisse dans le textbox

merci par avance de votre aide

Yann

[jacma]

un second form " avec l aide des praticiel de jacma " ( excellent d ailler )

Merci, vela fait toujours plaisir .

j ai un ADODC, un datalist ( avec le numero de chaque recette) et je voudrais dans un textbox en cliquant sur un numero de recette que son nom apparaisse dans le textbox

Et justement, tu as un exemple traité dans "Initiation accès aux données" dans lequel un clic sur un item d'une DataList affiche les valeur de l'enregistrement correspondant dans des TextBox. Cela ne présente aucune difficulté dès lor que liste et textboxs sont liées aux données.
Tu peux également utiliser un find, comme ci-après:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub DataList1_DblClick()
  Dim strAuthor As String
  strAuthor = DataList1.Text
  With rsAuthors
    .MoveFirst
    .Find "Author = '" & strAuthor & "' "
  End With
End Sub

Les deux méthodes sont expliquées dans le praticiel que j'ai cité.

Bon travail.

[VARACH]

j etais bien sous ce praticiel mais je ne m en suis pas sorti , j y retourne ..
merci pour ton aide et ces fameux praticiel

Yann

[VARACH]

Il me semble bien reprendre tes explications

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub DataList1_DblClick()
Dim strCode As String
strCode = DataList1.Text
 
 With Adodc1.Recordset
 .Find "CodeRecette'" & strCode & "'"
 End With
 
End Sub

mais j ai une erreur d execution 3001 les arguments st de types incorret ou hors limite autorisees ...

merci
yann

[jacma]

Si je reprend ton premier message, tu parle de numéro.

j ai un ADODC, un datalist ( avec le numero de chaque recette)

Je présume donc que tu affiches dans ta liste des valeurs numériques.

Or tu utilises pour ta recherche une variable déclarée en string. C'est probablement la source de ton erreur, ce qui correspond d'ailleurs bien au message d'erreur.

Modifies strCode as string en intCode as integer et cela devrait coller.

[VARACH]

Bjs , merci pour ton aide , j ai repris le tuto depuis le debut et ca marche

merci

yann