add 5 vbscript functions