Tengo una pagina que me muestra informacion personal sobre personas incluyendo la foto todo esto almacenado en una base de datos deseo hacer click sobre la foto para abrir una ventana emergente la abre pero me da error que no se puede mostrar la pagina tengo el siguiente codigo para la ventana emergente
<%@ Language=VBScript %>
<HTML>
<HEAD><TITLE>Imagen</TITLE></HEAD>
<%
codigoid=Request("valor2")
Set Con = Server.CreateObject ("ADODB.Connection")
Con.Open "driver={SQL Server};server=website; database=evenpro; uid=sa;pwd=sa"
sql="SELECT Planilla.DestFileName, Planilla.SourceFileName, Planilla.id_planilla, Planilla.codigo FROM Planilla WHERE (((Planilla.id_planilla)=" & codigoid & "))"
set rs = con.Execute(sql)
foto=rs("DestFileName")
%>
<img src="<%=rs("SourceFileName")%>" width="400" height="400" border="0">
</HTML>