Форум программистов, компьютерный форум, киберфорум
VBScript/JScript/WSH/WMI
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 28.01.2016
Сообщений: 7

Скрипты Windows Scripting Host - JavaScript

17.02.2017, 08:24. Показов 1810. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В зависимости от запроса
1. для каждого типа файлов -TXT,INF,ASM - выдать число строк с заданным текстом;
2. отсортировать файлы заданными именами по убыванию 3-го символа.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
17.02.2017, 08:24
Ответы с готовыми решениями:

Скрипт на сервере сценариев Windows Scripting Host. Подключение сетевого диска
Пытаюсь подключить сетевой диск через скипт с расширение .vbs Диск и путь вводятся с клавиатуры пользователем. Но выбивает ошибку, что...

Еще вопрос по Windows Scripting Host (WSH)
Нужно отобразить все ключи системного реестра на машине. Как сделать ?

Скачать свежую версию Windows Scripting Host
судя по всему у Снежка стоит Javascript 5.0 на NT - кто знает, как обновить версию языка? просто на IIS 4.0 стоит Javascript 4.0 кажется -...

1
757 / 306 / 190
Регистрация: 20.05.2016
Сообщений: 593
22.02.2017, 22:23
Лучший ответ Сообщение было отмечено viktoriua97 как решение

Решение

Что-то такое?
Кликните здесь для просмотра всего текста
JavaScript
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
function CountLines(pFolder, re, aExtensions)
{
    var ForReading = 1, ForWriting = 2, ForAppending = 8;
    var TristateUseDefault = -2, TristateTrue = -1 /*unicode*/, TristateFalse = 0 /*ascii*/;
    var fso = new ActiveXObject("Scripting.FileSystemObject");
    var oFolder = fso.GetFolder(pFolder);
    var oFiles;
    var pExt, oFile, line;
    var oExt = {};
    
    for (var i = 0; i < aExtensions.length; ++i)
        oExt[aExtensions[i]] = 0;
    
    for (oFiles = new Enumerator(oFolder.files); !oFiles.atEnd(); oFiles.moveNext())
    {
        oFile = oFiles.item()
        pExt = fso.GetExtensionName(oFile.Name).toLowerCase()
    
        if (pExt in oExt)
        {
            ts = oFile.OpenAsTextStream(ForReading /* , TristateUseDefault */ );
    
            while (!ts.AtEndOfStream)
            {
                line = ts.ReadLine();
                if (line.search(re) != -1) ++oExt[pExt];
            }
            
            ts.Close();
        }
    }
    
    msg = "Count of lines:";
    for (var i = 0; i < aExtensions.length; ++i)
        msg += "\n  " + aExtensions[i] + ":  " + oExt[aExtensions[i]];
    WScript.Echo(msg);
}
 
 
function SortFiles(pFolder, sortFunction)
{
    var fso = new ActiveXObject("Scripting.FileSystemObject");
    var oFolder = fso.GetFolder(pFolder);
    aFiles = [];
    
    for (oFiles = new Enumerator(oFolder.files); !oFiles.atEnd(); oFiles.moveNext())
        aFiles.push(oFiles.item().Name);
    
    if (sortFunction)
        aFiles.sort(sortFunction);
//     else
//         aFiles.sort();
        
    pFilesList = "";
    for (var i = 0; i < aFiles.length; ++i)
        pFilesList += aFiles[i] + "\n";
    
    WScript.Echo(pFilesList);
}
 
 
function SortBy3Char(str1, str2)
{
    if (str1.charAt(2) > str2.charAt(2))
        return -1;
    if (str1.charAt(2) < str2.charAt(2))
        return 1;
    return 0;
}
 
 
 
extensions = ["txt", "asm", "inf"];
 
oArgs = WScript.Arguments;
 
if (oArgs.length == 0)
{
    WScript.Echo("Использование:\n  1. Для каждого типа файлов -TXT,INF,ASM - выдать число строк с заданным текстом:\n  thisscript.js 1 c:\\myfolder "stringforcount"\n  2. Отсортировать файлы заданными именами по убыванию 3-го символа:\n  thisscript.js 2 c:\\myfolder")
}
 
else if (oArgs(0) == "1")
{
    if (oArgs.length > 2)
        CountLines(oArgs(1), oArgs(2), extensions);
    else if (oArgs.length == 2)
        CountLines(".", oArgs(1), extensions);
}
 
else if (oArgs(0) == "2")
{
    if (oArgs.length == 1)
        SortFiles(".", SortBy3Char);
    else if (oArgs.length == 2)
        SortFiles(oArgs(1), SortBy3Char);
}
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
22.02.2017, 22:23
Помогаю со студенческими работами здесь

Могут ли скрипты JavaScript и Node.js работать на сервере Windows?
Всем привет. У нас в компании скрипты C# работают на сервере Windows. Имеются скрипты JavaScript и Node.js, которые работаютна...

VirtualBox Host-only (host windows 7 х64 после установки обновлений перестал видеть guest ubuntu)
Доброго времени суток всем! Нормально работали виртуальные машины, пока не захотелось мне поставить обновления на Host Windows 7 x64. ...

Что означают названия библиотек "Microsoft Script Host Object Model" и "Microsoft Scripting Runtime"
Есть 2 библиотеки: Microsoft Script Host Object Model Microsoft Scripting Runtime Я, так понимаю, что названия этих библиотек не...

Не рабтают скрипты javascript
Здравствуйте, я нуб и у меня не работает js, который подключается к php странице. Скрипты брались вот отсюда, дабы решить проблему с...

При загрузке Windows вылазит windows script host
С недавнего времени начало вылазить окошко windows script host , как это дело исправить или убрать?указанной папки и файла не существует...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru