Declare Function Vbscript