Application Title changes automatically

[skk]

I'm not sure which group to post this question but is there an easy way where
you can copy the x.mdb file to different file name and the "Application
Title" automatically changes to that file name? Thanks!

 

[mroswell]

I'm not sure which group to post this question but is there an easy way where
you can copy the x.mdb file to different file name and the "Application
Title" automatically changes to that file name? Thanks!

If anyone discovers this, please post it here. Thanks. (or any way to
see what file you're working in...)

 

[John Spencer]

You need to put the following in a startup routine for your database.
Either call a procedure from an AutoExec macro or from a form that loads
on start up. The following should work for Access 2000 to 2003 databases.


Public Function fSetApplicationTitle()
'Access 2000 to 2003
Dim strName as string
Dim strNew as string

StrName = CurrentDb().Properties("AppTitle")
StrNew = CurrentProject.Name
StrNew = Left(StrNew, Len(StrNew)-4) 'Strip of extension

If StrName <> StrNew Then
Currentdb().Properties("AppTitle")=StrNew
End If