Hola a tod@s tengo un problema con un desplegable ya que intento decir que cuando seleccione las option que lo compone no me funciona a ver si alguien sabe en que me estoy confundiendo. Gracias.
Código PHP:
<!--#include file="include/sp-cabecera-ppal.asp"-->
<table width="68%" height="100%" cellpadding="0" cellspacing="0" border="0" align="center" bgcolor="#FFFFFF">
<tr>
<td colspan="3" align="center">
<!--#include file="include/sp-cabecera.asp"-->
</td>
</tr>
<tr>
<td width="10%" align="left" valign="top">
<img src="img/columna-int.jpg" border="0">
</td>
<td width="80%" valign="top" class="texto">
<img src="img/tit-sp-buscador.jpg" border="0"><br><br>
<table border="0" cellpadding="0" cellspacing="0" width="139" align="center">
<!-- fwtable fwsrc="Sin título" fwbase="sp-area.html" fwstyle="Dreamweaver" fwdocid = "1642969582" fwnested="0" -->
</table>
<table width="100%" cellpadding="0" cellspacing="0" border="0">
<tr>
<td valign="top" class="textonegro" >
<%
buscar=lCASE(request.Form("buscar"))
set Ob_conn1=server.createobject("ADODB.connection")
Ob_conn1.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("..\..\Data\kroma_bd.mdb") & ";"
set rs1=ob_conn1.Execute("SELECT * FROM ENT_distribuidores WHERE c_nombre LIKE '%"&buscar&"%'")
'set rs1=ob_conn1.Execute("select * from T_llamadas where (c_usuario='"& usuario &"' or c_usuario='"& todos &"') order by c_idllamada desc")
if rs1.eof then
%>
<center>
<center><img src="img/sentir.gif"/><br />
<B>Lo sentimos</B>
No existe <b>ningún resultado de búsqueda</b> con los parámetros introducidos (<%=Buscar%>)</center><Br><br>
<%else%>
<table width="100%" border="0" cellspacing="0">
<tr bgcolor="#F3F3F3">
<td width=10></td>
<td class="textonegro" colspan="2"><center>
<form name="selecion" method="post">
<select name="distribuidores" class="select" />
<option value="0" selected="selected">Distribuidores</option>
<option value="1">Activos</option>
<option value="2">Inactivos</option>
</select>
</form>
</center> </td>
</tr>
<tr>
<td height=1 bgcolor="#CCCCCC" colspan="3"></td>
</tr>
<tr bgcolor="#F3F3F3">
<td width=10></td>
<td class="textonegro" colspan="2"><center>CLIENTES: <b><%=buscar%></b></center></td>
</tr>
<tr bgcolor="#F3F3F3">
<td width="10"></td>
<td class="textonegro">
<b>NOMBRE CLIENTE</b> </td>
<td class="textoNegro">
<b>ACCESO</b> </td>
</tr>
<tr>
<td height=1 bgcolor="#CCCCCC" colspan="3"></td>
</tr>
<%do while not rs1.eof%>
<tr>
<td width="10"></td>
<td class="textoazulG">
<%'=rs1("c_nombre")%>
<% dim nombre
nombre=request.Form("distribuidores")
response.Write(nombre)
select case nombre
case "0"
response.write("La variable es Ivan")
case "1"
response.write("La variable es Pedro")
case "2"
response.write("La variable es Juan")
End Select
%>
</td>
<td class="textoazulG">
<a ><img src="img/lupa.gif" border="0"></a> </td>
</tr>
<tr>
<td height=1 bgcolor="#CCCCCC" colspan="3"></td>
</tr>
<%
rs1.movenext
loop%>
</table>
<%end if%>
</td>
<td width="20"></td>
</tr>
</table>
</td>
<td width="10%" valign="top"></td>
</tr>
<tr>
<td colspan="3">
</td>
</tr>
</table>
<!--#include file="include/fin.asp"-->
</html>