I am new to CE programing (and programing in general) and I am getting an error I can't work through. I can create the session object as well as logon, but when I try to create the InfoStore it get an "Object Required" error. I am running the page as ASP and I have checked the code against an ASP code example and it seems ok. I have pasted my code below, and the error comes at the line:
Set IStore = Sess.Service ("", "InfoStore"
dim APS
dim username
dim password
dim auth
dim SessionManager
dim IStore
dim LogonTokenMgr
dim Sess
APS = Request.Form ("APSName"
username = Request.Form ("username"
password = Request.Form ("password"
auth = Request.Form ("authentication"
Response.Write (APS & ", " & username & ", " & password & ", " & auth)
Set SessionManager = Server.CreateObject ("CrystalEnterprise.SessionMgr"
if err.number <> 0 then
Response.Write (err.Description)
Response.End
end if
Set Sess = SessionManager.Logon(username, password, APS, Auth)
if err.number <> 0 then
Response.Write (err.Description)
Response.End
else
' Response.Write "<br>Session manager successfull"
'Create the InfoStore object.
Set IStore = Sess.Service ("", "InfoStore"
'Store the InfoStore object in the session.
Session("IStore" = IStore
end if
Set SessionManager = nothing
Chris
DFW Crystal User Group
Set IStore = Sess.Service ("", "InfoStore"
dim APS
dim username
dim password
dim auth
dim SessionManager
dim IStore
dim LogonTokenMgr
dim Sess
APS = Request.Form ("APSName"
username = Request.Form ("username"
password = Request.Form ("password"
auth = Request.Form ("authentication"
Response.Write (APS & ", " & username & ", " & password & ", " & auth)
Set SessionManager = Server.CreateObject ("CrystalEnterprise.SessionMgr"
if err.number <> 0 then
Response.Write (err.Description)
Response.End
end if
Set Sess = SessionManager.Logon(username, password, APS, Auth)
if err.number <> 0 then
Response.Write (err.Description)
Response.End
else
' Response.Write "<br>Session manager successfull"
'Create the InfoStore object.
Set IStore = Sess.Service ("", "InfoStore"
'Store the InfoStore object in the session.
Session("IStore" = IStore
end if
Set SessionManager = nothing
Chris
DFW Crystal User Group