Scripting
Объекты Scripting также имеют методы. Объект Document, например, имеет метод Write, который позволяет сценарию помещать текст непосредственно на Web-страницу — создавать Web-страницы на лету.
Метод Write воспроизводит строку на текущей странице. Следующий оператор выводит текущую дату на страницу.
Document.Write Date ()
Если использовать HTML, то необходимо жестко запрограммировать дату и модифицировать документ ежедневно. Функция VBScript Date() возвращает текущую дату, но VBScript не предусматривает методы для фактического отображения даты на странице. Чтобы отобразить что-либо на странице из сценария, используются объекты Scripting Model.
Предположим, имеется простой HTML-документ.
<HTML>
<BODY BGCOLOR="#HOOFFOO">
<Hl>Welcome to Visual Basic and the Web</Hl>
</BODY>
</HTML>
Этот документ воспроизводит страницу с зеленым фоном и заголовком первого уровня. Можно создать ту же страницу, используя код
VBScript.
<HTML>
<SCRIPT LANGUAGE = "VBScript">
Document.bgColor = "#HOOFFOO"
Document.Write "<H1> Welcome to Visual Basic and the Web</Hl>"
'(Добро пожаловать в Visual Basic и Web)
</SCRIPT>
</HTML>
В чем преимущества свойства Write для создания страницы? Гибкость. Эта страница фактически сгенерирована на клиентском компьютере. Если необходимо отображать дату и время открытия страницы, то надо добавить следующую строку кода VBScript.
Document.Write "This page was opened on " & date() & _
", at" & time()
'(Эта страница была открыта... в. . . )
Метод Write предусматривает большую гибкость. Можно написать более сложный VBScript-код для создания на лету сложных страниц. Например, можно запросить пользователя о его имени и индивидуализировать Web-страницу следующим образом.
UserNaine = InputBox("Please enter your name")
' (Введите, пожалуйста, ваше имя)
Document.Write "<Hl>Welcome to our Active Pages," &
