S
Steven Thomas
I have an ASP page I am trying to covert to ASP.NET. The original
code recieved a list of parameters from the Query String. Then it
called an activeX function that would request a report from a seperate
server. When the report finished, the function would return the file
path to the snap file.
Then it would display the file in the browser.
--------------------------------------------------------------
'DECLARTION OF VARIABLES
REPORT_SUCCESS = 1
REPORT_ERROR = 0
REPORT_TIMEOUT = 2
REPORT_REQUESTERROR = -1
'SET THE VALUE OF VARIABLES WITH DATA FROM POSTING PAGE
strReportName = Request.Form("hdnShortName")
strReportType = Request.Form("hdnReportType")
strSQL = Request.Form("hdnSQL")
strInputFileName =Request.Form("hdnInputFileName")
strEmailOnly = Request.Form("hdnEmailOnly")
strReportQueueServer = Request.Form("hdnReportQueueServer")
strReportQueueBatchServer = Request.Form("hdnReportQueueBatchServer")
strWebGroupName = Request.Form("hdnWebGroupName")
strAppName = Request.Form("hdnAppName")
.......
Set oReport = CreateObject("GPReport.clsReport")
'SUBMITT THE REQUEST TO THE REPORT QUEUE SERVER
If ( oReport.RequestReport(Cstr(strReportQueueServer),
CStr(strReportType), Cstr(strWebGroupName), CStr(strInputFileName),
CStr(strReportName), CStr(strSQL), Cstr(strAppName), 180)= True) then
%>
<TITLE>Georgia-Pacific</TITLE>
</HEAD>
<BODY>
<form name=frmPreviewReports method=get action=PreviewReports.asp
target=rptexcel>
<table width=600><tr><td width=300 align=center>
<INPUT name=cmdPrint TYPE=Button VALUE="Print Report">
</td><td width=300 align=center>
<INPUT name=cmdSend TYPE=Button VALUE="E-Mail Report">
</td></tr><tr><td colspan=2>
<OBJECT classid="CLSID:F0E42D60-368C-11D0-AD81-00A0C90DC8D9"
codebase="http://<%= Request.ServerVariables("HTTP_HOST")
%>/Snapshot/Snapview.ocx" height=525 id=SnapshotViewer style="LEFT:
0px; TOP: 0px;" width=750 VIEWASTEXT>
<PARAM NAME="_ExtentX" VALUE="15875">
<PARAM NAME="_ExtentY" VALUE="21167">
<PARAM NAME="_Version" VALUE="65536">
<PARAM NAME="SnapshotPath" VALUE="c:\krc.snp">
<PARAM NAME="Zoom" VALUE="0">
<PARAM NAME="AllowContextMenu" VALUE="-1">
<PARAM NAME="ShowNavigationButtons" VALUE="-1">
</OBJECT>
</td></tr></table>
<OBJECT CLASSID="clsid:3FA7DEB3-6438-101B-ACC1-00AA00423326"
ID=objWebSession VIEWASTEXT>
</OBJECT>
<SCRIPT language=VBScript>
Sub window_onLoad()
frmPreviewReports.SnapshotViewer.SnapshotPath = "<%=
oReport.ReportName %>"
End Sub
.............................................................
I have been searching the web, with no luck on finding a why to do
this in .net. Any help would be appreciated.
code recieved a list of parameters from the Query String. Then it
called an activeX function that would request a report from a seperate
server. When the report finished, the function would return the file
path to the snap file.
Then it would display the file in the browser.
--------------------------------------------------------------
'DECLARTION OF VARIABLES
REPORT_SUCCESS = 1
REPORT_ERROR = 0
REPORT_TIMEOUT = 2
REPORT_REQUESTERROR = -1
'SET THE VALUE OF VARIABLES WITH DATA FROM POSTING PAGE
strReportName = Request.Form("hdnShortName")
strReportType = Request.Form("hdnReportType")
strSQL = Request.Form("hdnSQL")
strInputFileName =Request.Form("hdnInputFileName")
strEmailOnly = Request.Form("hdnEmailOnly")
strReportQueueServer = Request.Form("hdnReportQueueServer")
strReportQueueBatchServer = Request.Form("hdnReportQueueBatchServer")
strWebGroupName = Request.Form("hdnWebGroupName")
strAppName = Request.Form("hdnAppName")
.......
Set oReport = CreateObject("GPReport.clsReport")
'SUBMITT THE REQUEST TO THE REPORT QUEUE SERVER
If ( oReport.RequestReport(Cstr(strReportQueueServer),
CStr(strReportType), Cstr(strWebGroupName), CStr(strInputFileName),
CStr(strReportName), CStr(strSQL), Cstr(strAppName), 180)= True) then
%>
<TITLE>Georgia-Pacific</TITLE>
</HEAD>
<BODY>
<form name=frmPreviewReports method=get action=PreviewReports.asp
target=rptexcel>
<table width=600><tr><td width=300 align=center>
<INPUT name=cmdPrint TYPE=Button VALUE="Print Report">
</td><td width=300 align=center>
<INPUT name=cmdSend TYPE=Button VALUE="E-Mail Report">
</td></tr><tr><td colspan=2>
<OBJECT classid="CLSID:F0E42D60-368C-11D0-AD81-00A0C90DC8D9"
codebase="http://<%= Request.ServerVariables("HTTP_HOST")
%>/Snapshot/Snapview.ocx" height=525 id=SnapshotViewer style="LEFT:
0px; TOP: 0px;" width=750 VIEWASTEXT>
<PARAM NAME="_ExtentX" VALUE="15875">
<PARAM NAME="_ExtentY" VALUE="21167">
<PARAM NAME="_Version" VALUE="65536">
<PARAM NAME="SnapshotPath" VALUE="c:\krc.snp">
<PARAM NAME="Zoom" VALUE="0">
<PARAM NAME="AllowContextMenu" VALUE="-1">
<PARAM NAME="ShowNavigationButtons" VALUE="-1">
</OBJECT>
</td></tr></table>
<OBJECT CLASSID="clsid:3FA7DEB3-6438-101B-ACC1-00AA00423326"
ID=objWebSession VIEWASTEXT>
</OBJECT>
<SCRIPT language=VBScript>
Sub window_onLoad()
frmPreviewReports.SnapshotViewer.SnapshotPath = "<%=
oReport.ReportName %>"
End Sub
.............................................................
I have been searching the web, with no luck on finding a why to do
this in .net. Any help would be appreciated.