Toolbar problem

S

SHIPP

Access 97. I have a master database. From this database I create 67 unique
databases to be sent around the world for people to update certain data.
Because I am programmatically creating these databases I have limited the
toolbar using the following code.

intx = AddAppProperty("AppTitle", dbText, "HRP Database", strFull)
intx = AddAppProperty("AllowBreakIntoCode", dbBoolean, False, strFull)
intx = AddAppProperty("StartupShowStatusBar", dbBoolean, False, strFull)
intx = AddAppProperty("AllowSpecialKeys", dbBoolean, False, strFull)
intx = AddAppProperty("StartUpShowDBWindow", dbBoolean, False, strFull)
intx = AddAppProperty("AllowFullMenus", dbBoolean, False, strFull)
intx = AddAppProperty("AllowShortcutMenus", dbBoolean, False, strFull)
intx = AddAppProperty("AllowToolbarChanges", dbBoolean, False, strFull)
intx = AddAppProperty("AllowBuiltInToolbars", dbBoolean, False, strFull)

This code gets rid of all the options that I don't want the users to have
available to them. Now I would like to add 2 options to the toolbar that is
left after the above code executes. I tried creating a custom toolbar but I
don't know how to attach it to the individual databases. The name of the bar
is HRP Reports. Can someone please tell me how to send this custom toolbar
with the individual mdb's I create. Thanks in advance.
 

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