[VBScript] Pivot Table

Does any body know a general porpuse function to imlpement crosstabs in vbscript ?