Ver Mensaje Individual
  #1 (permalink)  
Antiguo 20/06/2003, 18:53
Avatar de zink
zink
 
Fecha de Ingreso: mayo-2002
Ubicación: Aguascalientes
Mensajes: 125
Antigüedad: 23 años
Puntos: 0
combo y base de datos

Hola, necesito qe me ayuden con este código:

<%
Valorcombo= Trim(Request ("ValorCombo"))
If Valorcombo <> "" Then
RsSQL="SELECT dependencia, secretaria FROM tramites WHERE ID= '"&Valorcombo&"' "
Rs.Open RsSQL ,DB
End IF

ValorTramite= Request ("var")
SQL="SELECT id, nombre_tramite FROM tramites WHERE ID= '"&ValorTramite&"' "
TBL.Open SQL ,DB
%>

<p align="center"><b><font face="Tahoma" size="2"><font color="#006FA4">Seleccione
el Trámite </font></b>
<select size="1" name="combo" onChange="ValorCombo()">
<%
do while not TBL.EOF
%>
<option value="tramites.asp?ValorCombo=<%=TBL("ID")%>"><%= TBL("nombre_tramite")%></option>
<%
TBL.MoveNext
Loop
TBL.Close
Set TBL = Nothing
%>

</select></p>

...
...
...
<% Response.Write TBL("dependencia")%>
<% Response.Write TBL("secretaria")%>

Lo que quiero hacer es que al seleccionar la opcion del combo, me despliegue la informacion de ese registro, pero me marca error en la linea
<% Response.Write TBL("dependencia")%> me dice Type Mismatch
y cuando selecciono otra opcion del combo me dice que en la linea que esta en rojo falta una "

Alguien que me eche una mano????

Gracias

Última edición por zink; 20/06/2003 a las 19:06