ASP Crystal Report 2008 (12) Oracle 9 and Visual Basic!

Question

Hi All,
I'm mainting an old application and I need to simulate the same client environment in my machine.
I have a VB application (with COM+ server components) that's creates a report object with parameters. But the only thing that this application does it's call an ASP page that contains all the logic to call a .rpt file, connect to Oracle 9i and then show the crystal report inside a MS webbrowser component (activeX) in the VB form.
I already setup the IIS, and the site there, I put all the .rpt files in the site and if you try to access without calling from VB you can run the asp pages, but the reports still doesn't appears.
These ASP pages should connect to Oracle and then show the rpt file, but I'm facing the following error:
The url that's the application creates is for example this: http://localhost/application1/createreport.asp?sSessionId=2&ReportName=TransactionsProcessed.rpt&parameter1&parameter2... etc etc...
Script Error Number: -21471922153
File could not be opened because the library "P2sora7.dll" cannot be found.
User Error Text: An error has ocurred in CreateReport.asp while logging onto the Oracle database server. Please try again.
I already check the database connection and it is working fine using ODBC, and the application works fine with the database.
The file p2sora.dll is in C:\WINDOWS\SYSTEM32, I already copied from another machine, and I have installed Crystal Report 2008 (12) in my server machine with Windows 2003 server, that's the application and web server where report should be run. I know that the old application was executed with Crystal 7, but I cannot found this version to buy.
Edited by: Don Williams on Mar 21, 2010 9:05 AM

Answer 1

This is the code of the createPage.asp that it's called from VB:
<%
On Error Resume Next
Dim sDLLName
Dim sDatabaseType
Dim sServerName
Dim sUserId
Dim sPassword
Dim arrayInteger
Dim sReportDbName
Dim oTransStore
Dim oReportObject
Dim oCRSections
Dim oCRSection
Dim oCRSubReportObject
Dim oCRReportObjects
Dim oCRReportObject
Dim oCRSubReport
Dim oCRPageEngine
Dim sSessionId, sReportPath, sReportName, sTablename
' Errorhandling Parameters
Dim lUserErrorNumber, sUserErrorText
' -- Get parameters --
sSessionId = Request.QueryString("SessionId")
sReportName = Request.QueryString("ReportName")
sStartDay = Request.QueryString("StartDay")
sStartMonth = Request.QueryString("StartMonth")
sStartYear = Request.QueryString("StartYear")
sEndDay = Request.QueryString("EndDay")
sEndMonth = Request.QueryString("EndMonth")
sEndYear = Request.QueryString("EndYear")
sAccName = Request.QueryString("AccId")
sUserName = Request.QueryString("UserName")
' -- Initialisation --
Session("ImageFolder") = ".\images"
sDatabaseType = Request.QueryString("DbType")
sServerName = Request.QueryString("ServerName")
sUserId = Request.QueryString("DbUserId")
sPassword = Request.QueryString("DbPassword")
sReportPath = Request.QueryString("ReportsFolder")
' -- Select DLL for DB Type
- Hide quoted text -
sDLLName = "P2sora7.dll"
Response.Write "DATABASE SELECCIONADA: " & sDatabaseType
Select Case sDatabaseType
Case "Oracle":
  sDLLName = "P2sora7.dll"
  sReportDbName = ""
        Case "SQLServer":
             sDLLName = "P2ssql.dll"
  sReportDbName = Request.QueryString("ReportsDbName")
        Case "Informix":
             sDLLName = "P2sifmx.dll"
End Select
' -- Set the ErrorNumber to 400 and sErrorText.
sUserErrorText = "An error has occurred in CreateReport.asp while loading the report details. CreateObject(CrystalRuntime.Application) . Please try again."
lUserErrorNumber = 400