Hi Sean,
I used the scripting framework that many scripts use. It is used in the RegisterHotkeys sub. Here is my sub: Sub RegisterHotkeys() If Not SO_HotkeyManager Is Nothing Then If UBound(Split(INIFile(myINIFile).GetSectionKeys(SO_HotkeyManager.INISecti onName), vbNullChar)) < 0 Then SO_HotkeyManager.Add "Key01", "Alt-Windows-G", "GetDetails" SO_HotkeyManager.Add "Key02", "Alt-Windows-E", "SendMeEMail" End If If Not registeredHotkeys Is Nothing Then If registeredHotkeys.Count > 0 Then registeredHotkeys.RemoveAll End If End If Dim iniArray: iniArray = Split(INIFile(myINIFile).GetSectionKeys(SO_HotkeyManager.INISectionName) , vbNullChar) Dim iniKeyID For Each iniKeyID In iniArray Set registeredHotkeys(iniKeyID) = Keyboard.RegisterHotkey(SO_HotkeyManager.Key(iniKeyID), SO_HotkeyManager.Data(iniKeyID)) Next End If End Sub From: Sean Farrow [mailto:[email protected]] Sent: 18 March 2011 01:18 PM To: [email protected] Subject: RE: scripting issues Hi Charles: That helps, from where do you call the GetDetails procedure? Cheers Sean. From: Charles Steyn [mailto:[email protected]] Sent: 18 March 2011 08:55 To: [email protected] Subject: RE: scripting issues Hi Sean and list, I wrote a script for myself just to get the colomn headers. It is certainly not complete, but it works for me. The relevant sections are: Set myObject = Nothing MSAAEvent = ConnectEvent(msaaEventSource, "onObjectFocus", "onObjectFocus") Function onObjectFocus(accObj) Set myObject = accObj End Function Sub GetDetails() On Error Resume Next If Not myObject Is Nothing Then If myObject.Parent.FirstChild.Value <> "" Then Speak myObject.Parent.FirstChild.Value End If End Sub I hope it helps a bit. Charles Steyn From: Sean Farrow [mailto:[email protected]] Sent: 17 March 2011 09:39 PM To: [email protected] Subject: scripting issues Hi Fokes: Ok, I'm facing some interesting scripting issues, and would like some advice: I'm trying to script sql server 2008 r2. I'm using window-eyes 7.5. The first issue is where I have tables, there are columns that can be expanded/collapsed. The state change is double-spoken-what is the best way to fix this? Secondly again with tables, msaa is useless-wht names like row 1 column 1. I need to read the column headings, is there a qway of examining msaa parent/child relationships with something like msaa detective? Any helpa pareciated. Regards Sean. DISCLAIMER <http://www.aurecongroup.com/Electronic-Mail-Notice.aspx>
