Quelle référence ajouter pour utiliser UCase

Version imprimable

Bonjour,
quelle référence faut-il ajouter au VBA pour pouvoir utiliser les fonctions de texte telles que UCase.

A l'exécution de mon code j'obtiens :

Citation:

Projet ou bibliothèque introuvable.

Sur UCase.

Merci. ;)

Code:

1
2
3
4
5
6
7
8
9
10
Private Sub btnValider_Click()
    'test login, pdw
    If UCase(tbPwd.Value) = UCase(SqlToString("SELECT pwd FROM Pwd WHERE Login='" & tbLogin.Value & "'")) Then
        DoCmd.OpenForm "frmMenu", acNormal, , , acFormReadOnly, , tbLogin.Value
        'Unload Forms.Item("frmlogin")
    Else
        MsgBox "Le login et / ou le mot de passe n'est pas correct", vbExclamation
    End If
 
End Sub

15/04/2009, 13h48
Domi2

Bonjour,

Citation:

quelle référence faut-il ajouter au VBA

Visual Basic For Applications

Si elle est cochée, vérifie si certaines ne sont pas marquées "Manquante". Tu peux les décocher après avoir contrôler qu'elles ne sont pas utiles pour ton projet.

Domi2
15/04/2009, 14h28
Filippo

Merci Domi2,
J'ai bien Visual Basic For Applications de coché et pas manquante.
Par contre je vois que Microsoft ActiveX Data Objects Recordsets est manquante.
J'ai finalement référencé la référence ADO version 2.5 et ça marche.

Merci pour ton aide.

;)