Necesito ayuda para contar elementos de texto de una tabla en ASP
Que tal estimado experto:
Mi problema es que tengo que contar, elementos de una tabla pero estos son texto necesito saber cuantos son, la página esta hecha en ASP, y este parte del código:
Me dice que "no coinciden los tipos"
x_Descripcion = rs("Descripcion")
acumulator=acumulator+(x_Descripcion)
<% response.write x_Descripcion %>
rs.MoveNext
Loop
%>
Gracias por la atención
Desde Mexico City
Armin Canto
Mi problema es que tengo que contar, elementos de una tabla pero estos son texto necesito saber cuantos son, la página esta hecha en ASP, y este parte del código:
Me dice que "no coinciden los tipos"
x_Descripcion = rs("Descripcion")
acumulator=acumulator+(x_Descripcion)
<% response.write x_Descripcion %>
rs.MoveNext
Loop
%>
Gracias por la atención
Desde Mexico City
Armin Canto
1 Respuesta
Respuesta
1
Prueba con esto en vez de hacer todo eso.
<%
response.write rs.count
%>
Me avisas si te sirve
<%
response.write rs.count
%>
Me avisas si te sirve
Experto:mira, presento este mensaje "El objeto no acepta esta propiedad o método: 'count'", pero de cualquier forma ya lo resolví te agradezco infinitamente, por la molestia...
Ahora la nueva pregunta es acerca de la misma página, esta consulta un numero de empleado y presenta determinada información como le hago para que cuando no exista el empleado o este erróneo, en lugar de mandarme a una página de error clásica, me, mande a una que yo diseñe con un mensaje especial de preferencia un pop-up
Gracias por la prontitud de la otra respuesta
Armin Canto
Ahora la nueva pregunta es acerca de la misma página, esta consulta un numero de empleado y presenta determinada información como le hago para que cuando no exista el empleado o este erróneo, en lugar de mandarme a una página de error clásica, me, mande a una que yo diseñe con un mensaje especial de preferencia un pop-up
Gracias por la prontitud de la otra respuesta
Armin Canto
ah y en vez de hacer un response. write dentro del if cuando ocurre el error tu puedes llamar mediante una función javascript la pagina que diseñaste especial para los errores. Todo esto que estamos hablando se llama Error Handled.
Era así la respuesta anterior.
<%
response.write rs.recordcount
%>
Y con respecto a tu nueva pregunta eso se maneja con el "On Resume Next" que es para obviar los errores en las páginas y con la función "err.number" que te trae el error que haya ocasionado tu aplicación.
copia este codigo. Es un ejemplo que manejo:
<%@ Language=VBScript %>
<HTML>
<HEAD>
</HEAD>
<BODY>
<%
On Error Resume Next
If Request.Form("sbmtMultiply")<>"" then 'If multiply is clicked
Value=Cint(Request.Form("txtA"))*Cint(Request.Form("txtB"))
End If
If Request.Form("sbmtDivide")<>"" then 'If divide is clicked
Value=Cint(Request.Form("txtA"))/Cint(Request.Form("txtB"))
End If
If Err.number<>0 then
If Err.number=11 then '11 is the number that occurs for division by zero.
Response.Write "This is a custom message. You cannot divide by zero."
Response.Write "Please type a different value in the second textbox!<p>"
else
Response.Write "An Error Has Occurred on this page!<BR>"
Response.Write "The Error Number is: " & Err.number & "<BR>"
Response.Write "The Description given is: " & Err.Description & "<BR>"
End If
End If
%>
<FORM action="" method=POST name=f1>
A:<INPUT type="text" name=txtA size=5> <BR>B:<INPUT type="text" name=txtB size=5><BR>
<INPUT type="submit" value="Multiply: A x B" name=sbmtMultiply>
<INPUT type="submit" value="Divide: A/B" name=sbmtDivide>
<BR>Result: <INPUT type="text" name=txtResult value="<%=Value%>">
</FORM>
</BODY>
</HTML>
<%
response.write rs.recordcount
%>
Y con respecto a tu nueva pregunta eso se maneja con el "On Resume Next" que es para obviar los errores en las páginas y con la función "err.number" que te trae el error que haya ocasionado tu aplicación.
copia este codigo. Es un ejemplo que manejo:
<%@ Language=VBScript %>
<HTML>
<HEAD>
</HEAD>
<BODY>
<%
On Error Resume Next
If Request.Form("sbmtMultiply")<>"" then 'If multiply is clicked
Value=Cint(Request.Form("txtA"))*Cint(Request.Form("txtB"))
End If
If Request.Form("sbmtDivide")<>"" then 'If divide is clicked
Value=Cint(Request.Form("txtA"))/Cint(Request.Form("txtB"))
End If
If Err.number<>0 then
If Err.number=11 then '11 is the number that occurs for division by zero.
Response.Write "This is a custom message. You cannot divide by zero."
Response.Write "Please type a different value in the second textbox!<p>"
else
Response.Write "An Error Has Occurred on this page!<BR>"
Response.Write "The Error Number is: " & Err.number & "<BR>"
Response.Write "The Description given is: " & Err.Description & "<BR>"
End If
End If
%>
<FORM action="" method=POST name=f1>
A:<INPUT type="text" name=txtA size=5> <BR>B:<INPUT type="text" name=txtB size=5><BR>
<INPUT type="submit" value="Multiply: A x B" name=sbmtMultiply>
<INPUT type="submit" value="Divide: A/B" name=sbmtDivide>
<BR>Result: <INPUT type="text" name=txtResult value="<%=Value%>">
</FORM>
</BODY>
</HTML>