i just want to know how to open crystal report if msaccess database have password? in my form i use Crviewer.
kindly help.

Private Sub Form_Initialize()

Call OpenCrystalReport

End Sub



Private Sub OpenCrystalReport()
    
    Dim CRReport2 As CRAXDRT.Report
    Dim CRApp2 As New CRAXDRT.Application
  
    Set CRReport2 = CRApp2.OpenReport(App.Path & "\Attendance.rpt")
    
    With CRReport2
        'Set the Access database path
        .Database.Tables(1).Location = App.Path & "\Mygradingsys.mdb"

    End With

    With CRViewAtt
        .ReportSource = CRReport2
        .ViewReport
        While .IsBusy
            DoEvents
        Wend
        .Visible = False
        .Refresh
    End With
    
    
    Set CRApp2 = Nothing
    Set CRReport2 = Nothing

End Sub

I uses crystal for my reports, but i don't actually get the data needed to the backend dabase... try making a temporary database (mdb) for that matter... when you execute query save the data to the temporary database....

Dim mytable As New ADODB.Recordset
temp As New ADODB.Connection

mytable.open "select * from [tablename] where [field] = [expression]" [connection],  adOpenStatic, adLockReadOnly
if mytable.recordcount <> 0 then
         do until mytable.eof
             'execute query here....
         Temp.execute "INSERT INTO [tablename] (field1, field2, field3) values ([FieldFrom myTable])
              

         mytable.movenext
         loop
endif
table.close
set table = nothing


Hope this help.....