3 dic. 2013 - Public Function Login() Dim DBConn As New ADODB.Connection Dim User As New ADODB.Recordset Dim Username As String Dim UserDB .