Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

sage 2020 Vb6 custom Development reference

Status
Not open for further replies.

Fijianrunner

Programmer
Apr 13, 2023
1
0
0
FJ
hi there

I m quite to new to this sage integration development, and i seek some assistance
I have loaded Sage 2020 and vb6 on win 11, both work fine, however, i m having difficulty transferring a macro code to vb6 app
basically, I m trying to create an auto-emailing interface that would send out open invoices to customers on a monthly basis
I have recorded the macro and ran it after recording- it works fine
now I m trying to transfer that code to vb6 form - and I keep hitting error- I know it is a reference related but i can't seem to find the correct reference
attached is an image of my reference, is there any particular folder i need go to to add these references
i really need help and thank you
code

On Error GoTo ACCPACErrorHandler

' TODO: To increase efficiency, comment out any unused DB links.
Dim mDBLinkCmpRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkCmpRW = OpenDBLink(DBLINK_COMPANY, DBLINK_FLG_READWRITE)

Dim mDBLinkSysRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkSysRW = OpenDBLink(DBLINK_SYSTEM, DBLINK_FLG_READWRITE)

Dim temp As Boolean
Dim ARPRTUPDT1 As AccpacCOMAPI.AccpacView
Dim ARPRTUPDT1Fields As AccpacCOMAPI.AccpacViewFields
mDBLinkCmpRW.OpenView "AR0076", ARPRTUPDT1
Set ARPRTUPDT1Fields = ARPRTUPDT1.Fields


Dim rpt As AccpacCOMAPI.AccpacReport
Capture_hhefft.png

Set rpt = ReportSelect("ARDINVO[ARDINVO.RPT]", " ", " ")
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top