One asp page to view different reports

welshone · Nov 7, 2001

Hello,
at present when I want to create a new report for the web I also create a new asp page which points to the relevent report,( with the asp page are the parameters too).

how can I use just one asp page to open many different reports ?

amutinu · Nov 7, 2001

Hi Welshone,
I am using the same technique to run crystal reports using ASP but when i try to run the report, i am getting, "server has not been found yet" right before i read the records. do you know what this means? Any sample code would be greatly appreciated.

thanks

welshone · Nov 8, 2001

Alright ?

this is a sample asp page I am using to create crystal reports on the web.

<%@ LANGUAGE="VBSCRIPT" %>
<title>A001</title>

<%

reportname = "A001.01 Admissions Extract.rpt"

%>

<SCRIPT Language=Javascript>
function HideHourGlass(){
szNavVersion = navigator.appVersion // Hide the 'retreiving records' display
if (szNavVersion.indexOf ("4.&quot

>= 0 || szNavVersion.indexOf ("5.&quot

>= 0) {
if (navigator.appName == "Netscape&quot

{
document.layers["StatusText"].visibility="hide"
}else{
if (document.all("StatusIE&quot

){
document.all("StatusIE&quot

.style.visibility = "hidden";
}
}
}
}
</SCRIPT>
<BODY onLoad="HideHourGlass()">
<DIV ID="StatusIE"><LAYER ID="StatusText"><center>Generating Report, Please Wait... </center></LAYER></DIV>

<%

If Not IsObject (session("oApp&quot

) Then
Set session("oApp&quot

= Server.CreateObject("Crystal.CRPE.Application&quot

End If

Path = Request.ServerVariables("PATH_TRANSLATED&quot

While (Right(Path, 1) <> "\" And Len(Path) <> 0)
iLen = Len(Path) - 1
Path = Left(Path, iLen)
Wend

If isObject(session("oRpt&quot

) then
set session("oRpt&quot

= nothing
End If

Set session("oRpt&quot

= session("oApp&quot

.OpenReport(path & ReportName, 1)

Set oRptOptions = Session("oRpt&quot

.Options
oRptOptions.MorePrintEngineErrorMessages = 0
session("oRpt&quot

.DiscardSavedData
%>

<%

userid = "ed"
password = "ed"

'session("oRpt&quot

.MorePrintEngineErrorMessages = False
'session("oRpt&quot

.EnableParameterPrompting = False

' Set the location
set crtable = session("oRpt&quot

.Database.Tables.Item(1)
crtable.SetLogonInfo "DATABASE_NAME", "ODBC_NAME", cstr(userid), cstr(password)

%>

<%

On Error Resume Next
session("oRpt&quot

.ReadRecords
If Err.Number <> 0 Then
Response.Write "An Error has occured on the server in attempting to access the data source"
Else

If IsObject(session("oPageEngine&quot

) Then
set session("oPageEngine&quot

= nothing
End If
set session("oPageEngine&quot

= session("oRpt&quot

.PageEngine
End If

%>

<HTML>
<HEAD>
<TITLE>Seagate ActiveX Viewer</TITLE>
</HEAD>

<input type="button" value=" Close Report " OnClick="document.location='./Default.htm';return false;" id=button1 name=button1>

<BODY BGCOLOR=C6C6C6 LANGUAGE=VBScript ONLOAD="Page_Initialize">

<OBJECT ID="CRViewer"
CLASSID="CLSID:C4847596-972C-11D0-9567-00A0C9273C2A"
WIDTH=100% HEIGHT=95%
CODEBASE="/viewer/activeXViewer/activexviewer.cab#Version=2,2,4,28">
<PARAM NAME="EnableRefreshButton" VALUE=1>
<PARAM NAME="EnableGroupTree" VALUE=1>
<PARAM NAME="DisplayGroupTree" VALUE=1>
<PARAM NAME="EnablePrintButton" VALUE=1>
<PARAM NAME="EnableExportButton" VALUE=1>
<PARAM NAME="EnableDrillDown" VALUE=1>
<PARAM NAME="EnableSearchControl" VALUE=1>
<PARAM NAME="EnableAnimationControl" VALUE=1>
<PARAM NAME="EnableZoomControl" VALUE=1>
</OBJECT>

<SCRIPT LANGUAGE="VBScript">
<!--
Sub Page_Initialize
On Error Resume Next
Dim webBroker
Set webBroker = CreateObject("WebReportBroker.WebReportBroker&quot

if ScriptEngineMajorVersion < 2 then
window.alert "IE 3.02 users on NT4 need to get the latest version of VBScript or install IE 4.01 SP1. IE 3.02 users on Win95 need DCOM95 and latest version of VBScript, or install IE 4.01 SP1. These files are available at Microsoft's web site."
CRViewer.ReportName ="rptserver.asp"
else
Dim webSource
Set webSource = CreateObject("WebReportSource.WebReportSource&quot

webSource.ReportSource = webBroker
webSource.URL = "rptserver.asp"
webSource.PromptOnRefresh = True
CRViewer.ReportSource = webSource
end if
CRViewer.ViewReport
End Sub
-->
</SCRIPT>

</BODY>
</HTML>

hope this is of some help. come back to me if you have any queries.

amutinu · Nov 8, 2001

Hi Welshone,
thanks for the code above, it really helped me get started. But when i put this code into my asp page, everything worked expect the viewer didn't show any report. It created an ActiveX viewer but the report wasn't there. So in other words, i am seeing a blank report. Any ideas why this is happening? For testing, i copied the path name and the report name into an IE browser and it worked fine. so i am not sure what the problem might be.

please let me know if you have any comments/suggestions

thanks,

eguthrie · Dec 17, 2001

The problem you describe (the ActiveX viewer displaying with no report) happened to me early on when I was first trying to get Crystal viewer to display my reports from ASP. It turned out to be a problem with Front Page server extensions generated by Visual InterDev that were in my global.asa file. I commented them out, and that solved the problem.

So if you see a bunch of lines in your global.asa file that look like the following, try commenting them out:


<METADATA TYPE="TypeLib" NAME="Crystal Data Object" UUID="{7C5A4C06-A559-11D0-881A-00AA00BA30B7}" VERSION="1.0">
<METADATA TYPE="TypeLib" NAME="Crystal Report 8 ActiveX Designer Run Time Library" UUID="{B4741C00-45A6-11D1-ABEC-00A0C9274B91}" VERSION="8.0">

welshone · Dec 18, 2001

I do not have tohose lines within my global.asa ??

mmaz · Dec 18, 2001

Welshone, in answer to your original question, here's how you could do it:

1 - Assuming the parameters are the same for all reports, display a report name pick list on your page, so the user can select which report he/she wants to run. If the parameters are not the same, then change them depending on which report the user selects.
2 - pass the reportname to your ASP and voilà!

Hope that helps!

welshone · Dec 19, 2001

cheers mmaz,
I dont suppose you have any examples .?

mmaz · Dec 19, 2001

Yes, as a matter of fact, I do.

Do you want sample code for the dynamic parameters, or for the creation of reports?

welshone · Jan 28, 2002

Sample code of dynamic parameters would be good.

cheers.

welshone · Feb 4, 2002

Hello,
To solve this problem, I had to unregister the crviewer.dll from my system32 folder, then run a crystal report from the web. this then downloads the corrrect Viewer.

ericmcgill · Feb 9, 2002

Have any of you ever had to deal with the new licensing scheme Crystal implemented in ver 8.5? They allow 5 concurrent users of the crystal object that displays the report. Their sample code releases a user's license after a session timeout or the user goes to a different page. Has anyone experimented with moving that license release up to a point directly after the report is displayed? They give a "cleanup.asp" page that does the license release.

ganeshrvs · Feb 15, 2002

Hi Welshone,

I have Sample code for dynamic parameters. Create one include file and put all the report details like the following in a two dimentional array. Then create one generic ASP. From then calling ASP, just pass the report code and values for the parameters. You can use the same for sub reports also.

'ReportArr(0,1) = RptName without rpt extension
'ReportArr(0,2) = DBName
'ReportArr(0,3) = procedure name - used for non crystal reports only
'ReportArr(0,4) = In case of Sub reports give the report id of sub report. If more then

' Report Id : 1 -
ReportArr(1,1) = "ReportsOrderReport"
ReportArr(1,2) = "SOM"
ReportArr(1,3) = "WEB_SOM_sp_Order_Report"
ReportArr(1,4) = 0

do you want full source code?

I have one doubt. I referred your code for creating crystal report on the web. You have used Active X control crviewer.dll. Will it work in Netscape? Do I need to do anything to view the same in Netscape??

welshone · Feb 18, 2002

Hello, cheers for this, how ever full source code would be good.
I don't use netscape, so don't know if it will work.

Guest_imported · Feb 26, 2002

hello, YES U CAN view a report in netscape but with de javaviewer jvm, crystal reports have it. you just need install crystal in your server, on your script you need to adjust to show the report within the javaviewr. it can't with active x because that's just for i.e., u know, microsoft suks

nivas · Mar 27, 2002

hello,
well,I displayed my report when i calling it as a url
say,
href="mdr.rpt?init=java&user0=hh&password=hh&prompt0=Test"

This works fine. i found a problem when i explicitly set database connection.No error is output when Database.Table.Setlogoninfo is set.(err.number returned is 0) But Session("oRpt&quot

.ReadRecords is neither returning error or passing to the next statement. Brower is still running. When i commented this statement, an empty report viewer is displayed with no report on it.

To debug, i added some Response.write code in rptserver.asp
These statements are not executed. I am using Javaviewer.

Any one has idea? i don't know where i am mistaking.

Guest_imported · May 10, 2002

I am currently calling a Crystal Report through an ActiveZ viewer. It calls the Cleanup.asp file to kill the session for licensing reasons. But when I kill the session, I lose the session in my app, and lose all my session variables. Is there a way to release the session for the licensing purposes of Crystal, but keep my session for my app?

Thanks.

Guest_imported · May 24, 2002

i am launching the report(segate) from the asp file.during the that time some extra window has been(blank screen with tabcontrol as preview and tree control etc) loaded. after that all the resuls has come.i dont know what is name for that one.(this is my first report in my life ).and in the remaining pages some datas are hided.pls let me know the details.....

Guest_imported · May 24, 2002

i am launching the report(segate) from the asp file.during the that time some extra window has been(blank screen with tabcontrol as preview and tree control etc) loaded. after that all the resuls has come.i dont know what is name for that one.(this is my first report in my life ).and in the remaining pages some datas are hided.pls let me know the details.....

bjrollet · May 24, 2002

DevElem,

int the Cleanup.asp file, remove these lines:

Code:

for each item in session.contents
	response.write item
next
session.contents.removeall
session.abandon

What those lines do is kill all of your session variables. What you need to do is put in these lines:

Code:

session.contents.remove(&quot;oEMF&quot;)
Session.Contents.Remove(&quot;oPageEngine&quot;)
Session.Contents.Remove(&quot;oRpt&quot;)
Session.Contents.Remove(&quot;oApp&quot;)

What this does is destroy the Crystal Report objects, leaving the rest of your session variables intact while reclaiming your licenses.

Also note in AlwaysRequiredSteps.asp and MoreRequiredSteps.asp there is a line:

Code:

Session.Abandon

Remove this. It will kill every session variable if you get a error in these two pages.

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

One asp page to view different reports

Programmer

Programmer

Programmer

Programmer

Programmer

Programmer

Programmer

Programmer

Programmer

Programmer

Programmer

MIS

Programmer

Programmer

New member

MIS

New member

New member

New member

Programmer

Similar threads

Log in

Part and Inventory Search

Sponsor