<% dim codigopais
codigopais = request.Form("cbopais")%>
<%Set Con = Server.CreateObject ("ADODB.Connection")
Con.Open "driver={SQL Server};server=website; database=evenpro; uid=sa;pwd=sa"%>
<%sql = "select curriculumv.SourceFileName, curriculumv.UploadDT, curriculumv.cod_area, curriculumv.id_curriculum, curriculumv.nombre, curriculumv.apellido, curriculumv.edad, curriculumv.estudio, curriculumv.paises from curriculumv WHERE Curriculumv.paises '"&codigopais&"'"
set rs = con.Execute(sql)
'"SELECT id_curriculum, area.cod_area, area.nom_area, tab_curriculum.nombre FROM area RIGHT JOIN tab_curriculum ON area.cod_area = tab_curriculum.cod_area WHERE area.cod_area = '" & codigoarea & "'"%>
<HTML><HEAD><TITLE>. : Evenpro : .</TITLE>
<TABLE cellSpacing=0 cellPadding=0 width=792 align=center border=0>
<TR>
<TD width="791" height="412">
<table width="100%" height="89" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="89" background="imghome/taparegi1trans.jpg"><table width="55%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="8%"> </td>
<td width="92%"> </td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
</table></td>
</tr>
</table>
<table width=788 height="323"
border=0 cellpadding=0 cellspacing=0
background="imghome/interior_table_white.gif">
<tr valign=top> </tr>
<tr valign=top>
<td width="20"><br><table width="788" height="307" border="0" cellpadding="1" cellspacing="1">
<tr>
<td width="8" height="305"></td>
<td width="759"><table width="95%" border="0" cellspacing="10" cellpadding="1">
<tr>
<td width="67%" height="283">
<table style="background-repeat:repeat-x" width="100%%" border="0" cellpadding="0" cellspacing="0" background="../_img/dotted2.gif">
<tr>
<td height="18"><div align="center">
<table width="593" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="207"> </td>
<td width="386"><div align="left"></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td height="231">
<table width="63%" height="63%" border="0" align="right" cellpadding="1" cellspacing="1" bgcolor="#E8E8E8">
<tr>
<td width="2%" height="227" bgcolor="#999999"><BR>
</td>
<td width="98%"> <% Do while not RS.EOF %>
</font>
<table width="411" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="91" background="pics1/silueta.jpg"><font color="#000000" size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="<%= RS("SourceFileName")%>" width="90" height="120"></font></td>
<td width="320"><table width="100%" border="0" cellspacing="3" cellpadding="1">
<tr bgcolor="#E0E0E0">
<td width="23%"><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Fecha
:</strong></font></div></td>
<td width="77%" bgcolor="#E0E0E0"><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%= RS("UploadDT")%></font></div></td>
</tr>
<tr bgcolor="#D3D3D3">
<td><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Nombre:</strong></font></div></td>
<td><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%= RS("nombre")%></font></div></td>
</tr>
<tr bgcolor="#E0E0E0">
<td><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Apellido:
</strong></font></div></td>
<td bgcolor="#E0E0E0"><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%= RS("apellido")%></font></div></td>
</tr>
<tr bgcolor="#D3D3D3">
<td><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Edad
:</strong></font></div></td>
<td><div align="left"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%= RS("edad")%>
años</font></div></td>
</tr>
<tr bgcolor="#E0E0E0">
<td><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Estudio
:</strong></font></td>
<td><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%= RS("estudio")%></font></td>
</tr>
<tr bgcolor="#D3D3D3">
<td height="20"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>País:</strong></font></td>
<td bgcolor="#E0E0E0"><font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"><%= RS("paises")%></font></td>
<%
RS.MoveNext()
Loop
%>
<%
sql="select distinct curriculumv.paises from curriculumv"
set rs = con.Execute(sql)
%>
<form name="form2" method="post" action="busca_pais.asp">
<table width="254" border="0" cellspacing="15" cellpadding="0">
<tr>
<td width="85></td>
<td width="124">
<select name="cbopais" size="auto" id="select2" style="FONT-SIZE: 7pt">
<%'cuenta = 1
WHILE NOT rs.EOF %>
<option value="<%=rs("paises")%>" <% 'if cuenta=1 then%>selected <%'end if%>>
<%= rs("paises")%></option>
<%rs.MoveNext
'cuenta=cuenta+1
Wend
rs.Close%>