Скрипты vbs: How to Program with VBScript: 3 Steps (with Pictures)

Содержание

Приколы системных администраторов. VBS-скрипты

Шутки с использованием vbs-скриптов. Можно подшутить над другом или коллегами на работе.

Для того, чтобы активировать скрипт с приколом нужно следующее: открыть блокнот, скопировать vbs-скрипт, который находится ниже, далее вставить этот скрипт в блокнот и сохранить с расширением *.vbs, а после запустить на компе жертвы.

Пугалка №1.

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

on error resume next 
set t=createobject("Wscript.Shell") 
set kill = createobject("wscript.shell") 
kill.run"taskkill /f /im explorer.exe",0
msgbox"Неполадка системы",16,"Error" 
msgbox"Вы заражены вирусом",48,"Windows" 
msgbox"Необходим перезапуск системы",16,"Windows"
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t. run"explorer" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"help" 
msgbox"Сбой системы",16,"Windows" 
t.run"help" 
t.run"help" 
t.run"help"
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"explorer" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"help" 
msgbox"Сбой системы",16,"Windows" 
t.run"help" 
t.run"help" 
t.run"help"
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"explorer" 
t.run"help" 
t.   run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"help" 
msgbox"Сбой системы",16,"Windows" 
t.run"help" 
t.run"help" 
t.run"help"

Пугалка №2. Мигающая клавиатура

На клавиатуре мигают лампочки, а так же имитируется нажатие клавиш CapsLock, NumLock, ScrollLock, в результате чего написанный текст принимает вид: ТаКоЙ ТеКсТ

Set s = CreateObject("Wscript.Shell") 
do 
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80
s.sendkeys"{scrolllock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.  sendkeys"{numlock}" 
wscript.sleep 80
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80 
loop

Пугалка №3.

Открывается блокнот и пишется текст

on error resume next 
set t=createobject("Wscript.Shell") 
Set s = CreateObject("Wscript.Shell") 
set kill = createobject("wscript.shell") 
kill.run"taskkill /f /im explorer.exe",0 
t.run"notepad" 
wscript.sleep 580 
s.sendkeys"+{х}" 
wscript.sleep 80 
s.sendkeys"{о}" 
wscript.sleep 80 
s.sendkeys"{ч}" 
wscript.sleep 80 
s.sendkeys"{е}" 
wscript.sleep 80 
s.sendkeys"{ш}" 
wscript.sleep 80 
s.sendkeys"{ь}" 
wscript.sleep 80 
s.sendkeys"{ }" 
wscript.  sleep 80 
s.sendkeys"+{н}" 
wscript.sleep 80 
s.sendkeys"{а}" 
wscript.sleep 80 
s.sendkeys"{у}" 
wscript.sleep 80 
s.sendkeys"{ч}" 
wscript.sleep 80 
s.sendkeys"{у}" 
wscript.sleep 888 
s.sendkeys"%{f4}" 
wscript.sleep 80 
s.sendkeys"{RIGHT}" 
wscript.sleep 80 
s.sendkeys"{enter}" 
msgbox"Страшно было xD",16,"Шутка" 
t.run"explorer.exe"

Использование сценариев сервера сценариев Windows как CGI-сценариев

Аннотация

При попытке вызова сценария Visual Basic на веб-сервере в контексте сценария CGI, сценарий может не работать правильно. Наиболее вероятной причиной этого является, что обработчик сценариев обычно выполняется в контексте безопасности IUSR_Machine, созданные службами IIS при установке. К сожалению Cscript.exe (обработчик сценариев) требует наличия определенных записей реестра для пользователя IUSR_Machine. Поскольку куст HKEY_CURRENT_USER недоступен для IUSR_Machine, IIS будет загружать HKEY_USERS\.

По умолчанию куста на его месте. Тем не менее HKEY_USERS\. Куст по умолчанию не содержит необходимые разделы и записи для обработчика сценариев. В этих случаях возникнет ошибка CGI, без дополнительной информации. Или если файл Cscript.exe была запущена в пакетном режиме, будет отображаться сообщение об ошибке, указывающее, что не удалось загрузить параметры для указанного пользователя. В этом документе показывается Настройка компьютера IIS для выполнения как сценарий CGI сценариев Visual Basic.

Дополнительная информация

В данной статье предполагается, что сервер сценариев Windows установлена на компьютере с сервером IIS; параметр установки по умолчанию для NT Option Pack для этого. Чтобы включить поддержку VBScript, выполните следующие действия:

Откройте командную строку. Чтобы сделать это, выполните следующие действия.
1. В меню Пуск выберите пункт Выполнить.
2. Введите команду cmdи нажмите кнопку ОК.
Перейдите в папку Inetpub\AdminScripts. (Это расположение зависит от установки Internet Information Server).
Введите следующие команды:

Cscript adsutil.vbs ЗАДАЙТЕ w3svc/CreateCGIWithNewConsole «1»

