Enumerate

[Gintaras]

1.

Code:

Copy      Help

Wsh.WshNetwork n._create
Wsh.WshCollection coll=n.EnumPrinterConnections
int i
for i 0 coll.Count 2
,VARIANT vi=i+1 ;;odd items are printer names
,str printername=coll.Item(vi)
,out printername

2.

Code:

Copy      Help

Acc a=acc("Notification Area" "TOOLBAR" "+Shell_TrayWnd" "ToolbarWindow32" "" 0x1001)
a.Navigate("f")
rep
,out a.Name
,a.Navigate("n"); err break