VPF::построчный вывод в броузер - Форум программистов

burakov

Дата 20.11.2009, 16:20 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

Добрый день.
включил у себя activex

написал скрипт сканирования каталогов рекурсивно
хочу теперь чтобы файлы при сканировании построчно выводились в броузер - ну или как в примере в textarea

вот код

Код



<html>
    <body>

    <form name="qqq">
    <textarea name="aaa" rows=10 cols=50></textarea>
    </form>
    
    <script type="text/javascript">
    
    var Path = 'c:/'; 
    setTimeout ('GetFile(Path)', 1000);


    function GetFile (Path) {
        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
        var Folder = FSO.GetFolder (Path);
        var Result;

        if (FSO.FolderExists (Path)) {
            var e = new Enumerator (Folder.Files); 
            for (e.moveFirst(); !e.atEnd(); e.moveNext()) { 
                var File = e.item();
                document.qqq.aaa.value += File.Path + '\r\n';
                
            }        
            e = new Enumerator (Folder.subFolders); 
            for (e.moveFirst(); !e.atEnd(); e.moveNext()) { 
                var Dir = e.item();
                if (FSO.FolderExists (Dir)) {
                    GetFile (Dir);
                }
            }        
        }
    }
    
    </script>    
</body>
</html>

поставил вроде и задержку, но страница все равно зависает , пока все файлы не отсканируются

Вопрос, как сделать так, чтобы
нашел мой GetFile файлик в каталоге и СРАЗУ отобразил его в textarea
не дожидаясь конца сканирования каталога ...

Спасибо...

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

Itsys

Дата 20.11.2009, 22:25 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 12
Всего: 34

Пока работает процедура никакого обновления не будет.

Надо за один вызов процедуры ыполнять вывод только одного файла, т.е.:
1. Задал начальный путь
2. Вызвал процедуру
3. Выдал один файл и запомнил в глобальной переменной какой файл выдан
4. В конце процедуры setTimeout
5. Вызвал процедуру
6. Выдал файл, следующий за запомненым и запомнил в глобальной переменной какой файл выдан
и т.д. с пункта 4

burakov

Дата 23.11.2009, 11:19 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

Добрый день,

ничего у меня не получается...
Такое впечатление , что пока js хоть чуть чуть думает (выполняет процедуру даже запущенную по timeout) никакого постепенного отображения не БУДЕТ!!! Кроме страничка на момент вычислений "зависает", так что допустим элемент select не раскрывается -
вот пример тому следующий код

Код



<html>
    <body>
    <select> 
    
    <option> Страничка </option>
    </select>
    
    
    <script type="text/javascript">

    Array = new Array ();
    var i; var Count = 10000; 
    var ForPrint = ''; 
    while (Array.length < Count) {
        Array.push (Count); 
    }
    
    setTimeout ('For ()', 1000);
    
    function For () {
        for (i=0; i < Array.length; i++) {
            ForPrint += Array[i] + '<br>';
            setTimeout ('View (ForPrint)', 1000);
        }    
    }

    function View (Str) {
        document.write (Str);
    }
    
    </script>    
</body>
</html>

Как видно и цикл запускается по setTimeout и само отображение информации запускается по setTimeout. ОДНАКО зависание странички наблюдается КОНКРЕТНОЕ...

Пока цикл for не закончится - ни какое такое мало мальски динамическое (постепенное) отображение document.write не наблюдается!!!!

Друзья!!!
Я хочу НЕВОЗМОЖНОГО от JS или что то не так делаю?

Напомню таки чего хочется ....

есть скрипт сканирования каталогов (на предмет файлов) рекурсивно для получения списка файлов и последующей его обработки. Но когда файлов много (2000 и более) страница (html) некрасиво зависает до окончания сканирования .... а я не хочу чтобы эффект зависания имел место, да к тому же хочу чтобы на странице динамично отображался результат работы скрипта - т.е. выводились бы имена файлов (ну пусть даже и не поименно, а хотя бы по несколько штук, т.е. за какой то период времени выраженный в миллисекундах т.е. небольшой smile

)

Возможно ли такое сделать средствами JS??? Ведь есть же ajax и т.п. технологии. Как то ж люди добиваются эффекта более менее похожести работы web приложения на работу локальной программы!?

Спасибо...

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

burakov

Дата 23.11.2009, 13:39 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

добрый день еще раз smile

Покопался в инете и выяснил, что для того чтобы была динамика в отображении содержимого
необходимо отказываться от операторов циклов и переносить все это в функции за запуском по setTimeout. И вообщем то заработало....
вот например код

Код


