Error Occurred creating Report Object: ActiveX component can't create objec

Question

Hello!
I have an error "Error Occurred creating Report Object: ActiveX component can't create object" when open asp-file in IE. Please, help me! What Java-components I need install? What else?
Server side: Windows 2003 SP2, IIS6, Crystal Reports Server XI
Client side: Windows XP SP3, IE 7.0

Answer 1

<%@ LANGUAGE="VBSCRIPT" %>
<%
ServerName="app4-odusb-bur"     
DatabaseName="CKReports"
WorkLogin="***"          
WorkPWD="***"
reportname = "SV3in1_p1.rpt"
If Not IsObject (session("oApp")) Then                             
Set session("oApp") = Server.CreateObject("CrystalRuntime.Application.11")
End If                                                               
Path = Request.ServerVariables("PATH_TRANSLATED")                    
While (Right(Path, 1) <> "\" And Len(Path) <> 0)                     
iLen = Len(Path) - 1                                                 
Path = Left(Path, iLen)                                              
Wend                                                                               
If IsObject(session("oRpt")) then
     Set session("oRpt") = nothing
End if                                                   
On error resume next
rYear = Request.Form("rYear")
rDay = Request.Form("rDay")
rMonth = Request.Form("rMonth")
sDay = CStr(rDay)
if CInt(rDay)<10 then sDay="0"+SDay
sMonth = CStr(rMonth)
if CInt(rMonth)<10 then sMonth="0"+sMonth
sYear = CStr(rYear)
Set obj = CreateObject("ReportServer.Collector") 'HERE an ERROR was occurred, so I have closed any other operators after this one, except Error Message Operators
'obj.ConnectToDatabase1 ServerName, DatabaseName, WorkLogin, WorkPWD
'obj.Disconnect
'Set session("oRpt") = session("oApp").OpenReport(path & reportname, 1)
'Session("oRpt").Database.LogOnServer "p2ssql.dll", CStr(ServerName), CStr(DatabaseName), CStr(WorkLogin), CStr(WorkPWD)
'For n = 1 to Session("oRpt").Database.Tables.Count
'    Session("oRpt").Database.Tables.Item(n).SetLogonInfo CStr(ServerName), CStr(DatabaseName), CStr(WorkLogin), CStr(WorkPWD)
'Next
If Err.Number <> 0 Then
  Response.Write "Error Occurred creating Report Object: " & Err.Description
  Set Session("oRpt") = nothing
  Set Session("oApp") = nothing
  Session.Abandon
  Response.End
End If
%>