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!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Cannot connect Via ASP?

Status
Not open for further replies.

NewbiDoobie

Technical User
Jul 25, 2005
63
US
I have been trying to dify a sample asp page from CR to run the RDC with V: XI.

Here is my code:
Code:
<%@ LANGUAGE="VBSCRIPT" %>

<%
'===================================================================================
' WORKING WITH THE REPORT DESIGNER COMPONENT AND ASP TO SET A REPORT'S QUERY STRING
'===================================================================================
'
' CONCEPT                                                             
'                                                                     
'  ALWAYS REQUIRED STEPS (contained in AlwaysRequiredSteps.asp)
'   - create the application object                                
'   - create the report object                                     
'   - open the report                                              
'
'  SETTING A REPORT'S QUERY STRING
'   - access and set the report's SQLQueryString property
'
'  MORE ALWAYS REQUIRED STEPS (contained in MoreRequiredSteps.asp)
'   - retreive the records                                         
'   - create the page engine 
'
'  DISPLAY THE REPORT
'   - display the report using a smart viewer
'==================================================================
%>

<%
' This line creates a string variable called reportname that we will use to pass
' the Crystal Report filename (.rpt file) to the OpenReport method contained in 
' the AlwaysRequiredSteps.asp.

reportname = "Reporting\Crystal\MalingLabelAllDomesticClients.rpt"
%>

<%
'==================================================================
' ALWAYS REQUIRED STEPS
'
' Include the file AlwaysRequiredSteps.asp which contains the code    
' for steps:
'   - create the application object
'   - create the report object
'   - open the report
'==================================================================
%>                                                                     
<!-- #include file="CommonIncludes\AlwaysRequiredSteps.asp" -->                       
<%
'			Logon to DataSources
set mainReportTableCollection = session("oRpt").Database.Tables

For each mnTable in mainReportTableCollection
	with mnTable.connectionproperties
		.Item("User ID") = "User"
		.Item("Password") = "Password"
		.Item("DSN") = "DSN"
		.Item("Database") ="DB1"
	end With
Next

%>
<%
'==================================================================
' SETTING A REPORT'S SQL QUERY STRING
'==================================================================
 
 SelectClause = "SELECT " & """ tblClientAddresses""" & "." & """ClientName""" & ", " & """tblClientAddresses""" & "." & """Location""" & ", " & """tblClientAddresses""" & "." & """Address""" & ", " & """tblClientAddresses""" & "." & """Address2""" & "," & """tblClientAddresses""" & ". " & """City""" & ", " & """tblClientAddresses""" &". " & """ZipCode""" & ", " & """tblRefStates""" & "." & """StateCode""" & ", " & """tblClientAddresses""" & "." & """InternationalAddress""" & ", " & """tblClients""" & ". " & """SpecialCode"""&", " & """tblClients"""& "." & """ClientName""" 
 
 FromClause = "FROM" & "  (" & """PEPNet""" & "." & """dbo""" & "." & """tblClientAddresses"""  & " " & """tblClientAddresses""" & " INNER JOIN " & """PEPNet""" & "." & """dbo""" & "." & """tblClients""" & " " &"""tblClients""" & " ON " & """tblClientAddresses""" & "." & """ClientID""" & "=" & """tblClients""" & "." & """ClientID"""& ") INNER JOIN " & """PEPNet""" & "." & """dbo""" & "." & """tblRefStates""" & " " &  """tblRefStates""" & " ON " &  """tblClientAddresses""" & "." & """StateID""" & "=" & """tblRefStates""" & "." & """StateID"""
 
 WhereClause = "WHERE " &  """tblClients""" & "." & """SpecialCode""" & "=1 AND " & """tblClientAddresses""" & "." & """InternationalAddress""" & "=0 ORDER BY " & """tblClientAddresses""" & "." & """ClientName"""

NewQueryString = SelectClause & FromClause & WhereClause

'These lines of code build the new SQL Query String for the report.



session("oRpt").SQLQueryString = CStr(NewQueryString)

'This line of code sets the SQLQueryString property to the value of 
'the string variable NewQueryString.
%>

<%
'==================================================================
'
'  MORE ALWAYS REQUIRED STEPS
'
'  Include the file MoreRequiredSteps.asp which contains the code
'  for the steps:
'   - retreive the records                                         
'   - create the page engine                                       
'   - create the smart viewer and point it to rptserver.asp
'
'==================================================================
%>
<!-- #include file="CommonIncludes\MoreRequiredSteps.asp" -->
response
<%
' INSTANTIATE THE REPORT VIEWER
'
'When using the Crystal Reports in an ASP environment, we use
'the same page-on-demand Report Viewers used with the Crystal Web Component Server.
'There are six Report Viewers:
'
'1.  Report Viewer for ActiveX
'2.  Report Viewer for Java using Browser JVM
'3.  Report Viewer for Java Using Java Plugin
'
'The Report Viewer that you use will based on the browser's display capablities.
'For Example, you would not want to instantiate one of the Java viewers if the browser
'did not support Java applets.  For purposes on this demo, we have chosen to
'define a viewer.  You can through code determine the support capabilities of
'the requesting browser.  However that functionality is inherent in the Crystal
'Reports RDC and is beyond the scope of this demonstration application.
'
'We have chosen to leverage the server side include functionality of ASP
'for simplicity sake.  So you can use the SmartViewer*.asp files to instantiate
'the smart viewer that you wish to send to the browser.  Simply replace the line
'below with the Smart Viewer asp file you wish to use.
'
'The choices are SmartViewerActiveX.asp, SmartViewerJava.asp and JavaPluginViewer.asp. 
'Note that to use this include you must have the appropriate .asp file in the 
'same virtual directory as the main ASP page.
'

'=============================================================================
'  DISPLAY THE REPORT
'   - display the report using a smart viewer
' 
' Include one of the Smart Viewers.
'  - Report Viewer for ActiveX			        =   SmartViewerActiveX.asp
'  - Report Viewer for Java Using Java Plugin	=   JavaPluginViewer.asp
'=============================================================================
%>
<!-- #include file="CommonIncludes\SmartViewerActiveX.asp" -->

I keep getting this error:

Crystal Reports ActiveX Designer error '80047e48'

Logon failed.

/QA/SimpleSQLQueryString.asp, line 78

If I am using the right user ID and passwords and connecting via the DSN, where is this going wrong?
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top