Hola!
Si me puedieran aorientar sobre como pasar una foto que esta almacenada en la base de datos (sql server) esta es de tipo image, algunos datos ya se muestran en la pagina como su nombre, la ide de la carrera, y el semestre, pero la foto no la puedo mostrar
, si alguien me puede ayudar se los agradecieria!! el codigo que tengo es el siguiente: si paso la foto haci tal como esta en
Negritas al momento de mostrar los datos de dicho alumno me aparecen signos de interrogacion ???
<%
alu_NumControl = Request.Form("control")
alu_Password= Request.Form("contraseña")
set conexion=server.CreateObject("ADODB.CONNECTION")
set tabla=server.CreateObject("ADODB.RECORDSET")
Conexion.Open "driver={SQL Server};server=GRINCHLIZ; database=SIS_JIMCEL; uid=sa;pwd=sa"
encontro=0
set tabla=conexion.Execute("SELECT * FROM ceAlumnos WHERE alu_NumControl = '" & alu_NumControl & "'")
if tabla.eof then
Response.Write"No se encontro"
else
encontro=1
nombre=tabla.Fields("alu_Nombre")
ape_paterno=tabla.Fields("alu_ApePaterno")
ape_materno=tabla.Fields("alu_ApeMaterno")
id_carrera=tabla.Fields("esp_Id")
semestre=tabla.Fields("alu_SemestreAct")
foto= tabla.Fields("alu_Foto")
end if
set tabla=conexion.Execute("SELECT TBL_PROGRAMA.NOMBRE, SUM(TBL_ALUACTIVIDAD.HORAS) AS Expr1, TBL_PROGRAMA.TH_PROGRAMA FROM TBL_PROGRAMA INNER JOIN TBL_ALUACTIVIDAD ON TBL_PROGRAMA.IDE_PROGRAMA = TBL_ALUACTIVIDAD.CLAVE_PROGRAMA GROUP BY TBL_PROGRAMA.NOMBRE, TBL_ALUACTIVIDAD.NUMCONTROL, TBL_PROGRAMA.TH_PROGRAMA HAVING (TBL_ALUACTIVIDAD.NUMCONTROL = '" & alu_NumControl & "')")
%><div align=center><br><h2>Escuela Secuandaria</h2></div><div align = center><h5>Lista de Horas</h5></div><HR>
<br><br>
<b>NOMBRE </b><% Response.Write(nombre)
Response.Write(ape_paterno)
Response.Write(ape_materno)%>
<br><b>CARRERA </b><%Response.Write(id_carrera)%>
<br><b>SEMESTRE </b>
<%Response.Write(semestre)%>
<br>
<% Response.Write(foto)%>
<br><br><br><br>
<table border=1>
<TR>
<TD><b>PROGRAMA</b>
<TD><b>HORAS ACOMULADAS</b>
<TD><b>DE UN TOTAL DE</b>
</TR>
<%
dim col
dim x
x = tabla.fields.count
do while not tabla.eof
response.write "<tr>"
for col=0 to (x-1)
response.write "<td>" & tabla.fields(col).value
next
tabla.MoveNext
response.write "</tr>"
loop
conexion.close
%>
</table>