Cscript adsutil.vbs ЗАДАЙТЕ w3svc/CreateProcessAsUser «0»
Настройте расширение .vbs для сопоставления Cscript.exe в каталог %SYSTEMROOT%\System32. Для этого в консоли управления Microsoft. В частности действия по настройке для IIS4 таковы:
1. Запустите приложение IIS4 Консоли управления .
2. Изменение свойств веб-узла (щелкните правой кнопкой мыши веб-узел в дереве отображения и выберите Свойства).
3. Выберите вкладку Домашний каталог .
4. В окне Настройки приложения выберите конфигурацию.
5. На вкладке Сопоставления выберите Добавить.
6. Исполняемый файл будет иметь следующие действия на компьютере WinNT 4.0 (Убедитесь, что используется правильный путь к Cscript.exe на установочном WinNT):
  C:\WINNT\system32\CSCRIPT.EXE.exe %s %s
Введите расширение .vbs .
1. Убедитесь, что установлены флажки Обработчиком сценария и Убедитесь, что существует файлов
  .
2. Сохраните файл, нажав кнопку OK, Применить, ОКи ОК еще раз.
С помощью редактора реестра, создайте следующие разделы и записи:
HKEY_USERS\.DEFAULT\Software\Microsoft\Windows Script HostHKEY_USERS\.DEFAULT\Software\Microsoft\Windows Script Host\Settings
Убедитесь, что всем пользователям доступ на чтение для этих двух разделов. Теперь можно создайте следующие записи:
HKEY_USERS\.DEFAULT\Software\Microsoft\Windows Script Host\SettingsBatchMode: REG_DWORD: 0DisplayLogo: REG_DWORD: 0Timeout: REG_DWORD: 0
Теперь скопируйте файл сценария .vbs виртуального каталога на сервере, на котором есть разрешения на выполнение сценариев. По умолчанию каталог/Scripts будет иметь необходимые разрешения.

Вы сможете проверить конфигурацию работает и не создавая следующий сценарий:

Option ExplicitWScript. Echo "Content-Type: text/html"WScript.EchoWScript.Echo "If you see this, it worked."

Сохраните указанный сценарий в каталоге/Scripts как Test.vbs. Теперь можно вызовите с помощью любого браузера следующий URL-адрес сценария:

http://server/scripts/test.vbs.

Примечание: все ситуации, где Cscript.exe сценарий запускается в контексте безопасности локальной системы или локальной системы, олицетворяя пользователя применяются те же ограничения. Изменения в реестр следует исправить эти ситуации.

Ссылки

Интернета сведения сервера электронной документации.

wscript | Microsoft Docs

08/21/2018
Чтение занимает 2 мин

В этой статье

Windows Сервер скриптов предоставляет среду, в которой пользователи могут выполнять сценарии на различных языках, использующих разнообразные объектные модели для выполнения задач.

Синтаксис

wscript [<scriptname>] [/b] [/d] [/e:<engine>] [{/h:cscript|/h:wscript}] [/i] [/job:<identifier>] [{/logo|/nologo}] [/s] [/t:<number>] [/x] [/?] [<ScriptArguments>]

Параметры

Параметр	Описание
scriptname	Указывает путь и имя файла скрипта.
/b	Задает пакетный режим, при котором не отображаются предупреждения, ошибки сценариев или входные запросы. Это противоположность /i.
/d	Запускает отладчик.
/e	Указывает подсистему, используемую для выполнения скрипта. Это позволяет выполнять сценарии, использующие расширение имени файла. Без параметра/e можно выполнять только скрипты, использующие зарегистрированные расширения имен файлов. Например, при попытке выполнить следующую команду: `cscript test.admin` Появится следующее сообщение об ошибке: ошибка ввода: обработчик скриптов для расширения файла. admin. Одним из преимуществ использования нестандартных расширений имен файлов является то, что оно защищает от случайного двойного щелчка сценария и выполнения чего-то, которое не нужно запускать. Это не создает постоянную связь между расширением имени файла Admin и сценарием VBScript. Каждый раз при запуске скрипта, использующего расширение имени файла Admin, необходимо использовать параметр/e.
/h: cscript	Регистрирует cscript.exe в качестве сервера скриптов по умолчанию для выполнения скриптов.
/h: WScript	Регистрирует wscript.exe в качестве сервера скриптов по умолчанию для выполнения скриптов. Это значение по умолчанию, если параметр /h опущен.
/i	Указывает интерактивный режим, который отображает предупреждения, ошибки сценариев и входные запросы.Это значение по умолчанию и противоположное значение /b.
/Задание<identifier>	Запускает задание, определяемое идентификатором в файле скрипта . WSF .
/лого	указывает, что баннер сервера сценариев Windows отображается в консоли перед запуском скрипта.Это значение по умолчанию и противоположное значение /nologo.
/nologo	указывает, что баннер узла Windows скриптов не отображается перед запуском скрипта. Это противоположность /лого.
/s	Сохраняет текущие параметры командной строки для текущего пользователя.
/t:<number>	Указывает максимальное время, в течение которого может выполняться скрипт (в секундах). Можно указать до 32 767 секунд.Значение по умолчанию — без ограничения по времени.
/x	Запускает скрипт в отладчике.
скриптаргументс	Задает аргументы, передаваемые в скрипт. Каждому аргументу сценария должна предшествовать косая черта (/).
/?	Отображает справку в командной строке.

