Ver Mensaje Individual
  #37 (permalink)  
Antiguo 17/01/2008, 18:30
Avatar de Shiryu_Libra
Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 2 meses
Puntos: 88
Re: No coinciden los tipos: [String]

bueno, que les parece si hacemos esto
el select
Cita:
<form action="conteos.asp" method="post">
<font color="#000033" size="3" face="Arial, Helvetica, sans-serif">Estado:</font>
<font size="2" face="Arial, Helvetica, sans-serif">
<select name="estado" size="1" id="estado">
<option value="elija">elija una opcion</option>
<option value="Tramite">Tramite</option>
<option value="Vigente">Vigente</option>
<option value="Caduca">Caduca</option>
</select>
<input type="submit" />
</font>
</form>
y el codigo
Cita:
<%
estado = request.Form("estado")

strcon="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("basedatos.mdb")

set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open strcon

SQL = "SELECT estado FROM tutabla where estado = '"& estado &"'"
response.Write SQL & "<br />"

set RS = oConn.execute(SQL)
if Err=0 then
cuantos=0
if RS.EOF = FALSE then
while RS.EOF=false
cuantos=cuantos+1
rs.movenext
wend
end if
end if
if Cuantos<> "" then
%>Hay: <% response.Write Cuantos
else
response.Write "no se puede completar la peticion"
end if
cuantos = 0
RS.Close
Set RS = nothing
oConn.Close
set oConn = nothing
%>
a menos de que opinen lo contrario
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra