SetLogOnInfo ( Resolved )

I am using the following function to set the datapath of the tables used in a crystal report at runtime.

access is being used as the database

the SetLogOnInfo statement is not working.





Set rep_application = Nothing
Set rep_application = New CRAXDRT.Application


Dim rep As New CRAXDRT.Report

Set rep = rep_application.OpenReport(App.Path & "\reports\" & RepName, crOpenReportByTempCopy)

rep.VerifyOnEveryPrint = True


Dim DataPath As String

DataPath = "c:\myapp\database\"

dim password as string

password="mypassword"


Dim counter As Integer
Dim str_DataFile As String

Dim DataFiles As New CRAXDRT.DatabaseTables

Set DataFiles = rep.Database.Tables


For counter = 1 To DataFiles.count

str_DataFile = returnFileName(DataFiles(counter).Location) '' this returnFileName function returns the filename from the fullpath


DataFiles(counter).SetLogOnInfo "msaccess", DataPath & str_DataFile, , password

Next


SmartViewer.ReportSource = rep

SmartViewer.ViewReport

What is the error?

No error is generated .

it does not sets The database new location .

it remains the default ( as set in crystal reports reprot creater )

Try passing a ADO recordset to the reportsource. This always works for me.

VB Code:

'oRs is an adodb.recordset
'oReport is a open cr report object
oReport.Database.SetDataSource oRs, 3, 1
crvViewer.ReportSource = oReport
crvViewer.ViewReport

Still Not Working !


Actually i am working on tables collection of database object of OReport

so it goes like this .

OReport.Database.Tables(1).SetDataSource oRs,3

I don't know what this datatag is ?


after the statement , if location property is verified , it gives the old path.

OReport.Database.Tables(1).location

so setdatasource statement seems to have no affect

Can Any One Help !

Have you got this solved yet?

I may have the answer.

FW

No I haven't .

The problem I had was that when I built the report I set it up to read Access. The default for this situation is that the report is set up to use a DAO recordset. When I tried to pass it an ADO recordset, it didn't work. What I did to fix is was to delete the original reference to the Access database, ands add it again using ADO.

To do this I right clicked on the database node in the pane to the left and clicked on Add database. I then chose the Use SQL button. This enabled me to set the report to use an ADO recordset. Then when I used SetDataSource and set it to and ADO recordset the problem was solved.

Hope this Helps

FW

Yes that solved the problem .

Thanks a Lot.

in case of "data file" option which i was using till now

i was able to choose multiple tables in one go from a database

But in case i am using (SQl/odbc)-->ADO , i am not able to do that .

it asks for alias every time i want to add some differnt table from the database . I am a little confused !

Glad to help. This all seems to be a fairly poorly understood. I had real trouble getting info from the forums too. I think we would all appreciated you updating this thread if you do sort out the last bit of the puzzle that's confusing you.

FW