% strLogin = Session("Usuario") sql1 = "SELECT * FROM autores WHERE login = '" & strLogin & "'" Set rsUser = Server.CreateObject("ADODB.Recordset") rsUser.Open sql1, MeuDB, 3, 3 %>