' 1.- Tengo un form que busca el número de expediente de un usuario, este lo manda a "esta.asp".
<html><head><body>
<TABLE cellSpacing=0 cellPadding=0 width=780 align=center>
<TR>
<form method="post" action="esta.asp">
<div align="center">
<input name="tipo" type="text"">
<br>
<span class="cajanoticias">Expediente </span><br>
<input name="Enviar" type="submit" value="Buscar" class="azulblocks" >
</div>
</form></td></tr>
</TABLE></BODY></HTML>
.....
' 2.- Abro la base de datos buscando como exp. (expediente) al input "tipo" con la variable "a"; de ahi tengo
varios campos entre los mas importantes y como ejemplo tengo "nombre" y "grupo".
Quiero mostrar nombre y grupo en esta pagina,, pero si grupo esta erroneo habria que actualizarlo,, asi que esos datos
los mando EN UNA NUEVA BASE de datos: nombre (de la misma manera) y grupo (igual o actualizado depende si esta
equivocado o no,, lo que intenté hacer fue un option select con la entrada de grupo "<%=rs("grupo")%>" y
un input para quiza poder actualizarlo, con el mismo nombre "grupo", Pero en la pagina req.asp me manda dos campos
con el mismo nombre "grupo" pero no se envia el que se selecciona, El mismo o el input con el cambio"
"""esta.asp"""
<HTML><head><body>
<TABLE cellSpacing=0 cellPadding=0 width=799 align=center><TR>
<form action="req.asp" method="post">
<%Dim cnn, rs, SQL, a
set cnn = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.Recordset")
a= Request.Form("tipo")
cnn.Open "equipo"
SQL="SELECT * FROM equipo WHERE exp like '%"&a&"%' "
rs.Open SQL,cnn
%>
<%If rs.eof then %>
No hay registro
<%else%>
<%do while not rs.EOF%>
<br>
<span class="titulos">Nombre:</span>
<select name="nombre" class="tablaazulfuerte">
<option > <%=rs("nombre")%> </select>
<br>
<table width="483" border="1" align="center" class="titulos"><tr>
<td width="116">
<div align="center">Grupo
<select name="grupo" size="1" class="tablaazulmedio">
<option selected> <%=rs("grupo")%></option>
<option><input name "grupo" type="text" class="titulos"></option> </select></div></td>
<input name="Enviar" type="submit" id="Enviar" value="Enviar">
</table></TR></TABLE>
</BODY></HTML>
......
"""req.asp"""
<%dim a,e, Conn, SQL
a=Request.Form("nombre")
e= Request.Form("grupo")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "equipo1"
SQL="Insert into equipo1 (nombre, grupo) values ('"&a& "','"&e& "')"
Conn.Execute(SQL)%>
<%Conn.Close
Set Conn= nothing%>
....
Y al final queda la nueva base equipo1 con los datos NUEVOS de nombre (que seria el mismo) y grupo (que pudo haber cambiado o no).
Gracias por sus consejos y espero no estarlos molestando tanto
