Solved

VB - WinWord, OLE, ActiveX or DDE

Posted on 2002-03-07
11
624 Views
Last Modified: 2013-11-25
How can I open from VB a Word Document, for ex. a Fax Cover and pass data from VB to print using OLE, ActiveX or DDE ?
Thanks in advance
0
Comment
Question by:ehilb
11 Comments
 
LVL 49

Expert Comment

by:Ryan Chong
ID: 6846847
Hi ehilb,

Try this (Word Automation):

Private Sub Command1_Click() 'Print Word Doc
    Dim iWord As Word.Application
    Set iWord = New Word.Application
    iWord.Documents.Open Text1.Text
    iWord.PrintOut
    iWord.Documents(1).Close False
    iWord.Quit
    Set iWord = Nothing
End Sub

Hope this help
0
 
LVL 14

Expert Comment

by:puranik_p
ID: 6847011
For this to work, you have to add a reference to Word library.
0
 
LVL 12

Expert Comment

by:Alfredo Luis Torres Serrano
ID: 6848203
Are you triying to open an existing document or create a new one?

Is thsi document using any kind of text from VB?

0
 

Author Comment

by:ehilb
ID: 6849849
Hi ryancys,

thanks, it runs, but how can I pass the data from vb into the corresp. textmarks in my FaxCover ?

ehilb

0
 
LVL 49

Expert Comment

by:Ryan Chong
ID: 6849861
Hi ehilb,

I think it's depends on your Fax Application you used. FaxCover may integrates with the M$ Word, check the user manual or any useful references to see whether FaxCover support word integration or not.

Anyway, i use the Symantec Winfax Pro before and it's able to print word documents to fax.

if feel free, you can suft at: http://www.symantec.com/winfax/

and FYI, i tried to use the M$ Word Mail Merge Documents and Integrate with Winfax Pro before but i haven't success in that way.

regards
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 

Author Comment

by:ehilb
ID: 6849909
Hi ryancys,
my FaxCover.doc is a normal .doc, where I have some Textmarks in it, for example FaxNo., Ref.:, & s.o.
I try with this code, but it doesn't work:
...
...
    InsertText "ToName", Text1.Text
    InsertText "ToFaxNum", Text2.Text
    InsertText "ToPhoneNum", Text3.Text
...
Public Sub InsertText(ByVal Position As String, ByVal Text As String)
With Form1
    ' Position the insertion point in Word
    .lblDDE.LinkExecute "[EditGoto .Destination = " & Chr$(34) & Position & Chr$(34) & "]"
    ' Insert the Text
    .lblDDE.LinkExecute "[Insert " & Chr$(34) & Text & Chr$(34) & "]"
End With
End Sub
....
I get the Runtime error 285. Word can't execute the DDE-Methode.

regards
ehilb

0
 
LVL 49

Expert Comment

by:Ryan Chong
ID: 6849929
Hi,

Not very clear, and i never use DDE method before, so what you want to do is pass the Data (example Form1.Text1.Text) to a Word Doc?
0
 

Author Comment

by:ehilb
ID: 6849979
yes, and to an exact position, where the corresp. textmark in Word is definied.
0
 
LVL 49

Expert Comment

by:Ryan Chong
ID: 6850009
Hi,

Can you send me the Word Doc template as well as what have you done so far? I want to take a look its structure.

And may reply after this weekend. You can get my email at my profile.

Another question: Are you connect to a Database or just want to insert free text in certain area in Word Doc?

regards,
ryancys
0
 
LVL 49

Accepted Solution

by:
Ryan Chong earned 100 total points
ID: 6850058
Well, find an example here:

Use Microsoft Word as a Reporting Tool from Visual Basic:
http://www.freevbcode.com/ShowCode.Asp?ID=2562

Follow the Manual included.

Hope this help.
0
 

Author Comment

by:ehilb
ID: 6850187
I thank you very much !
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Have you ever wanted to restrict the users input in a textbox to numbers, and while doing that make sure that they can't 'cheat' by pasting in non-numeric text? Of course you can do that with code you write yourself but it's tedious and error-prone …
Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
This is Part 3 in a 3-part series on Experts Exchange to discuss error handling in VBA code written for Excel. Part 1 of this series discussed basic error handling code using VBA. http://www.experts-exchange.com/videos/1478/Excel-Error-Handlin…

895 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now