Business Objects 7008038 Manual De Usuario

Descargar
Página de 18
Crystal Reports Server XI
 
Upgrading Crystal Enterprise 10 Embedded Edition Applications
 
Dim rptClientDoc As ReportClientDocument 
Dim rptAppFactory As ReportAppFactory 
rptAppFactory = 
ceInfoStore.EnterpriseSession.Interface.Service("", 
"RASReportFactory") 
‘open the report 
rptClientDoc = rptAppFactory.OpenDocument(ceReport.ID, 
CdReportClientDocumentOpenOptionsEnum.cdReportClientDocumen
tOpenAsReadOnly) 
 
.NET SDK (C#.NET) 
ReportClientDocument rptClientDoc; 
ReportAppFactory rptAppFactory; 
 
rptAppFactory = ceSession.GetService("", 
"RASReportFactory"); 
rptClientDoc = rptAppFactory.OpenDocument(ceReport.ID, 
CdReportClientDocumentOpenOptionsEnum.cdReportClientDocumen
tOpenAsReadOnly); 
 
COM SDK (ASP) 
Dim rptClientDoc 
Dim rptAppFactory 
 
if (ceReports.resultCount > 0) then 
'Initialize Report Application Server 
Set rptAppfactory = 
ceInfoStore.EnterpriseSession.Service("", 
"RASReportFactory") 
'Open the infoObject as a reportClientDocument 
Set rptClientDoc = 
rptAppFactory.openDocument(oInfoObjects.item(1)) 
else 
'handle error 
end if 
 
Java SDK (JSP) 
/* Get the Report Application Factory service from Crystal 
Enterprise */ 
IReportAppFactory rptAppFactory = 
(IReportAppFactory)ceSession.getService("", 
"RASReportService"); 
 
3/30/2007 10:15 AM 
Copyright © 2007 Business Objects. All rights reserved.
 Page 
 
crserver_xi_upgrading_from_ce10_embedded.pdf