MS Access and Scripting Help

[jkosmich]

Does any one have a sample code set or a good method for interacting with MS-Access 2003, All I trying to accomplish is to read data from the various windows like "QUERY" and then take some action such as Right-Clicking on an event.

I recorded a quick script but have not been able to sucessfully getting them to work after recording or hand tweaking the code.

Any help would be greatful.

Thanks

Here is a sample Snippet:

#region --- AutoIt Macro Generator V 0.21 beta ---

Opt("WinTitleMatchMode", 4)

WinWait("Microsoft Access","MsoDockTop")

ControlClick("Microsoft Access","MsoDockTop","ODb1")

$CLVItem = ControlListView("Microsoft Access","MsoDockTop","SysListView321","FindItem","1_MSP_TASKS_OSCAR_NA_LAUNCH")

ControlListView("Microsoft Access","MsoDockTop","SysListView321","SelectClear")

ControlListView("Microsoft Access","MsoDockTop","SysListView321","Select",$CLVItem)

ControlClick("Microsoft Access","MsoDockTop","Edit1","Right")

WinWait("Database Table/Query","")

ControlClick("Database Table/Query","","MsoCommandBarPopup0")

WinWait("Linked Table Manager","")

ControlCommand("Linked Table Manager","","ListBox1","SelectString","1_MSP_TASKS_OSCAR_NA_LAUNCH (P:\IOCM Project Plans\Latest_Report\OSCAR NA Launch Roadmap_11_12_2007 v1.mdb)")

ControlCommand("Linked Table Manager","","ListBox1","SelectString","1_MSP_TEXT_FIELDS_OSCAR_NA_LAUNCH (P:\IOCM Project Plans\Latest_Report\OSCAR NA Launch Roadmap_11_12_2007 v1.mdb)")

ControlClick("Linked Table Manager","","OFormSub2")

ControlClick("Linked Table Manager","","OFormSub2")

WinWait("Select New Location of 1_MSP_TASKS_OSCAR_NA_LAUNCH","Select New Location of 1_MSP_T")

ControlClick("Select New Location of 1_MSP_TASKS_OSCAR_NA_LAUNCH","Select New Location of 1_MSP_T","bosa_sdm_Mso960")

WinWait("classname=_sdm_Mso96","")

ControlClick("classname=_sdm_Mso96","","_sdm_Mso960")

WinWait("Select New Location of 1_MSP_TASKS_OSCAR_NA_LAUNCH","Select New Location of 1_MSP_T")