Cita:
Iniciado por JuanRAPerez
oki el error esta mas abajo de la sql
pegas el codigo como lo tenes ahorita=??????
ok
haber mira asi esta:
<%
'declaracion y recepcion de variables enviadas por el formulario
Dim Vig,Tra,Cad'declaracion de variables
Vig=trim(request.form("Vigente"))
Tra=trim(request.form("Tramite"))
Cad=trim(request.form("Caduca"))
'validacion de los espacios en blanco
if (Vig="") and (Tra="") and (Cad="") then ' if de inicio
<!---response.Redirect("sesion1.asp?ban=1")-->
else
sql="select Count (*) As CuantosHay from Prop_Ind where estado = '"&Vigente&"','"&Caduca&"','"&Tramite&"'"
Dim infPA 'declaracion de variable
Set infPA = Server.CreateObject("ADODB.Recordset")
infPA.ActiveConnection = x
infPA.Source = sql
infPA.Open() 'se abre el archivo
end if%>
<table width="66%" height="73" border="0" align="center">
<tr>
<td colspan="7"><div align="center"><font size="2" face="Arial, Helvetica, sans-serif"><strong>Vigentes</strong></font></div></td>
<td width="27%" colspan="5"><div align="center"><font size="2" face="Arial, Helvetica, sans-serif"></font><a href="insert1.asp?"estado"><%=infPA("CuantosHay")% ></a></div></td>
<%
if Vig=Vigente then
Vig=Vig +1
end if
%>
</tr>
<tr>
<td colspan="7"><div align="center"><font size="2" face="Arial, Helvetica, sans-serif"><strong>Tramites</strong></font></div></td>
<td colspan="5"><div align="center"><font size="2" face="Arial, Helvitica, sans-serif"></font><a href="insert1.asp?"estado"><%=infPA("CuantosHay")% ></a></div></td>
<%
if Tramite = Tramite then
Tramite = Tramite +1
end if %>
</tr>
<tr>
<td colspan="7"><div align="center"><font size="2" face="Arial, Helvetica, sans-serif"><strong> Caducas</strong></font></div></td>
<td colspan="5"><div align="center"><font size="2" face="Arial, Helvetica, sans-serif"></font><a href="insert1.asp?"estado"><%=infPA("CuantosHay")% ></a></div></td>
<% if Caduca = Caduca then
Caduca = Caduca +1
end if %>
end if%>
</tr>
<tr>
</table>
ahora solo me sale que no coinciden los tipos????