<html>
    <body>

    <form name="qqq">
    <textarea name="aaa" rows=10 cols=50></textarea>
    </form>
    
    <script type="text/javascript">
    
    var MS = 500; 
    var Result = '';
    var Path = 'c:/windows'; 
        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
        var Folder = FSO.GetFolder (Path);

        if (FSO.FolderExists (Path)) {
            var f = new Enumerator (Folder.Files); 
            
            getFileFromEnumerator(f); 
            function getFileFromEnumerator(f) {
                if (!f.atEnd()) {
                    f.moveNext();
                    var File = f.item (); 
                    Result += File.Path + '\r\n';
                    document.qqq.aaa.value = Result;
                    setTimeout ('getFileFromEnumerator(f)', MS);
                }
            }
        }

    </script>    
</body>
</html>

делает то что мне надо, НО мне нельзя ведь FSO глобально объявлять - мне рекурсия нужна
но на следующем коде пишет что "не определен параметр f"
понимаю, что дело тут в области видимости объекта - но как правильно написать не пойму.
пример кода

Код


<html>
    <body>

    <form name="qqq">
    <textarea name="aaa" rows=10 cols=50></textarea>
    </form>
    
    <script type="text/javascript">
    
    var MS = 500; 
    var Result = '';
    var Path = 'c:/windows'; 
    setTimeout ('GetFile(Path)', MS);


    function GetFile (Path) {
    
        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
        var Folder = FSO.GetFolder (Path);
        
        
        if (FSO.FolderExists (Path)) {
            var f = new Enumerator (Folder.Files); 
            
            getFileFromEnumerator(f); 
            function getFileFromEnumerator(f) {
                if (!f.atEnd()) {
                    f.moveNext();
                    var File = f.item (); 
                    Result += File.Path + '\r\n';
                    document.qqq.aaa.value = Result;
                    setTimeout ('getFileFromEnumerator(f)', MS);
                }
            }

            
        /*    
            var s = new Enumerator (Folder.subFolders); 
            getDirFromEnumerator (s) {
                if (!s.atEnd()) {
                    s.moveNext(); 
                    var Dir = s.item ();
                    if (FSO.FolderExists (Dir)) {
                    GetFile (Dir);
                }
            }

        */

        }
    }
    
    </script>    
</body>
</html>

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

Itsys

Дата 23.11.2009, 15:42 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 12
Всего: 34

Не увидел последнее собщение, но идея такова:

Код


<html>
    <body>
    <div id="dv"></div>
    <script type="text/javascript">

    Array = new Array ();
    var Count = 100; 
    for (i=0; i<Count; ++i) {
        Array.push (i); 
    }
    
    setTimeout (function(){For (0)}, 1000);
    
    function For (end) {
        ForPrint = '';
        for(i = 0; i <= end; ++i){
            ForPrint += Array[i];
        }
        document.getElementById("dv").innerHTML += ForPrint + '<br>';
        ++end;
        if (end < Array.length){
            (function(next){
                setTimeout (function(){For (next)}, 1000);
            })(end);
        }
    }
   
    </script>    
</body>
</html>

Добавлено через 1 минуту и 45 секунд
ЗЫ Обрати внимание на сроки 22-24

burakov

Дата 23.11.2009, 16:36 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

Спасибо. за ответы.

последний код немного запутан (для меня) но в принципе понятен.
заменить цикл вложенными функциями у меня получилось...

вопрос сейчас в следующем
Не могу понять... почему

wsh нормально отрабатывает мой скрипт рекурсивного сканирования каталогов
(правда если файлов много как например в каталоге windows - говорит "Недостаточно памяти" - отчего такая ошибка - при использовании циклов такой ошибки не возникает!)

Код


    var MS = 500; 
    var Result = '';
    var Path = 'c:/windows'; 

    GetFile (Path);
    
    function GetFile (Path) {
        
        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
        var Folder = FSO.GetFolder (Path);

        if (FSO.FolderExists (Path)) {

            var f = new Enumerator (Folder.Files); 
            getFileFromEnumerator(f); 
            function getFileFromEnumerator(f) {
                if (!f.atEnd()) {
                    var File = f.item (); 
                    WScript.Echo (File.Path);
                    f.moveNext();
                    getFileFromEnumerator(f); 
                }
            }
            
            var s = new Enumerator (Folder.SubFolders); 
            getDirFromEnumerator (s);
            function getDirFromEnumerator (s) {
                if (!s.atEnd()) {
                    var Dir = s.item ();
                    s.moveNext(); 
                    if (FSO.FolderExists (Dir)) {
                        GetFile (Dir);
                    }
                    getDirFromEnumerator (s);
                }
            }            
        }
    }

а вот в броузере точно такой же код НЕ РАБОТАЕТ
ругается на то что объект s (не имеет определения)
впрочем если убрать s, то тогда точно такое же ругательство говорит на объект f.

подозреваю, что дело в области видимости - но ведь точно такой же код без проблем работает
в WSH!!! Вот этот злополучный код...

Код


<html>
    <body>

    <form name="qqq">
    <textarea name="aaa" rows=10 cols=50></textarea>
    </form>
    
    <script type="text/javascript">
    
    var MS = 500; 
    var Result = '';
    var Path = 'c:/111'; 

    GetFile (Path);
    
    function GetFile (Path) {
        
        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
        var Folder = FSO.GetFolder (Path);

        if (FSO.FolderExists (Path)) {

            var f = new Enumerator (Folder.Files); 
            getFileFromEnumerator(f); 
            function getFileFromEnumerator(f) {
                if (!f.atEnd()) {
                    var File = f.item (); 
                    
                    document.qqq.aaa.value += File.Path + '\r\n';
                    f.moveNext();
                    setTimeout ('getFileFromEnumerator(f)', MS); 
                }
            }
            
            var s = new Enumerator (Folder.SubFolders); 
            getDirFromEnumerator(s);
            function getDirFromEnumerator(s) {
                if (!s.atEnd()) {
                    var Dir = s.item ();
                    s.moveNext(); 
                    if (FSO.FolderExists (Dir)) {
                        GetFile (Dir);
                    }
                    setTimeout ('getDirFromEnumerator(s)', MS);
                }
            }            
        }
    }
    
    </script>    
</body>
</html>

Ну и наконец
через эксперименты с областью видимости объектов удалось просканировать каталог с тем эффектом который мне нужен - правда за счет того что объект FSO создаю глобально рекурсивно такое сделать не получится

КОД

Код


<html>
    <body>

    <form name="qqq">
    <textarea name="aaa" rows=10 cols=50></textarea>
    </form>
    
    <script type="text/javascript">
    
    var MS = 500; 
    var Result = '';
    var Path = 'c:/windows'; 
    setTimeout ('GetFile(Path)', MS);

        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
    
        if (FSO.FolderExists (Path)) {
        
            var Folder = FSO.GetFolder (Path);
            var f = new Enumerator (Folder.Files); 
        
            f = getFileFromEnumerator(f); 
            function getFileFromEnumerator(f) {
                if (!f.atEnd()) {
                    var File = f.item (); 
                    f.moveNext();
                    Result += File.Path + '\r\n';
                    document.qqq.aaa.value = Result;
                    setTimeout ('getFileFromEnumerator(f)', MS);
                    return f;
                }
            }
        }

    
    </script>    
</body>
</html>

Почему же все таки не получается прочесть файлы рекурсивно???

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

Itsys

Дата 23.11.2009, 17:55 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 12
Всего: 34

В этом случае f и s надо вынести в глобальный контекст

Код


<html>
    <body>

    <form name="qqq">
    <textarea name="aaa" rows=10 cols=50></textarea>
    </form>
    
    <script type="text/javascript">
    
    var MS = 500; 
    var Result = '';
    var Path = 'c:/111'; 
    var f,s;

    GetFile (Path);
    
    function GetFile (Path) {
        
        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
        var Folder = FSO.GetFolder (Path);

        if (FSO.FolderExists (Path)) {

            f = new Enumerator (Folder.Files); 
            getFileFromEnumerator(); 
            function getFileFromEnumerator() {
                if (!f.atEnd()) {
                    var File = f.item (); 
                    
                    document.qqq.aaa.value += File.Path + '\r\n';
                    f.moveNext();
                    setTimeout (function(){getFileFromEnumerator()}, MS); 
                }
            }
            
            s = new Enumerator (Folder.SubFolders); 
            getDirFromEnumerator();
            function getDirFromEnumerator() {
                if (!s.atEnd()) {
                    var Dir = s.item ();
                    s.moveNext(); 
                    if (FSO.FolderExists (Dir)) {
                        GetFile (Dir);
                    }
                    setTimeout (function(){getDirFromEnumerator()}, MS);
                }
            }            
        }
    }
    
    </script>    
</body>
</html>

brother79

Дата 24.11.2009, 08:03 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 471
Регистрация: 18.8.2009

Репутация: 1
Всего: 6

Sory, не так вопрос понял smile

Удалите сообщение.

Это сообщение отредактировал(а) brother79 - 24.11.2009, 08:05

--------------------

http://www.nastandart.com

burakov

Дата 24.11.2009, 10:20 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

