OLE or DDE exchange Word 6 to Access 2

I have a Word 6 online form with text fields and dropdown boxes for input, how do I link the text fields to an Access 2 database table or form by OLE or DDE so a button click exchanges the data automatically?

Background:

Computer Telephony Integration using Windows95 TAPI to 'Screen Pop' a Word 6 script for agents to input data into an online form to exchange, create or update an Access 2 backend database.

Thanks in advance
MattWilliamsAsked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

robandrwCommented:
I suppose this is an answer that you expected to get but I risk stating the obvious. One wonders why you are not using an Access form to input the data. Would save many hassles.

Anyway, you can't use OLE as Word can only act as an OLE Server, not a Client. Which means that you have. There are many examples in the MS-Acces 2.0  and MS-Word help files under search topic  DDE. In the MS-Access help file there is a complete section on using MS-Access as a DDE server.

Thje following piece of code (courtesy the MS Access help file) shows a word basic macro that access a MS-Access data base.

Sub MAIN
' Using the System topic, open the NWIND.MDB database.
' The database must be open before you can use other DDE topics.
      Chan1 = DDEInitiate("MSAccess", "System")
      DDEExecute Chan1, "[OpenDatabase C:\ACCESS\SAMPAPPS\NWIND.MDB]"
' Get all the data from the Customer List query.
      Chan2 = DDEInitiate("MSAccess", "NWIND;QUERY Customer List")
      MyData$ = DDERequest$(Chan2, "All")
      DDETerminate Chan2
' Close the database.
      DDEExecute Chan1, "[CloseDatabase]"
      DDETerminate Chan1
' Insert the data into a text file.
      Open "MYDATA.TXT" For Append As #1
      Print #1, MyData$
      Close #1
End Sub


0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Office

From novice to tech pro — start learning today.