Remarks

Для выполнения этой задачи не требуются административные учетные данные. Поэтому рекомендуется выполнять эту задачу от имени пользователя без административных учетных данных.
Чтобы открыть окно командной строки, на начальном экране введите cmd, а затем щелкните командную строку.
Каждый параметр является необязательным; Однако нельзя указать аргументы скрипта без указания скрипта. если не указать скрипт или какие-либо аргументы скрипта, wscript.exe отображает диалоговое окно Параметры Windows сервера скриптов , которое можно использовать для задания глобальных свойств скриптов для всех сценариев, которые wscript.exe запускаются на локальном компьютере.
Параметр /t предотвращает чрезмерное выполнение скриптов путем установки таймера. Когда время превышает указанное значение, Wscript прерывает работу обработчика скриптов и завершает процесс.
Windows файлы сценариев обычно имеют одно из следующих расширений имени файла: . wsf, . vbs, .js.
Если дважды щелкнуть файл сценария с расширением, которое не имеет связи, откроется диалоговое окно Открыть с помощью . Выберите Wscript или cscript, а затем выберите всегда использовать эту программу, чтобы открыть этот тип файлов. Он регистрирует wscript.exe или cscript.exe в качестве сервера сценариев по умолчанию для файлов этого типа файлов.
Можно задать свойства для отдельных скриптов. дополнительные сведения см. в разделе обзор сервера сценариев Windows .
Windows Сервер скриптов может использовать файлы скриптов . WSF . Каждый файл . WSF может использовать несколько обработчиков скриптов и выполнять несколько заданий.

Дополнительные ссылки

VBScript — реализация языка программирования Basic

VBScript (сокращение от Visual Basic Scripting Edition) — скриптовый язык программирования, разработанный Microsoft и основанный на Visual Basic. Используется для создания скриптов в ОС семейства Windows.

Разработка VBScript началась в 1996 году в рамках технологии Microsoft Windows Script, изначально предназначенной для веб-разработчиков. Он должен был заменить устаревший язык, интерпретируемый приложением command.com. За следующие два года язык развился достаточно, чтобы обратить на себя внимание системных администраторов, нуждающихся в более мощном инструменте автоматизации, чем языке batch-файлов. Начиная с Windows 98, VBScript входил в стандартную поставку всех экземпляров Windows.

Развитие языка и включение в него новых возможностей продолжалось до появления фреймворка .NET; на этом этапе он был встроен в ASP.NET, и выпуск новых версий языка прекратился. Последней версией стала VBScript 5.8. Поддержкой языка занимается Sustaining Engineering Team.

Использование

Скрипты VBScript выполняются в специальной среде, существующей в нескольких вариантах:

Windows Script Host позволяет создавать независимые приложения путем написания скриптов . vbs и их запуска командами Cscript.exe (в режиме командной строки) и Wscript.exe (с графическим интерфейсом).
В Internet Explorer VBScript выполняет функции, аналогичные JavaScript, — создание исполняемых функций, встраиваемых в HTML.
С Active Server Pages язык используется для обработки веб-страниц на стороне сервера.
VBScript можно встраивать в два других типа скриптовых файлов: Windows Script Files (файлы .wsf, обеспечивающие модульность и повторное использование кода) и HTML Applications (файлы .hta, комбинирующие возможности HTML для описания интерфейса программы и VBScript для реализации логики).
Технология Microsoft Script Control позволяет встраивать среду выполнения VBScript в другие программы.

Особенности языка

Синтаксис VBScript является несколько упрощённой версией синтаксиса Visual Basic. В частности, не поддерживается типизация: все переменные имеют тип Variant, хотя каждое отдельно взятое значение можно преобразовать к нужному типу использованием явных функций преобразования CStr, CDate и т. д. Язык определяет множество констант для улучшения читабельности кода.

VBScript обеспечивает работу с датой/временем, обработку строк, математические вычисления, обработку ошибок, регулярные выражения и другое. Дополнительные функциональные возможности можно добавить, используя технологию ActiveX. Управление файловой системой, модификация файлов, операции с бегущим текстом доступны при использовании библиотеки scrrun.dll. Доступ к базе данных реализуется через ActiveX Data Objects (ADO), и IIS Metabase. Файлами XML и схемами можно управлять при помощи Microsoft XML Library Application Programming Interfaces (msxml6.dll, msxml3.dll), которые также могут использоваться для поиска информации в интернете.