<% Dim DataConn Dim registro Dim SQLtxt Set DataConn = Server.CreateObject("ADODB.Connection") Set registro = Server.CreateObject("ADODB.Recordset") DataConn.Open "DBQ=" & Server.Mappath("/CGI-BIN/_vti_cnf/dbPuestos.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}" SQLtxt = "SELECT * FROM puestos" registro.Open SQLtxt, DataConn, 1, 3 %>
<% do while not registro.EOF %> size="20"> <% registro.movenext Loop %>

    Nuevo

                   Puesto

             Ciudad

        Perfil

<%if registro.fields("Fecha")=date() then%> New<%else%> <%end if%>

 <%=registro.fields("Puesto")%> <%=registro.fields("Ciudad")%>

      

Agrega tu curriculum

 

Mándanos tu curriculum, Nosotros te

 buscaremos el mejor lugar para ti!

enviar

Inicio    |    Compañia    | 

Servicios   |    Puestos Actuales   |

 Clientes    |    Contacto

 

Puestos Actuales