Embedding Icons instead of paths

[stevenb82]

I have searched the forum for threads on icons and haven't found one that relates to what I'm about to ask.

I have an access icon (*.ico) file associated with my DB. But when I try to access the database from a place other than my desktop where the icon is located the icon doesn't show up. Is there any way to embed the icon into the application so that when the database is loaded on a different machine the icon loads too..

 

[Estuardo]

G'd morning Steven,
The easy way is to distribute your db with your icon. Another way is to store your icon in a table extract it to any given dir and the set it as your app. icon.

To set the app icon from code something like this will do it:

Private sub SetAppIcon()
Dim db As Database
Set db = CurrentDb

db.Properties("AppIcon").Value = Application.CurrentProject.Path & "\your.ico"
End sub

G'd Luck

 

[NigelShaw]

Hi

You can also embed images / icons as binary if it you need to store a range of icons. These are stored into a table with vba.

Pretty sure you can find something on lebans site


N