The VB trick to get the path of the current temporary directory:
Private Declare Function GetTempPath Lib \"kernel32\" Alias \"GetTempPathA\" (ByVal nBufferL
Another possibility:
CreateObject("WScript.Shell").ExpandEnvironmentStrings("%Temp%")