Clear AppTitle Property in Startup Options (A2k Sr1)

Topic

New Reply

Can the “AppTitle” property be reset to Nothing using VBA?

Sample code that won’t work:

Function SetandClearAppTitle()

Dim Dbs As Object

Set Dbs = CurrentDb.Properties

Dbs(“AppTitle”).Value = “MyApplication”

Debug.Print Dbs(“AppTitle”).Value

Dbs(“AppTitle”).Value = Nothing ‘ *** Has no effect

Debug.Print Dbs(“AppTitle”).Value

End Function

Thanks

Reply | Quote

Replies

Try using a single space…. ” ”

Reply | Quote

Ordinarily, you reset the Apptitle to the default “Microsoft Access” rather than nothing.

Reply | Quote

I’ve successfully changed the AppTitle to a single space but that is not the best solution. Is there a way to remove the AppTitle property from the database’s collection so that it reverts to the default?

Reply | Quote

The default is “Microsoft Access”. If that’s what you’re trying to change it back to, just set the AppTitle to that string. Or were you trying to set it to something else?

Reply | Quote

Charlotte,

I found that I cannot force the AppTitle back to it’s original value any other way than setting it to “Microsoft Access” Ref A2k Dev Handbook Vol 1 Pg 1453. The warning at the top of the page.

I guess this is what you have been trying to tell me all along. I just needed to know that there is no way to remove it completely (with VBA) like the Access User interface does in the Startup dialog box.

Thanks

Reply | Quote

Actually, I think you’re misinterpreting the startup dialog. The reason AppTitle is null there is because you haven’t given it anything different to use. In that case, it defaults to “Microsoft Access”, which is the built-in app title.

Reply | Quote

Thanks

I got the picture. The only thing I’m missing then is the Built-in AppIcon value. Would you happen to know what it is or can you point me to the reference?

Reply | Quote

As far as I know, the built-in icon is whatever is in the Msaccess.exe file.

Reply | Quote

I was afraid of that. Well, Mark J’s solution of setting a single space seems to work with no detrimental effects so far.

Thanks for all your help

Maybe I should open the actual dialog boxes using
DoCmd.RunCommand acCmdStartupProperties
Wish me luck with opening the dialog on a remote database.

Reply | Quote

May the Lounge be with you!

Reply | Quote

What I’m trying to accomplish is to completely remove any text in the Tools==>Startup AppTitle box, like it is on a new database. The same would apply if there was an AppIcon set and I wanted to reset it to nothing or I wanted to clear all the summary info on the File==>Database Properties ==>Summary Tab.

On a New database these properties do Not exist in the collections until they are set. This is why I’m thinking that I need to remove or delete the property from the collection to clear it.

I’m probably wrong, that’s why I’m asking the pros.

Reply | Quote