Hola Aston,
Me da el siguiente error:
Error de Microsoft VBScript en tiempo de ejecución erreur '800a000d'
No coinciden los tipos: 'rsejemplo'
Este es el código que he puesto:
<%
Set con = Server.CreateObject("ADODB.Connection")
Con.Open("Provider=Microsoft.Jet.OLEDB.4.0;Da ta Source=" & _
Server.MapPath("ejemplodb.mdb"))
sql = "SELECT * FROM ejemplo WHERE id=" & Request.QueryString("id") & ""
'Ejecuta un sentencia SQL de consulta
'Recorre todas las filas del resultado
set result = Con.Execute(sql)
%> <FONT COLOR="#0066CC"><%=result("ma terialnec")%></FONT><BR><B>
<B>Duración de la actividad en clase:&nbsp;&nbsp;</B><FONT COLOR="#0066CC"><%=result("du racion")%></FONT><BR>
<B>Páginas de internet recomendadas:&nbsp;&nbsp;<FONT COLOR="#0066CC"><A HREF="<%=result("internet")%> "><%=result("internet")%>& lt;/A></FONT></B></TD>
<TABLE border=0 cellPadding=1 cellSpacing=2 height=40
width="100%"><TBODY>
<TR>
<TD align=right
width="11%"></TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE> <TABLE border=2 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD> <B>Descripción de la actividad:<BR></B>
<%=Replace(rsejemplo("textos"), Chr(13), "<br>")%>
¿Qué hago mal?¿Por qué me da ese error?Saludos, Sifi
<center><A HREF=" http://www.elenet.org"><IMG SRC="http://www.efrance.fr/somoswebmasters/GRAFICOS/ele468x60.gif"> </A> </center>