som van integer even of oneven ?

[yammaski]

Hoe kan ik weergeven dat de som van het getal (hier 9 en 4) even of oneven is ?

<%
Call OddEvenNumber(4131)
Call OddEvenNumber(1300)

Sub OddEvenNumber(iNumber)
If iNumber MOD 2 = 0 Then
Response.write "The number " & iNumber & " is EVEN<br />"
Else
Response.write "The number " & iNumber & " is ODD<br />"
End If
End Sub
%>

Yam.