Include Custom Property on Title Bar?

[Ken]

Hi.

I've defined a custom database property called Version. It is a text
value. I wanted to know if there is a way to include that value on
the title bar of a form window. Also, is there a way to include it on
the title bar of the database window?

I'm using Access 97.

Thanks for any info!

Ken

[Allen Browne]

Private Sub Form_Open(Cancel As Integer)
Me.Caption = "Put your text here"

DBEngine(0)(0).Properties("AppTitle") = "Put your text here"
Application.RefreshTitleBar
End Sub
--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html

"Ken" <kk****@yahoo.com> wrote in message
news:51**************************@posting.google.c om...

Hi.

I've defined a custom database property called Version. It is a text
value. I wanted to know if there is a way to include that value on
the title bar of a form window. Also, is there a way to include it on
the title bar of the database window?

I'm using Access 97.

Thanks for any info!

Ken

[Ken]

But how would I access a custom database property?

Also, I just noticed that the caption of the application window title
bar can be changed outside of VBA by entering a string in the
Tools/Startup window's "Application Title" data entry box. Is there a
way to access the custom database property from that data entry box so
it would get included in the app window's title bar?

Thanks again!

Ken

"Allen Browne" <ab***************@bigpond.net.au> wrote in message news:<u8********************@news-server.bigpond.net.au>...

Private Sub Form_Open(Cancel As Integer)
Me.Caption = "Put your text here"

DBEngine(0)(0).Properties("AppTitle") = "Put your text here"
Application.RefreshTitleBar
End Sub
--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html

"Ken" <kk****@yahoo.com> wrote in message
news:51**************************@posting.google.c om...

Hi.

I've defined a custom database property called Version. It is a text
value. I wanted to know if there is a way to include that value on
the title bar of a form window. Also, is there a way to include it on
the title bar of the database window?

I'm using Access 97.

Thanks for any info!

Ken

[Allen Browne]

If you did a CreateProperty() to create a property named "Version" on the
current database object, then you should be able to read that property and
assign it to the AppTitle property:

With DBEngine(0)(0)
.Properties("AppTitle") = .Properties("Version")
End With
Application.RefreshTitleBar

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html

"Ken" <kk****@yahoo.com> wrote in message
news:51**************************@posting.google.c om...

But how would I access a custom database property?

Also, I just noticed that the caption of the application window title
bar can be changed outside of VBA by entering a string in the
Tools/Startup window's "Application Title" data entry box. Is there a
way to access the custom database property from that data entry box so
it would get included in the app window's title bar?

Thanks again!

Ken

"Allen Browne" <ab***************@bigpond.net.au> wrote in message

news:<u8********************@news-server.bigpond.net.au>...

Private Sub Form_Open(Cancel As Integer)
Me.Caption = "Put your text here"

DBEngine(0)(0).Properties("AppTitle") = "Put your text here"
Application.RefreshTitleBar
End Sub
--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html

"Ken" <kk****@yahoo.com> wrote in message
news:51**************************@posting.google.c om...

Hi.

I've defined a custom database property called Version. It is a text
value. I wanted to know if there is a way to include that value on
the title bar of a form window. Also, is there a way to include it on
the title bar of the database window?

I'm using Access 97.

Thanks for any info!

Ken