ASP Call Crystal Report with Store Procedure(3)

'framepage.asp

<%
' 05/02/98
' Added the following features:
' Page Expiry Time
' - The page will expire when downloaded by browser so that user is insured that all data
' will be current.
Response.Expires = 0
%>
<html>
<title></title>
<%
qs = request.querystring
if qs <> "" then
qs = "&" & qs
end if
%>
<frameset rows ="59,*">
<frame marginheight=0 marginwidth=0 noresize scrolling=no name="CrystalViewerToolbar" src="toolbar.asp?<% response.write request.querystring %>">
<frame name="CrystalViewerPreview" src="rptserver.asp?cmd=get_pg&viewer=html_frame&vfmt=html_frame&page=<%response.write session("CurrentPageNumber") %><% response.write qs %>">
</frameset>
</html>

'htmstart.asp

<%
' 05/02/98
' Added the following features:
' Tab Query String Parameter
' - This is the selected tab's tabArray index value.
' Page Expiry Time
' - The page will expire when downloaded by browser so that user is insured that all data
' will be current.
Response.Expires = 0
On Error Resume Next
qs = request.querystring
if qs <> "" then
qs = "&" & qs
else
' Need to make this call for backward compatibility. Users may be referencing htmstart.asp in their web pages.
Call InitializeFrameArray
end if

dim tmpArray
dim index
dim brch
dim val
if request.querystring("TAB") <> "" then
tmpArray = session("tabArray")
index = Cint(request.querystring("TAB"))

if tmpArray(index + 1) <> "" then
brch = tmpArray(index + 1)
qs = "&" & "BRCH=" & brch
end if

session("CurrentPageNumber") = tmpArray(index + 2)
session("lastknownpage") = tmpArray(index + 3)
session("LastPageNumber") = tmpArray(index + 4)
' clear out all of the other arrays
if index = 0 then
Call InitializeFrameArray
else
redim preserve tmpArray(index - 1)
session("tabArray") = tmpArray
end if

else
session("CurrentPageNumber") = "1"
session("lastknownpage") = "0"
session("LastPageNumber") = ""
end if

' This function initializes the tabArray.
SUB InitializeFrameArray()
'initialize the html_frame array
set session("tabArray") = Nothing
session("lastBrch") = ""
dim tmpArray
tmpArray = Array(4)
redim tmpArray(4)
'Initialize the sequence number
tmpArray(0) = "EMPTY"
session("tabArray") = tmpArray
END SUB

%>

<html>
<title></title>
<frameset cols="15%,*">
<frame name="CrystalViewerTree" src="rptserver.asp?cmd=get_ttl&viewer=html%5Fframe&vfmt=html_frame<% response.write qs %>">
<frame name="CrystalViewerPageFrame" src="rptserver.asp?cmd=toolbar_page&viewer=html%5Fframe&vfmt=html_frame&page=<% response.write session("CurrentPageNumber") %><% response.write qs %>">
</frameset>
</html>

'JavaPluginViewer.asp

<html>
<head>
<title>Seagate Java Viewer using Java Plug-in</title>
</head>
<body bgcolor=C6C6C6>

<P align="center">
<object
classid="clsid:8AD9C840-044E-11D1-B3E9-00805F499D93"
width=100%
height=100%
codebase="/viewer/JavaPlugin/Win32/jre1_2_2-win.exe#Version=1,2,2,0">
<param name=type value="application/x-java-applet;version=1.2.2">
<param name=code value="com.seagatesoftware.img.ReportViewer.ReportViewer">
<param name=codebase value="/viewer/javaviewer/">
<param name=archive value="ReportViewer.jar">
<param name=Language value="en">
<param name=ReportName value="rptserver.asp">

时间: 2025-01-01 14:21:00

ASP Call Crystal Report with Store Procedure(3)的相关文章

ASP Call Crystal Report with Store Procedure(1)

Come from http://support.seagatesoftware.com/ 'SimpleStoredProcParam.asp <%@ LANGUAGE="VBSCRIPT" %><title>Crystal Reports ASP Example - Using Stored Procedure Parameters</title><%'============================================

ASP Call Crystal Report with Store Procedure(2)

'ActiveXPluginViewer.asp <html><head><title>Seagate Report Viewer Plug-In</title></head><body bgcolor=C6C6C6><P align="center"><script language="javascript">document.writeln('<EMBED na

ASP Call Crystal Report with Store Procedure(4)

'SPString.SQL if exists (select name from sysobjects where name = 'SPROCString') drop proc SPROCString GO CREATE PROCEDURE SPROCString @pTitle varchar(80) AS SET NOCOUNT ON SELECT *FROM TitleView WHERE Title = @pTitle or @pTitle = '*' 'toolbar.asp <%

ASP Call Crystal Report with Store Procedure(6)

'rptserver.asp Case "SRCH" Call RetrieveObjects Call CheckForError ' create page variable gvPageNumber = CInt(PAGE) Select Case VFMT Case "ENCP" if goPageGenerator.FindText(TEXT, 0, gvPageNumber) then Response.ContentType = EMFMIMETYPE

ASP Call Crystal Report with Store Procedure(5)

<%@ LANGUAGE="VBSCRIPT" %><%On Error Resume Next ' The oEMF object is a helper object to create EMFs (Ecapsulated Messages) for the viewers.' The viewers use EMFs to display errors and navigate to specific pages of the report. If Not Is

ASP Call Crystal Report with Store Procedure(7)

'SmartViewerActiveX.asp <HTML><HEAD><TITLE>Seagate ActiveX Viewer</TITLE></HEAD><BODY BGCOLOR=C6C6C6 LANGUAGE=VBScript ONLOAD="Page_Initialize"> <OBJECT ID="CRViewer" CLASSID="CLSID:C4847596-

ASP.NET中利用Crystal Report创建图表

asp.net|创建|图表 在很多的应用程序中,报表是不可缺少的,一张好的报表能直观地让人把握数据的情况,方便决策.在这篇文章中,我们将以一个三层结构的asp.net程序为例,介绍如何使用crystal report ,来制作一份报表,其中介绍了不少asp.net和水晶报表的技巧. 在这个例子中,我们设想的应用要为一个销售部门制作一份报表,管理者可以查看某段时间之内的销售情况,以列表或者折线图的形式反映出销售的趋势.我们将使用SQL Server 2000做为数据库,使用VB.NET编写中间层逻

Visual Studio 2012使用水晶报表Crystal Report

原文:Visual Studio 2012使用水晶报表Crystal Report SAP在 2013年1月14日 released SAP Crystal Reports,developer version for Microsoft Visual Studio - 2012 .你可以从下面链接下载:http://downloads.businessobjects.com/akdlm/cr4vs2010/CRforVS_13_0_5.exe 下载并安装入你的电脑.安装 完毕,可以看到那些曾经熟

VS2005+Crystal Report开发Web应用

web 提要 本文试验将帮助你创建一个使用Crystal Report的Web应用程序-报告中的数据来源于一个对象集合,你将创建一个专门的类来保存股票市场数据. 一. 开发目标 结束本试验后,你将能够更好地: · 创建一个专门的类来保存股票市场值. · 实例化这个类. · 使用数据填充一个对象集合. · 通过一个web表单动态地添加数据. · 使用Crystal Report Designer熟练地创建一个水晶报表. 二. 内容说明 本实验将引导你创建一个Crystal Reports web应