Hi Marlon,

Thanks for the info.  But isn't there a way to use CFREPORT with Crystal?

Thanks

Niklas


On 19/07/05, Marlon Moyer <[EMAIL PROTECTED]> wrote:
> Niklas,
> 
> I've been dealing with the scourge of crystal for a long time.  This
> is the solution I've had the most luck with.  I know that this
> solution works with CR 8.5, but I'm not sure about newer versions.
> This solution also requires Crystal and .Net framework to be installed
> on the server.
> 
> Essentially, I've got 1 asp.net page that I call using CFHTTP.  I have
> the asp.net page write out a pdf file onto the harddrive and then I
> serve up the pdf via CF.  HTH
> 
> Marlon
> 
> 
> reportServer.aspx
> *****************************************************************
> <%@ Page Language="VB" AspCompat="true" %>
> <% Server.ScriptTimeout = 360 %>
> <%
> 
> dim App,Rpt,Export as object
> 
> dim 
> DllName,ServerName,DatabaseName,Login,Password,Report,SelectionFormula,DiskFileName
> as string
> dim FormatType as integer
> 
> DllName = cstr(request.form("DllName"))
> ServerName = cstr(request.form("ServerName"))
> DatabaseName = cstr(request.form("DatabaseName"))
> Login = cstr(request.form("login"))
> Password = cstr(request.form("password"))
> Report = cstr(request.Form("report"))
> SelectionFormula = cstr(request.Form("SelectionFormula"))
> FormatType = cInt(request.Form("FormatType"))
> DiskFileName = cstr(request.Form("DiskFileName"))
> 
> try
>         App = Server.CreateObject("CrystalRuntime.Application")
>         App.LogOnServer(DllName,ServerName,DatabaseName,login,Password)
>         Rpt = App.OpenReport(Report,1)
> 
>         Rpt.MorePrintEngineErrorMessages = false
>         Rpt.EnableParameterPrompting = false
>         Rpt.DiscardSavedData
>         Rpt.RecordSelectionFormula = SelectionFormula
>         Export = Rpt.ExportOptions
>         Export.DiskFileName = DiskFileName
>         Export.FormatType = FormatType
>         'Always write to disk
>         Export.DestinationType = CInt(1)
>         Rpt.Export(False)
>         response.Write("STATUS: OK")
> Catch ex As Exception
>                 response.Write("STATUS: ERROR<br/>")
>                 response.Write("MESSAGE: " + ex.toString() + "<br/>")
>                 response.Write("SOURCE: " + ex.source + "<br/>")
>                 response.Write("STACK: " +  ex.StackTrace + "<br/>" )
> Finally
>                 Export = nothing
>                 Rpt = nothing
>                 App = nothing
>                 'Force a garbage collection to release the object
>                 GC.Collect()
> End try
> %>
> **********************************************************
> 
> On 7/19/05, Niklas Richardson <[EMAIL PROTECTED]> wrote:
> > Hi all,
> >
> > A current project we're working on requires integration with A LOT of
> > Crystal Reports with ColdFusion MX 7.
> >
> > I haven't used Crystal Reports since version 3 of ColdFusion, and thus
> > have forgotten how to do the integration, and how the Crystal Reports
> > should be structured.
> >
> > This has just been dumped on my and we need an urgent solution (i.e.
> > in next couple of days).
> >
> > If anyone can help with Crystal Reports and CF, please can you let me
> > know.  Drop me an email off list.  Thanks.
> >
> > Regards
> >
> > Niklas
> >
> >
> 
> 

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
Find out how CFTicket can increase your company's customer support 
efficiency by 100%
http://www.houseoffusion.com/banners/view.cfm?bannerid=49

Message: http://www.houseoffusion.com/lists.cfm/link=i:4:212199
Archives: http://www.houseoffusion.com/cf_lists/threads.cfm/4
Subscription: http://www.houseoffusion.com/lists.cfm/link=s:4
Unsubscribe: http://www.houseoffusion.com/cf_lists/unsubscribe.cfm?user=89.70.4
Donations & Support: http://www.houseoffusion.com/tiny.cfm/54

Reply via email to