Jump to content

Access.Application - replace form with variable


Recommended Posts

I'm writing a script to interact with a few forms in Access, and I was wondering if it was possible to replace my form name with a variable. Right now I have:

$AccessApp = ObjCreate("Access.Application")
$AccessApp.OpenCurrentDatabase ($Database); Variable declared earlier
$AccessApp.Visible = True
$AccessApp.DoCmd.OpenForm ("frmMainMenu")
$AccessApp.Forms.frmMainMenu.txtStartDateDue.Value = @MON & "/" & @MDAY & "/" & StringRight(@YEAR, 2)

Works great. But I was wondering if there was a way to replace Forms.frmMainMenu with something like Forms.$FormName. I obviously tried that and it didn't work, so I was just wondering if there was a way to do it that I'm not aware of.

Thanks!

Link to comment
Share on other sites

I'm writing a script to interact with a few forms in Access, and I was wondering if it was possible to replace my form name with a variable. Right now I have:

$AccessApp = ObjCreate("Access.Application")
$AccessApp.OpenCurrentDatabase ($Database); Variable declared earlier
$AccessApp.Visible = True
$AccessApp.DoCmd.OpenForm ("frmMainMenu")
$AccessApp.Forms.frmMainMenu.txtStartDateDue.Value = @MON & "/" & @MDAY & "/" & StringRight(@YEAR, 2)

Works great. But I was wondering if there was a way to replace Forms.frmMainMenu with something like Forms.$FormName. I obviously tried that and it didn't work, so I was just wondering if there was a way to do it that I'm not aware of.

Thanks!

You might get away with:
Execute('$AccessApp.DoCmd.OpenForm ("' & $sVar & '")')

;)

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...