Translating Reports from MS Access (ViP Specific)
At 18 FEB 1998 01:01:53PM Ken Wachs wrote:
I have several reports in MS Access which point to our SQL Server data. I would like to translate these reports into ViP.
Can this be done easily?
Any help would be appreciated!
Regards,
Ken Wachs
At 18 FEB 1998 02:46PM Mark Martin wrote:
Ken,
This can be done very easily by using 1 or more ODBC connection(s) to the SQL server from ViP and simply defining a report the way you want.
Mark Martin
Revelation
At 18 FEB 1998 04:54PM Ken Wachs wrote:
Mark:
If I understand you correctly, I must rebuild the entire report in ViP from the ground up (custom fields, formatting, groupings, etc.)
What I would like to know is if ViP can read the MS Access report and create a duplicate report in ViP automatically.
These reports are quite complex, and it would save me many hours if there was an 'import' process.
Regards,
Ken Wachs
At 19 FEB 1998 08:23AM John Averell Revelation wrote:
Access Reports are not imported by ViP. You have to create your own. Consider using something like Crystal report which will go against an Access database (*.mdb). You can modify tables in the database with ViP, then rerun Crystal to generate your report.
At 19 FEB 1998 09:57AM Stephen Bellefontaine Revelation wrote:
Hello Ken,
Many months ago I created a small app that launched Access reports from a ViP application. The code below uses OLE Automation to send an existing report to the printer. It would also be possible to send the report to the screen. In both cases, it may take some tweaking to work for you …
'Declare object variable in declarations section of a module
Dim appAccess As VariantSet appAccess=CreateObject("Access.Application.8")Dim strDB As StringDim strReportName As String' Initialize string to database path.strDB=D:\ViPWork\t-shoot\tshoot.mdb"' Initialize string to Report name.strReportName=Orders"'PrintAccessReport strDB, strReportName' Return reference to Microsoft Access Application object.
'Set appAccess=New Access.Application' Open database in Microsoft Access.appAccess.OpenCurrentDatabase strDB' Print report.appAccess.DoCmd.OpenReport strReportNameMsgBox "Click OK when " & strReportName & _" is finished printing"appAccess.CloseCurrentDatabaseSet appAccess=NothingHope this helps,
ViP/DX Tech Support
At 20 FEB 1998 10:45AM Ken Wachs wrote:
Thanks very much, guys. I am going to try this, and I think it may do what I need.
Regards,
Ken Wachs