Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » AutoIT (Часть 2)

Модерирует : gyra, Maz

Widok (01-06-2010 13:08): Лимит страниц. Продолжаем здесь.  Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

   

Nikkorot

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Код:
#include <Array.au3>
 
$var =
WinList()
 
For $i = 1 to $var[0][0]
 
; Only display visble windows that have a title
 
If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then
         
$rashir =
StringregExp($var[$i][0], '\.xls',1)
             
if $rashir =='.xls' then
               
$namebook =
StringRegExp($var[$i][0], '[^Microsoft\sExcel\s-\s].*\.xls',1)
               
_ArrayDisplay($namebook)
                 
MsgBox(0, "Msg", $namebook)
             
EndIf                
  EndIf
Next
 
Func
IsVisible($handle)
 
If BitAnd( WinGetState($handle), 2 ) Then  
    Return
1
 
Else
    Return
0
 
EndIf
 
EndFunc

Всего записей: 50 | Зарегистр. 19-05-2006 | Отправлено: 13:06 01-10-2009
   

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Программы » AutoIT (Часть 2)
Widok (01-06-2010 13:08): Лимит страниц. Продолжаем здесь.


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru