Image Filters

message from =?Utf-8?B?RiBEYW5pZWxz?= on 13 May 2004

I have a form from which users can select their company logo which is then displayed on a subform on all forms.

Dim fileName As String
Dim result As Integer
With Application.FileDialog(msoFileDialogFilePicker)
.Title = "Select Staff Picture"
.Filters.Add "All Files", "*.*"
.Filters.Add "Images", "*.gif; *.jpg; *.jpeg", 1
.FilterIndex = 1
.AllowMultiSelect = False
.InitialFileName = "\my documents\my pictures"
result = .Show
If (result <> 0) Then
fileName = Trim(.SelectedItems.Item(1))
Me![IMAGEPATH].Visible = True
Me![IMAGEPATH].SetFocus
Me![IMAGEPATH].Text = fileName
Me![CompanyName].SetFocus
Me![IMAGEPATH].Visible = False
End If
End With

This works well on the devlopment PC (XP) and some others, but on certain other PC's (suing W2000 and XP) selecting an imagetype other than .bmp
(specifically jpg & Gif) displays an error that the filters are not installed or the file is too large (which it isnt).

I would guess the filters are missing for these filetypes, is there any way of including them in the packaged databse?

Thanks.

Stephen Lebans replied to =?Utf-8?B?RiBEYW5pZWxz?= on 16 May 2004

If the destination PC's do not have any of the major MS Office apps
installed and your distribution is a Runtime package then JPG files are
not suported. Further, the MS Office Graphics Filter DLL's are not
redistributable by themselves so cannot be included when you build your
distribution.

An alternative solution is here:
http://www.lebans.com/loadjpeggif.htm
A97LoadJpegGif.zip is a database containing a function to allow for the
Display of Jpeg and Gif files on systems that do not have the Office
Graphic Filters installed. Here is the A2K version: A2KLoadJpegGif.zip

NEW - April 05 2003 Ver 5.0 Developed to allow Access RunTime
installations to display Jpeg files in a standard Image Control.
Provides functionality to load JPG,GIF,BMP,EMF,WMF,CUR and ICO files on
systems without the Office Graphics Filters loaded.
Originally developed for Systems with Access Runtime only. Supports
transparency in Transparent Gifs. Allows you to resize Images on
Forms/Reports at runtime with no loss of Image quality.

Archived message: Image Filters (MS Access Forms)