
14/07/2008, 14:18
|
| | Fecha de Ingreso: julio-2008 Ubicación: guerreo
Mensajes: 9
Antigüedad: 16 años, 9 meses Puntos: 0 | |
Respuesta: Cargar y recuperar imagen en ASP, ayuda por favor!... Hola amigos, muchas gracias por sus respuestas...probe lo que me dijeron, pero me muestra basura en el campo de imagen, ya cambien el campo de objeto OLE a tipo MEMO, y me sigue mostrando basura.
<%
' -- show.asp --
' Generates a list of uploaded files
Response.Buffer = True
' Connection String
Dim connStr
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("usuarios.mdb")
%>
<html>
<head>
<title>Inserts Images into Database</title>
<style>
body, input, td { font-family:verdana,arial; font-size:10pt; }
</style>
</head>
<body>
<p align="center">
<b>Mostrando datos</b><br>
<a href="form.html">Haz clic para insertar otro registro</a>
</p>
<table width="700" border="1" cellspacing="0" cellpadding="0" bgcolor="#99FFCC" bordercolor="#FFFFFF" align="center">
<%
' Recordset Object
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
' opening connection
rs.Open "select [ID_Usuario],[Nombre],[Edad],[NombreFichero],[Imagen] from usuarios order by [ID_Usuario] desc", connStr, 3, 4
If Not rs.EOF Then
Response.Write "<tr><td colspan=""7"" align=""center""><i>"
Response.Write "No. de Registros: " & rs.RecordCount
'Response.Write ", Table : Files</i><br>"
Response.Write "</td></tr>"
While Not rs.EOF
Response.Write "<tr><td>"
Response.Write rs("ID_Usuario") & "</td><td>"
Response.Write rs("Nombre") & "</a></td><td>"
Response.Write rs("Edad") & "</td><td>" Imagen = "upload/" & rs("NombreFichero")
Response.Write rs("Imagen") & "</td><td>"
Response.Write "</td></tr>"
rs.MoveNext
Wend
Else
Response.Write "No Record Found"
End If
rs.Close
Set rs = Nothing
%>
</table>
</body>
</html>
si pongo solo Imagen = "upload/"
Response.Write rs("Imagen") tambien me muestra basura
que estoy haciendo mal? |