Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community

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 Variant
Set appAccess=CreateObject("Access.Application.8")
Dim strDB As String
Dim 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 strReportName
MsgBox "Click OK when " & strReportName & _
	" is finished printing"
appAccess.CloseCurrentDatabase
Set appAccess=Nothing 

Hope 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

View this thread on the forum...

  • third_party_content/community/commentary/forums_nonworks/00e3ed5fe4259620852565af00630cda.txt
  • Last modified: 2023/12/28 07:40
  • by 127.0.0.1