Добрый день,

спасибо огромное за участие
в конце концов все разрешилось....

Если объекты f, s объявить глобально - то скрипт НЕ РАБОТАЕТ.
и вообщем то понятно почему... НО
все дело оказалось в моем написании setTimeout

Я его вызывал вот так

Код


setTimeout ('getFileFromEnumerator(f)', MS);

а почему то правильно работает так

Код


setTimeout (function(){getFileFromEnumerator()}, MS);

хотя я синтаксис из справочника по js вроде бы подсмотрел :(.

вообщем вот рабочий код скрипта

Код


<html>
    <body>
    <form name="qqq">
    <textarea name="aaa" rows=10 cols=120></textarea>
    </form>
    
    <script type="text/javascript">
    
    var MS = 500; 
    var Result = '';
    var Path = 'c:/windows'; 
    
    
    GetFile (Path);
    
    function GetFile (Path) {
        
        var FSO = new ActiveXObject ("Scripting.FileSystemObject");
        var Folder = FSO.GetFolder (Path);
        if (FSO.FolderExists (Path)) {
            var f = new Enumerator (Folder.Files); 
            getFileFromEnumerator(); 
            function getFileFromEnumerator() {
                if (!f.atEnd()) {
                    var File = f.item (); 
                    
                    document.qqq.aaa.value += File.Path + '\r\n';
                    f.moveNext();
                    setTimeout (function(){getFileFromEnumerator()}, MS); 
                }
            }
            
            var s = new Enumerator (Folder.SubFolders); 
            getDirFromEnumerator();
            function getDirFromEnumerator() {
                if (!s.atEnd()) {
                    var Dir = s.item ();
                    s.moveNext(); 
                    if (FSO.FolderExists (Dir)) {
                        GetFile (Dir);
                    }
                    setTimeout (function(){getDirFromEnumerator()}, MS);
                }
            }            
        }
    }
    
    </script>    
</body>
</html>

правда из-за этой вот псевдо многопоточности список файлов выходит хитрозадо smile

но в принципе все заработало
СПАСИБО.

А как программно можно узнать что скрипт закончил работу....
ставлю на textarea onLoad но ничего не происходит?

Это сообщение отредактировал(а) burakov - 24.11.2009, 10:50

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

Itsys

Дата 24.11.2009, 15:53 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 12
Всего: 34

Цитата(burakov @ 24.11.2009, 10:20

)

А как программно можно узнать что скрипт закончил работу....
ставлю на textarea onLoad но ничего не происходит?

С таким скриптом у тебя это точно не получится...

Надо менять логику...

Itsys

Дата 24.11.2009, 17:30 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 12
Всего: 34

Хотя бы так:

Код


<html>
    <body>
    <form name="qqq">
    <textarea name="aaa" rows=10 cols=120></textarea>
    </form>
    
    <script type="text/javascript">
    
    var MS = 500; 
    var Result = '';
    var Path = 'C:/Perl/site/lib'; 
    var Folders= new Array;
    Folders.push(Path);
    var FolderNow = 0;
    var FileNow = "";
    var FSO = new ActiveXObject ("Scripting.FileSystemObject");

    function GetSubFolders(PathNow){
        if (FSO.FolderExists(PathNow)) {
            var Folder = FSO.GetFolder (PathNow);
            var s = new Enumerator (Folder.SubFolders); 
            while (!s.atEnd()) {
                var Dir = s.item ();
                s.moveNext(); 
                if (FSO.FolderExists (Dir)) {
                    Folders.push(Dir);
                    (function(Dir){
                        GetSubFolders(Dir);
                    })(Dir);
                }
            }
        }
    }
    //Сначало получим все подкатеории
    GetSubFolders(Path);
    
    GetFile ();
    
    function GetFile () {
        
        if (FileNow == ""){
            if (Folders.length > FolderNow){
                var Folder = FSO.GetFolder (Folders[FolderNow]);
                FileNow = new Enumerator (Folder.Files); 
                ++FolderNow;
            }
            else{
                alert("Закончили!");
                return;
            }
        }
        if (!FileNow.atEnd()) {
            var File = FileNow.item (); 
            
            document.qqq.aaa.value += File.Path + '\r\n';
            FileNow.moveNext();
            setTimeout (function(){GetFile()}, MS); 
        }
        else{
            FileNow = "";
            setTimeout (function(){GetFile()}, MS); 
        }
    }
    
    </script>    
</body>
</html>

burakov

Дата 25.11.2009, 09:22 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

огромное спасибо за пример.
очень помогли ...

СПАСИБО.

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| JavaScript: Общие вопросы \| Следующая тема »