Bonjour!
ta requête, il ne manque pas un espace entre le select et le *?

SQL = "Select * From Administrateur Where Login = '"&login&"';"