Icon Flaw in access

T

Tom

Hello everyone,

I have created an application icon for my db but when I
package it up I find the destination machine always seems
to get the icon wrong.

The icon is always installed in the directory next to the
main db file.

CurrentProject.path

can I use this to set the path in code to get around this
flaw in access packaging?

Thanks

Tom
 
P

Paul Overway

It gets it wrong because you haven't told Access where to find it. You need
to run code while your app is starting...

Dim db as database

Set db = currentdb()
db.Properties("AppIcon") = CurrentProject.Path & "\someicon.ico"
Application.RefreshTitleBar

You could also use SetOption.
 
Top