errore su funzione CInt()

[br1]

Ho cercato di semplificare questo:

<%
r = 0
s = "123 456 789"
for i = 1 to len(s)
	If Mid(s,i,1)=" " Then 
		n = 0 
	Else 
		n = CInt(Mid(s,i,1))
	End if
	r = r + n
next
response.write r & "
"
%>

con questo:

Function iif(c,t,f)
	If c Then iif=t Else iif=f
End Function
r = 0
s = "123 456 789"
for i = 1 to len(s)
	r = r + IIf(Mid(s,i,1)=" ", 0, CInt(Mid(s,i,1))) 
Next
response.write r & "
"
%>

ma ottengo:

Numero errato di argomenti o assegnazione di proprietà non valida: 'CInt'

dalla riga in rosso... :master:

E' da un pochino che mi arrovello... anche se continuero' ad utilizzare la prima sintassi vorrei capire cosa sbaglio nella seconda

ciao