cual es el error porque no me va?
Codigo de http://www.tvmataro.com/galeria.asp
Código:
<html>
<head>
<title></title>
</head>
<body>
<%
id = request.QueryString("id")
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../Data/fotos.mdb")
'ahora ejecuta la sql y guarda su resultado en un recordset para poder trabajar con ella
Set RS = Server.CreateObject("ADODB.RecordSet")
sql = "Select imagen, comentario from foto where id = " & id
'si hay registros
if rs.EOF = true or rs.BOF = true then
response.write("No se han encontrado registros")
else
rs.MoveFirst%>
<img src="<%=rs.fields("imagen")%>" width="100" height="150">
<%=rs.fields("comentario")%>
<%end if%>
<%'Limpiamos y cerramos todo.
RS.Close
Set RS = Nothing
oConn.Close
Set oConn = Nothing
%>
</body>
</html>
Contiene la tabla
fotos
con 3 columnas:
id ,
imagen y
comentario
en la primera fila:
id = 1
imagen = foto1.jpg
comentario = Esta es la primera foto
en la segunda fila:
id = (Autonumerico)
Gracias!