Discussion :

[lumbroso]

bonjour voila mon probleme
j'ai une table client et une table intervention
dans la table client est inscrit la reference du client ainsi que le nombre d'heure voulu pour effectue une tache.
dans l'autre table j'ai entre autre le numero du dossier.
mon probleme est que dans un formulaire "test" j'ai 3 champs le premier est le champs ou je dois saisir le num client, le second champs est celui ou je dois inscrire le numero dedossier

est dans le 3 eme champs doit estre inscrit automatiquement le nombre d'heure desire en rapport au num client et a la ref client saisie et ca je ne sais pas le faire ya quel qu'un qui pourrai m'aider ?

[Asdorve]

c'est du sql ça...

Dans ta table client, y-a-t-il une réf intervention, ou dans intervention une réf Client?

[lumbroso]

dans ma table client j'ai une ref client et dans ma table intervention j'ai un num intervention une ref dossier et un num client
je sais que c du sql mais je suis bloque

[Asdorve]

essaye un truc du genre

Code :

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

1
2
3
4
5
SELECT Client.REfCLient, Intervention.refDossier, Intervention.numClient, Intervention.Heure 
FROM CLIENT, INTERVENTION
WHERE Client.REfClient = Intervention.numClient
AND Intervention.refDossier = 'refDossier'
AND Client.REFCLIENT = 'refCLient'

[lumbroso]

je n'arrive pas a faire ce que je veux je suis entrin de criser je comprend rien
je rexpliqu emon problème

j'ai une table client avec tous le renseignement luit concernant à savoir nom, prenom, ref cli,..., nombre d'heure voulues.

dans une autre table intervention se trouvent numinter, numero de dossier, ref cli,...nombre d'heure voulues.

dans un formulaire qui se nomme gestion des heures je veux en saisisant un num dossier et une ref cli que le champs nbrheurevoule.txt soit remplie automatiquement par rapport au numero client.


je suis désespére

[Asdorve]

eh ben, tu fais ta requête, tu récupères le résultat et tu l'affiches dans ta textbox.

[MGD_Software]

Ca c'est le B-A-BA de la base de données, mais quand on n'en a jamais fait, je conçois que ce sois un peu nébuleux. Je suis précisément en train d'aider un de mes amis qui a le même problème. Le hic, c'est que la "leçon" qui dure une demi-heure quand on est côte à côte sur le même PC, risque de prendre des jours sur un forum tel que celui-ci.

La solution de ton problème est de faire une requête sur les deux tables de façon à récupérer les infos de chacune, de façon synchronisée. Pour cela, il faut un champ commun aux deux tables (une clé). Par exemple il faudrait que le champ ref client de la table intervention corresponde au champ num client de la table Client - ce qui marquerait déjà une faute d'ergonomie, car il serait fort souhaitable que les deux champs portent le même nom.

Utilise l'assistant requête d'Access (parce que je suppose que c'est d'Access qu'il s'agit, tu ne le précise même pas !) pour faire une requête. Il faut ajouter les tables à la requête, puis faire un lien entre elles et sélectionner les champs à afficher. Termine en enregistrant la requête (après avoir vérifié qu'elle donne des résultats).

Ensuite, il reste à lier le formulaire à cette requête au lieu d'une des tables.

Avant de relancer un appel au secours, consulte l'aide en ligne en cherchant les mots en gras. Et si tu ne trouve toujours pas, je conseille la lecture d'un bon ouvrage d'initiation du genre "Access pour les nuls". Ce genre de truc doit se trouver dans les premières pages...

Ensuite seulement, reviens sur ce forum en précisant l'environnement : Version de base de données, structure des tables, champs utilisés dans le formulaire, etc.

Bon courage.

[lumbroso]

en travaillant un peut et en bouquinant sur internet j'ai trouve ma reponse voici le code qui mantenant fonctionne nikel

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
Dim sql As String
Dim rs As DAO.Recordset
On Error GoTo fin
    Set rs = CurrentDb.OpenRecordset("select [Réference client],[Heures voulue] from [Fiche d'identité client];")
      Dim str3, str4 As String
    str3 = "[Réference client] = '" & txtnumclient & "'"
    str4 = txtnumclient
    rs.FindFirst str3
    If rs("[Réference client]") = str4 Then
        Me.txtheure.Value = CStr(rs("[Heures voulue]"))
        'txtnom.Text = CStr(rs("Nomfour"))
        'txtnom.Enabled = False
    Else
        MsgBox "Ce clent n'existe pas verifiez votre saisie...", vbCritical, "Erreur de saisie"
     End If
fin:
If Err.Number = 3021 Then
 MsgBox "Ce clent n'existe pas verifiez votre saisie...", vbCritical, "Erreur de saisie"
 
End If
End Sub