export pivottable to excel

[Botinha]

Hello!

I have an html page with a pivot table. I am using vbscript to add new
functions to the pivot table toolbar.
I want to create a new excel file with the pivot table. Does anybody
nows how to do this?
I try to use exportpivot but didn't work!
Another thing, how should i get the included member?
This is the code i'm using:
dim array,objSpreadsheet
Set objSpreadsheet = CreateObject("OWC.Spreadsheet")

set array=objSpreadsheet.Cells(row + 1, fields).Value =
oview.RowAxis.FieldSets(countRow - 1).fields(fields -
1).IncludedMembers

Could some one give a tip?

Thanks in advanced!

André Fonseca