Trying To Figure Out Number Of Pages In Report

Greetings,

I have a report that is created that is typically 2-3 pages long. I've tried the "ExecutionInfo.NumPages" but it always results in "1" as the answer. Code is something like this:

============

...

Dim reportHistoryParameters As sqlprod1_res.ParameterValue() = Nothing

Dim SessionId As String
Dim execInfo As New ExecutionInfo

Dim execHeader As New ExecutionHeader()



Dim result As Byte() = Nothing

Dim format As String = "PDF"

Dim devInfo As String = "<DeviceInfo><Toolbar>False</Toolbar></DeviceInfo>"
Dim extension As String = ""
Dim encoding As String = ""
Dim mimeType As String = ""
Dim warnings As sqlprod1_res.Warning() = Nothing

Dim streamIDs As String() = Nothing


result = rs.Render(format, devInfo, extension, encoding, mimeType, warnings, streamIDs)

execInfo = rs.GetExecutionInfo()



Dim Pages As Integer = execInfo.NumPages
============



Also tried to count streams with the same result.


Any ideas?



Thanks

Dan Ribar