Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 'simulate a click on the "Assign Task" button of an active Inspector
- set sInspector = CreateObject("Redemption.SafeInspector")
- sInspector.Item = Application.ActiveInspector
- set Ribbon = sInspector.Ribbon
- oldActiveTab = Ribbon.ActiveTab
- Ribbon.ActiveTab = "Task"
- set Control = Ribbon.Controls("Assign Task")
- Control.Execute
- Ribbon.ActiveTab = oldActiveTab 'restore the active tab
- //simulate a click on the "Assign Task" button of an active Inspector
- Redemption.SafeInspector sInspector = new Redemption.SafeInspector();
- sInspector.Item = Application.ActiveInspector;
- Redemption.SafeRibbon Ribbon = sInspector.Ribbon;
- string oldActiveTab = Ribbon.ActiveTab;
- Ribbon.ActiveTab = "Task";
- Redemption.SafeRibbonControl Control = Ribbon.Controls.Item("Assign Task");
- Control.Execute();
- Ribbon.ActiveTab = oldActiveTab; //restore the active tab
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement