% cadenaSQL="SELECT * FROM tipobuque " Set Ob_Conn = Server.CreateObject("ADODB.Connection") Set Ob_RS = Server.CreateObject("ADODB.Recordset") Ob_Conn.Open = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\consultas\bd\tipobuque.mdb") Ob_RS.Open cadenaSQL,Ob_Conn,3,3 %>