<%@LANGUAGE="VBSCRIPT"%>
<%
Dim imagen
imagen = Request("imagen")
imagen = Replace(imagen,"","")%>
<%
Dim oConn, rs, SQL
set oConn = Server.CreateObject("ADODB.Connection") ' conexion
set rs = Server.CreateObject("ADODB.Recordset") ' recordset
oConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=C:\Inetpub\wwwroot\FTP.mdb;"
SQL="SELECT * FROM Archivos;"
rs.Open SQL, oConn
do until rs.EOF
Response.Write("<b>Nombre:</b> ")
Response.Write(rs.Fields("Nombre") & "<BR>")
Response.Write("<b>Descripción:</b> ")
Response.Write(rs.Fields("Descripción") & "<BR>")
Response.Write("<b>URL:</b> ")
<a href="<%=rs.Fields("URL")">http://www.ideal.es</a><
Response.Write("<b>Imagen:</b> ")
Response.Write(rs.Fields("Imagen") & "<BR>")
Response.Write("<BR>")
rs.MoveNext
loop
%>
<h3><%=imagen%></h3>
<IMG SRC="<%=Request("imagen")%>" BORDER=0><BR>
El error que me devuelve el PWS es:
Error de compilación de Microsoft VBScript error '800a0400'
Se esperaba una instrucción
/webpub/LeerBD-FTP.asp, line 38
<a href="<%=rs.Fields("URL")">http://www.ideal.es</a><
^
Lo que quiero es q me muestre los campos de la BD, q son: Nombre(Texto), Descripciòn(Texto), URL(Hipervínculo) e Imagen(Texto).
Todo lo que muestra será texto, excepto los campos URL ( q deberá mostrarme el texto q aparece en ese campo, pero con el hipervínculo activo) y la imagen, que deberia devolverme un .JPG).
El hipervínculo funciona perfectamente en la BD, pero no al mostrarlo en pantalla...
En cuanto a la imagen, es lo que quiro sacar en claro, pues alguno de vosotros habrá visto otro post que puse en el q estoy interesado en crear un catálogo.... es decir, q aprendiendo finalmente a mostrar datos e imagenes de una BD, lo podría hacer fácilmente, tal y como me comentó el amigo maestro.
Espero no darles mucho el latazo, pero estas cosas de principiantes creo q son las q mas cuestan, y asi poquito a poco estoy aprendiendo bastante
