Cita: Mensaje Original por GUAPOBEN
La que esta en Negrita es la linea 15
<%
'Instanciamos y abrimos nuestro objeto conexion
Dim Conn,strSQL, objRS
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Ctro Mensajes.mdb"))
Dim Temp
strSQL = "SELECT TOP 5 * FROM Skytels ORDER BY Fecha DESC"
Set objRS = Conn.Execute(strSQL)
while (not objRS.Eof)
%>
...te falta declarar el recordset...
set objRS=createobject("ADODB.Recordset")
strSQL = "SELECT TOP 5 * FROM Skytels ORDER BY Fecha DESC"
Set objRS = Conn.Execute(strSQL)