Vbscript If Conditional Type