Discussion :

[valery17]

Salut a tous,

J'ai cree 2 formulaires a savoir le 1.Formulaire s'appelle Client.Le Formulaire Client comporte: N° d'identification,NomClient,AdresseClient,TelefonClient,FaxClient, Inaktif(oui/non).
Le 2.Formulaire s'appelle Projet.Le Formulaire Projet comporte N° d'identification duProjet,Le NomProjekt,le Nomclient,telefonclient,faxclient,dateProjet,Remarque.

Lorsque je suis dans le formulaire Client s'appuie la touche Inaktif. Le nomClient n'Apparait pas sur le formulaire2.
Le probleme est qu'il s'efface sur tous les projets qui ont ete deja enregistres.

Quel Kode devrais-je utiliser afin que le nomclient inaktiv sur le 1.Formulaire. ne s'efface pas sur les Projets deja enregistres.
Merci

[valery17]

Voici la reponse:

Private Sub Form_Current()
Me!Kd_Nr.Enabled = Not Nz(Me!Kd_Nr.Column(2), False)
End Sub

Private Sub Kd_Nr_Enter()
Me!Kd_Nr.RowSource = "SELECT Kd_Nr, Kundennname, Inaktiv " & _
"FROM Kunden " & _
"WHERE Inaktiv = No " & _
"ORDER BY [Kundenname];"
End Sub

Private Sub Kd_Nr_Exit(Cancel As Integer)
Me!Kd_Nr.RowSource = "SELECT Kd_Nr, Kundennname, Inaktiv " & _
"FROM Kunden " & _
"ORDER BY [Kundenname];"
End Sub

Bonne Journee