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

[santino83]

oddio un moderatore che fa una domanda mitico

cmq il problema è qui:

s = "123 456 789"

CInt(Mid(s,i,1)) da errore quando la i è l'indice dello "spazio" tra le serie dei numeri:

123spazio456spazio789

dovresti fare un controllo preventivo del valore mid() prima di darlo in pasto a cint (come era il vecchio script del resto)

[br1]

Originariamente inviato da santino83
oddio un moderatore che fa una domanda mitico

cmq il problema è qui:

s = "123 456 789"

CInt(Mid(s,i,1)) da errore quando la i è l'indice dello "spazio" tra le serie dei numeri:

123spazio456spazio789

dovresti fare un controllo preventivo del valore mid() prima di darlo in pasto a cint (come era il vecchio script del resto)

Grazie, ma il controllo c'e' gia'

Ho riletto un reference che dichiara il parametro della funzione CInt come numerico... a questo punto mi chiedo quale sia la funzione da utilizzare per la conversione da stringa a numero :master:

ciao

[optime]

brune', in termini di performance non hai nessun guadagno tra la prima e la seconda versione. tienti la prima, eventualmente ottimizzabile

...
for i = 1 to len(s)
   If Mid(s,i,1) <> " " Then 
      r = r + CInt(Mid(s,i,1))
   End if
next
...

devi però essere ultra-arci-stra-sicurissimerrimo che dentro s ci siano solo cifre e spazi!