upgrade to 8 problem with renderpagetostring

    Public Function RenderPageToString(ByVal DPI As Integer, ByVal Page As Integer, _
        ByVal Options As Integer) As Byte()
      If (dll Is Nothing) Then
        Return New Byte(-1) {}
      Else
        Dim data As IntPtr = dll.QuickPDFRenderPageToString(instanceID, DPI, Page, Options)
        Dim size As Integer = dll.QuickPDFAnsiStringResultLength(instanceID)
        Dim result As Byte() = New Byte(size - 1) {}
        Marshal.Copy(data, result, 0, size)
        Return result
      End If
    End Function

thanks.