Previewing thumbnail

[Anonymous]

I am trying to find which control to place on a form to enable a thumbnail
preview of any inventor parts simalar to the file open box provides, any
help would be appreciated.

Wayne

[Anonymous]

Hi Wayne

This is from a post of Patrick in the support ng

Microsoft has a document about the preview picture and all the properties in any
document, you will find a VB example and a free dll to show the thumbnail and
properties.

http://support.microsoft.com/support/kb/articles/Q224/3/51.asp

--
Kent Keller
http://kwik-mcad.scriptmania.com/

"Wayne" wrote in message
news:EB6E59F28D2309F54D5292E17A0B7540@in.WebX.maYIadrTaRb...
> I am trying to find which control to place on a form to enable a thumbnail
> preview of any inventor parts simalar to the file open box provides, any
> help would be appreciated.
>
> Wayne
>
>

[Anonymous]

I tried this and it is nice. But now I would like to show the thumbnail in MS-Access. The regular Access-picture object does not accept the thumbnail, but only filenames. Do You happen to know, which object I could use in MS-Access?

[Anonymous]

Marco

I have absolutely no experience in MS-Access, but I would guess it is the same as
Excell. In Excell I have added a image control to a sheet, and then do something
like this.

Private oFilePropReader As DSOleFile.PropertyReader
Private oDocProp As DSOleFile.DocumentProperties

Private Sub Worksheet_Activate()

Set oFilePropReader = New DSOleFile.PropertyReader
Set oDocProp = oFilePropReader.GetDocumentProperties("D:\Inventor\Feature
Suppression Test Part.ipt")
Me.Image1.Picture = oDocProp.Thumbnail

End Sub



--
Kent Keller
http://kwikmcad.topcities.com/

"Marco" wrote in message news:f09603b.1@WebX.maYIadrTaRb...
> I tried this and it is nice. But now I would like to show the thumbnail in
MS-Access. The regular Access-picture object does not accept the thumbnail, but only
filenames. Do You happen to know, which object I could use in MS-Access?
>

[Anonymous]

I tried cutting a pasting but I got an error about user defined type not
defined. To make this work what references do you need? Thanks this should
be interesting.


"Kent Keller" wrote in message
news:71CD06E17C36870329C0C88520F3E8B5@in.WebX.maYIadrTaRb...
> Marco
>
> I have absolutely no experience in MS-Access, but I would guess it is the
same as
> Excell. In Excell I have added a image control to a sheet, and then do
something
> like this.
>
> Private oFilePropReader As DSOleFile.PropertyReader
> Private oDocProp As DSOleFile.DocumentProperties
>
> Private Sub Worksheet_Activate()
>
> Set oFilePropReader = New DSOleFile.PropertyReader
> Set oDocProp = oFilePropReader.GetDocumentProperties("D:\Inventor\Feature
> Suppression Test Part.ipt")
> Me.Image1.Picture = oDocProp.Thumbnail
>
> End Sub
>
>
>
> --
> Kent Keller
> http://kwikmcad.topcities.com/
>
> "Marco" wrote in message
news:f09603b.1@WebX.maYIadrTaRb...
> > I tried this and it is nice. But now I would like to show the thumbnail
in
> MS-Access. The regular Access-picture object does not accept the
thumbnail, but only
> filenames. Do You happen to know, which object I could use in MS-Access?
> >
>
>

[Anonymous]

Did you download the dll from here?
http://support.microsoft.com/support/kb/articles/Q224/3/51.asp

In the references window you need to have DS: OLE Document Properties 1.4 Object
Library checked
--
Kent Keller
http://kwikmcad.topcities.com/

"Kathy Johnson" wrote in message
news:C6BD8568BF2109FBD465A0232076AAD7@in.WebX.maYIadrTaRb...
> I tried cutting a pasting but I got an error about user defined type not
> defined. To make this work what references do you need? Thanks this should
> be interesting.

[Anonymous]

No I had read the original quite I while ago. Thank you for pointing it
out.

Kathy Johsnon
"Kent Keller" wrote in message
news:3CA840A254F5415CEAE43588D91B8B63@in.WebX.maYIadrTaRb...
> Did you download the dll from here?
> http://support.microsoft.com/support/kb/articles/Q224/3/51.asp
>
> In the references window you need to have DS: OLE Document Properties 1.4
Object
> Library checked
> --
> Kent Keller
> http://kwikmcad.topcities.com/
>
> "Kathy Johnson" wrote in message
> news:C6BD8568BF2109FBD465A0232076AAD7@in.WebX.maYIadrTaRb...
> > I tried cutting a pasting but I got an error about user defined type not
> > defined. To make this work what references do you need? Thanks this
should
> > be interesting.
>
>
>