Hola
No hay ningún problema en pasarle 2,3,4,n valores.
El error que te marca es HTTP 500, pude ser por infinidad de razones, pero si el código es tan simple como el de tu muestra entonces el error esta en
Cita: sub calculo022(val1,val2)
if val1 = 1 and val2 > 1 then
response.write("Valor valido")
end if
end sub
Suerte