Ver Mensaje Individual
  #3 (permalink)  
Antiguo 03/12/2004, 13:10
Avatar de AlZuwaga
AlZuwaga
Colaborador
 
Fecha de Ingreso: febrero-2001
Ubicación: 34.517 S, 58.500 O
Mensajes: 14.550
Antigüedad: 24 años, 2 meses
Puntos: 535
Código:
<%
Var1 = 5899

For i = 1 to Len(Var1)
	suma = CInt(suma) + CInt(Mid(Var1, i, 1))
Next

Response.write suma
%>
__________________
...___...