Ver Mensaje Individual
  #1 (permalink)  
Antiguo 18/04/2007, 15:36
Eric Gonzalez
 
Fecha de Ingreso: febrero-2007
Mensajes: 78
Antigüedad: 18 años, 4 meses
Puntos: 0
Pregunta Desplegar Informacion en un Input

Hol@ much@chos como estan?

Oigan pues kisiera saber como puedo sacar lo siguiente......Tego 1 pagina la cual por medio de un combo me salen los diversos puestos que existen en una compañia......tales puestos me los trae de un recordset....ya que stan en una tabla de una base de datos de SQL........esta misma pagina tiene un boton de mostrar. Dicho boton manda llamar otra pagina la cual debe mostrar el nombre, apellido paterno y apellido_materno de la persona que esta asignada en ese puesto...dicha informacion esta en otra tabla de la misma base de datos y la relaciona el id_puesto....pero mi problema es que no me aparece o mas bien no me jala nada de la informacion de los nombres

PAGINA 1......ME LLENA PERFECAMENTE EL COMBO

Código:
<%
dim strconn
strconn = "Driver={SQL Server};Description=sqldemo;SERVER=(local); UID=sa;PWD=sa;DATABASE=examen"
set conn = server.createobject("adodb.connection")
conn.open strconn
%>


</head>

<body   bgcolor="#3399FF" alink="#3333CC" link="#00FF00"  >



<form action="pruebaer2.asp"  method="post" enctype="multipart/form-data" name="formulario" id="formulario" > 


<h1> <p align="left"><font color="black"> Puestos </font></p> </h1>

<h5>  <%=date%> </h5>
<p>
  <%
set rs_puesto = server.createobject("adodb.recordset")
	sql= "select * from PUESTO"
	rs_puesto.open  sql, conn

%>
  
  <%
set rs_usu = server.CreateObject("adodb.recordset")
sql = "select * from USUARIO"
rs_usu.open sql,conn
%>
 </p>
<p>  <b><u>Puesto:</u></b> 
  <select name="id_puesto" id="id_puesto"    onchange="puesto.value = this.value">
    
    <%
while rs_puesto.eof=false
%>
    
    <option value="<%=rs_puesto.fields ("id_puesto")%>"><%=rs_puesto.fields ("puesto")%></option>
    <%
rs_puesto.movenext
wend
%>
  </select>
PAGINA 2..........NO ME SALE NADA D INFORMACION.........ME APARECE EN BLANCO EL NOMBRE Y APELLIDOS


Código HTML:
<%
id_pto= request.Form("id_puesto")
%>


<%
dim strconn
strconn = "Driver={SQL Server};Description=sqldemo;SERVER=(local); UID=sa;PWD=sa;DATABASE=examen"
set conn = server.createobject("adodb.connection")
conn.open strconn
%>



</head>




<body bgcolor="#3399FF" text="#CC0033">


<h3><font face="Geneva, Arial, Helvetica, sans-serif" > REGISTROS   </font> 
 
  <input type="hidden" name="id_concepto" value="<%=id_puesto%>" />
  
<%
set rs_usu = server.CreateObject("adodb.recordset")
sql = "select * from usuario"
rs_usu.open sql, conn
%>

 <%				
	 do while (not rs_usu.eof)
		if trim (id_puesto )= trim (rs_usu.fields("id_puesto")) then
				
			nombre= rs_usu.fields("nombre")
			apellido_paterno=rs_usu.fields ("apellido_paterno")
			apellido_materno=rs_usu.fields ("apellido_materno")											
		end if	
			'exit while				
			rs_usu.movenext
		
	loop
%>
  
</h3><TD width="194" height="177"><p><font  face="Georgia, Times New Roman, Times, serif">Nombre: </font>
      
      </p>
  <td width="310"></input>
    <p>
     
	  <input id="txt_concepto" name="txt_concepto" class="MainLinks"  tabindex="3" size="15"  value="<%=nombre%>" />
    </p>
<p> <td width="200"> <font  face="Georgia, Times New Roman, Times, serif">Apellido Paterno:</font>
     <p> <input name="APAt" id="APAt"  size="25" value="<%=apellido_paterno%>">
    </p>
    <p>    
<td width="310"> </input>
      <font face="Georgia, Times New Roman, Times, serif">Apellido Materno:</font>
      <p>
	  <input name="AMat" id="AMat" value="<%=apellido_materno%>" size="25" >
      </input>
  </p>
        </p>
        </p>
        </p>
        </p>
        </p>
		
		<%
		
		rs_usu= close
conn.Close
set conn=nothing
%>