OLE Icon

D

Dhonan

I am trying to get the MS Word ICon to show on an OLE object that I am
creating in VB. Here is my code:
[case notes].Visible = True
[case notes].Class = "Word.document" ' Set class name.
[case notes].OLETypeAllowed = acOLEEmbedded
[case notes].DisplayType = True
[case notes].SourceDoc = Application.CurrentProject.Path &
"\CaseNotesTemplate.doc"
[case notes].Action = acOLECreateEmbed
[case notes].SizeMode = acOLESizeZoom

It just shows a blank area with the text "Word Document" in it.

However, when I create using Access Insert Object (by right clicking on the
field), it puts the Word Icon into the field. Is there a way to do this in
VB?

Can you help?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top