I am using following code to view preview of a report built in MS Access, but it just displays an hourglass pointer and nothing happens. What's the problem?
Code:Dim appAccess As Access.Application Set appAccess = New Access.Application appAccess.OpenCurrentDatabase App.Path & "\data\eticketxp.mdb", True, "Devel0peR" 'appAccess.DoCmd.OpenReport "TestReport", acPreview, , "myOptionalCondition" appAccess.DoCmd.OpenReport "TestReport", acPreview, , "myOptionalCondition" 'appAccess.DoCmd.OpenForm "Addresses", acPreview appAccess.Quit Set appAccess = Nothing


Reply With Quote