[AccessD] I grow old, I grow old, I shall wear the bottoms of my trousers rolled

On the Tools Startup screen you will see a textbox labeled "Application Title". That determines what shows up in the title bar.

You can set a database property that automatically becomes the title. The property name is "appTitle" (which you will find in the VBA help file), and you can set it in code with something like this...

Sub SetAppName(vName As Variant)
Dim prpNew As Property
Dim db As DAO.Database
    On Error GoTo SetAppName_err
    Set db = CurrentDb
    DoCmd.SelectObject acTable, , True
    CurrentDb.Properties("appTitle") = vName
    Debug.Print "Application Name: "; CurrentDb.Properties("appTitle")
    Exit Sub
SetAppName_err:
    Select Case Err.Number
    Case 3270
        Set db = CurrentDb
        Set prpNew = db.CreateProperty("appTitle", dbText, vName)
        db.Properties.Append prpNew
        Resume
    Case Else
        MsgBox "Error " & Err.Number & vbCrLf & Err.Description
    End Select

End Sub


So you could append your version number to vName

-----Original Message-----
From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller
Sent: Tuesday, February 07, 2012 11:54 AM
To: Access Developers discussion and problem solving
Subject: [AccessD] I grow old, I grow old, I shall wear the bottoms of my trousers rolled

It's been ages since I've used Access 2003, but for the moment I must, and I can no longer remember where the property is on the FE and the BE that causes the window title to read "Version 1.2.1", or whatever. I need to update this and I can't find it!

--
Arthur
Cell: 647.710.1314

The most likely way for the world to be destroyed, most experts agree, is by accident. That's where we come in; we're computer professionals. We cause accidents.

-Nathaniel Borenstein<http://www.quoteland.com/author/Nathaniel-Borenstein-Quotes/63/>
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com