
19/06/2002, 13:32
|
| | Fecha de Ingreso: mayo-2002 Ubicación: Mexico DF
Mensajes: 119
Antigüedad: 23 años Puntos: 0 | |
Re: Todavia No Funciona Hi, prueba esto
sql1 = "SELECT * FROM solicitudes, usuarios WHERE id=" & Request.QueryString("id") & ""
Set RS1 = oConn.Execute(SQL1)
sql = "SELECT id, id_estado FROM solicitudes
Set RS = oConn.Execute(SQL)
<select name="id_estado" class="Boton">
<%
Do While Not RS.EOF
If (rs("id"))=Request.QueryString("id& quot;) Then
%>
<option value="<%=rs("id")%>" Selected><%=rs("id_estado")%>
<%
Else
%>
<option value="<%=rs("id")%>"> ;<%=rs("id_estado")%>
<%
Rs.MoveNext
Loop
Rs.Close
Rs=Nothing
%>
</select>
Saludos |