Главная » Статьи » Программирование » Скрипты

Модули и VBScript

Модули и VBScript

Привыкли к модульному программированию и пишите на VBS? Тяжко... Но "включить" (include) один файл в другой все же можно! Правда придется написать процедуру-включатель :). Так же будут особенности при обработке ошибок. В частности ошибки синтаксиса включаемых скриптов буду всего скорее падать на строку ExecuteGlobal...

' Пример включения скрипта в другой скрипт

' Функция, включающая файл в глобальное пространство имен
Sub Inc_File(FileName)
 Dim objFileSystem, objTextStream, strInc

 Set objFileSystem = CreateObject("Scripting.FileSystemObject")
 Set objTextStream = objFileSystem.OpenTextFile(FileName, 1)
 strInc = objTextStream.ReadAll
 objTextStream.Close
 ExecuteGlobal strInc
End Sub

' Пример использования
Inc_File "TestInc.vbs"
Категория: Скрипты | Добавил: alexeevd (26.02.2012)
Просмотров: 1237 | Рейтинг: 5.0/1
Всего комментариев: 0
Имя *:
Email *:
Код *: