<!-- #include file="abre_cierra.asp" -->
<%

		'------- Recibe tres parametros
		'------- t = Nombre de la tabla de la cual saca la imagen
		'------- i = Identificador del registro, nombre del campo debe ser ID
		'------- c = Nombre del campo donde esta la foto

		Response.Expires = 0
    	Response.Buffer = TRUE
   		Response.Clear

		Response.ContentType = "jpg"
		
		SQL="select " & Trim(Request.QueryString("c")) & " from " & Trim(Request.QueryString("t")) & " where id=" & Trim(Request.QueryString("i"))
		
		abrir()	'--------------- abre la conexion con la base de datos.
				
		Set rsImg = basemysql.Execute(SQL)
		Response.BinaryWrite(rsImg(Trim(Request.QueryString("c"))))
		
		cerrar()	'----------- cierra la conexion con la base de datos.

		Response.End

		rsImg.Close
	
%>