Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access
Access Forum d'entraide sur Microsoft Access. Avant de poster -> La F.A.Q Access
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 25/02/2011, 10h39   #1
Membre du Club
 
Inscription : décembre 2006
Messages : 132
Détails du profil
Informations forums :
Inscription : décembre 2006
Messages : 132
Points : 53
Points : 53
Par défaut Methode item de l'objet

Bonjour,


Le code suivant me renvoie l'erreur: Methode item de l'objet form a échoué

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub Suite_click()
Dim rec As DAO.Recordset
Dim query As DAO.QueryDef
 
'Controle mot de passe
 
Set query = CurrentDb.QueryDefs("R_Identification")
query.Parameters("param") = Me.Utilisateur
 
Set rec = query.OpenRecordset
 
If rec.RecordCount = 0 Then
    MsgBox "Nom incorrect"
Else
    If rec("Mdp") <> Me.MdP Or IsNull(Me.MdP) Then
        MsgBox "Mot de passe erronné"
    Else
        DoCmd.OpenForm "Selections"
        With Forms("selections")
           .Rep = rec("Util")
           .MExp = rec("MetExp")
        End With
 
    End If
End If
 
End Sub
Avez-vous une idée ?

Merci
zebi42 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/02/2011, 11h34   #2
Membre du Club
 
Inscription : décembre 2006
Messages : 132
Détails du profil
Informations forums :
Inscription : décembre 2006
Messages : 132
Points : 53
Points : 53
J'ai fait une copie de mon formulaire et tout fonctionne avec le nouveau

Les bizarreies d'Access ........!!!!!
zebi42 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 16h53.


 
 
 
 
Partenaires

Hébergement Web