Stuart McLachlan
stuart at lexacorp.com.pg
Mon Dec 8 08:42:22 CST 2008
Version is a built in function.
Select Case Int(Version)
Case 12
MsgBox "Access 2007"
Case 11
MsgBox "Access 2003"
Case Else
MsgBox "Some other version"
End Select
On 8 Dec 2008 at 6:31, Rocky Smolin at Beach Access Software wrote:
> Well, poop. Now it's working. Don't know what I did wrong the first time.
>
>
> But I'm thinking now that minimizing the ribbon would be better than
> disappearing it. Which is easy to do with sendkeys The only problem is
> that in 2003 Ctrl-F1 has a different effect (shows the Getting Started
> window). Is there a property or method you can use to know which version of
> Access you're using? If I knew what version I would know whether to issue
> the sendkeys or not.
>
> Regards,
>
>
> Rocky Smolin
> Beach Access Software
> 858-259-4334
> www.e-z-mrp.com
> www.bchacc.com
>
>
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid
> Sent: Monday, December 08, 2008 6:16 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Turn off the ribbons programmatically
>
> Rocky
>
> I just added two butons to a form
>
> DoCmd.ShowToolbar "Ribbon", acToolbarYes DoCmd.ShowToolbar "Ribbon",
> acToolbarNo
>
> Worked fine?
>
> Martin
>
>
> Martin WP Reid
> Information Services
> Queen's University
> Riddel Hall
> 185 Stranmillis Road
> Belfast
> BT9 5EE
> Tel : 02890974465
> Email : mwp.reid at qub.ac.uk
> ________________________________________
> From: accessd-bounces at databaseadvisors.com
> [accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach
> Access Software [rockysmolin at bchacc.com]
> Sent: 08 December 2008 13:42
> To: 'Access Developers discussion and problem solving'
> Subject: Re: [AccessD] Turn off the ribbons programmatically
>
> Martin:
>
> DoCmd.ShowToolbar "Ribbon", acToolbarNo works but then I can't restore it.
> So I can't get back to the design view.
>
> I tried putting DoCmd.ShowToolbar "Ribbon", acToolbarYes into a click
> command but it didn't turn the ribbon back on. Is there a keyboard shortcut
> to restore the ribbon after DoCmd.ShowToolbar "Ribbon", acToolbarNo?
>
> TIA
>
>
> Rocky Smolin
> Beach Access Software
> 858-259-4334
> www.e-z-mrp.com
> www.bchacc.com
>
>
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid
> Sent: Wednesday, December 03, 2008 11:44 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Turn off the ribbons programmatically
>
> Rocky
>
> Have a look at this
>
> http://social.msdn.microsoft.com/Forums/en-US/vsto/thread/a265e083-b0a5-4a84
> -a855-fd7c6f510d03/
>
> The idea is to minimize the ribbon to reclaim the screen space.
>
> Try
>
> DoCmd.ShowToolbar "Ribbon", acToolbarNo
>
>
>
> Martin
>
>
>
> Martin WP Reid
> Information Services
> Queen's University
> Riddel Hall
> 185 Stranmillis Road
> Belfast
> BT9 5EE
> Tel : 02890974465
> Email : mwp.reid at qub.ac.uk
> ________________________________________
> From: accessd-bounces at databaseadvisors.com
> [accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach
> Access Software [rockysmolin at bchacc.com]
> Sent: 03 December 2008 18:40
> To: 'Access Developers discussion and problem solving'
> Subject: Re: [AccessD] Turn off the ribbons programmatically
>
> Thanks. I'll give it a try.
>
>
>
>
> Rocky Smolin
> Beach Access Software
> 858-259-4334
> www.e-z-mrp.com
> www.bchacc.com
>
>
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman
> Sent: Wednesday, December 03, 2008 10:32 AM
> To: 'Access Developers discussion and problem solving'
> Subject: Re: [AccessD] Turn off the ribbons programmatically
>
> Rocky,
>
> Here are some instructions I found (not sure where) for turning off the
> ribbion. I believe I posted them once before and someone said they didn't
> work, but you might want to give it a try anyway.
>
> HTH,
> Jim.
>
> # re: Customizing the New Access UI
> Friday, July 14, 2006 6:15 PM by clintc For those of you who want to
> completely get rid of the ribbon--here are the
> steps:
>
> 1. Create a new table called USysRibbons.
> 2. Add two fields RibbonName (text) and RibbonXML (Memo).
> 3. Create a new record with the name "Blank" (doesn't really matter what you
> call it). Also add the following XML:
> <CustomUI
> xmlns="http://schemas.microsoft.com/office/2006/01/CustomUI"><Ribbon
> startFromScratch="true"/></CustomUI>
> 4. Restart your database.
> 5. Go into the Office Button | Access Options. Click on the Current
> Database.
> 6. In the Toolbars Option set the Custom Ribbon Id to Blank (name in step
> 3).
> 7. Restart the database.
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at
> Beach Access Software
> Sent: Wednesday, December 03, 2008 11:51 AM
> To: 'Access Developers discussion and problem solving'
> Subject: [AccessD] Turn off the ribbons programmatically
>
>
>
> Dear List:
>
> Is there a way to turn off the A2007 ribbons programmatically? In a way
> that will not cause the program to barf if it's being run by A2003?
>
> I have a legacy 2003 app that's run by the client on 2007. The ribbon takes
> up so much freakin' real estate that you can't see the whole form on the
> display. Especially the exit button at the bottom which is kind of
> important.
>
> I got the navigation pane to turn off: DoCmd.RunCommand acCmdWindowHide, but
> not the ribbon.
>
> MTIA
>
> Rocky
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com