Sumar el contenido de una variable

[sqa212]

Supongamos que tengo
<%Var1=5899%>
¿Como puedo sumar el contenido, es decir, 5+8+9+9?

[Muzztein]

asi po loco

acumulador = 0
variable = 12345

for x = 1 to len(variable)
acumulador = Mid(variable, x, 1) + acumulador
Next !!!


o algo parecido

[AlZuwaga]

Código:

<%
Var1 = 5899

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

Response.write suma
%>