I have a vb6 form where I want an embedded ole Word97 document. The document
is saved in an access db where other fields on the form are in also. It's
easy to bind the control to the daodata control. But I want to do that in
code. So I can decide in code if the user can update the datebase.
Another thing is how it looks.
When I choose clipmode, The olecontrol window is in pagepreview mode but
with the page strting 10centimeters from left. So I miss the right part of
the page. When I go lower than 74% zoom the page centers in the window.
Above that it goes to the right.
When I chose autosize the behaviour is totally strange, A few clicks in the
document, and the pagewith is zoomed also. Don't want that!!
Instead of the olecontainer,I also can insert a word object in the page, but
how do I get the doument from the database recordin the word document? NOt
much properties there.
Has someone some code to share about this? Most thing I can get done with VB
but I'm stuck on this one.
Here is the code I open it with
Private Sub BtnOpenDraaiboek_Click()
If OLE1.AppIsRunning = True Then
OLE1.Close
End If
OLE1.DoVerb -4
If OLE1.AppIsRunning = True Then
OLE1.object.activewindow.View.Zoom.percentage = 74
OLE1.object.activewindow.displayverticalscrollbar = True
OLE1.object.activewindow.displayhorizontalscrollbar = True
OLE1.object.activewindow.activepane.View.Zoom.pagefit = wdPageFitBestFit
End If
Regards, Paul Minnaert
