Несколько слов о тэгах ASP.
Тэг <% %> используется для обозначения любого сценария, который должен исполняться сервером. Клиент никогда не видит кода внутри этого тэга.
Тэг <%= %> предназначен для записи HTML-кода в том месте передаваемого документа, где находится этот тэг.
Пример 1
<% intCount = 10%>
Присваивает переменной intCount значение 10.
Пример 2
<% = intCount %>
Вставляет в HTML-документ значение переменной intCount. На экране мы увидим число 10.
Какой бы тэг ни был использован, клиент не будет знать содержимого сценария. Вместо этого он увидит HTML-код, который исполнил сценарий. Вот так !!!
ASP-сервер различает сценарии для клиента и сервера по атрибуту RUNAT. Если значение равно "server", то ASP анализирует, компилирует и выполняет данный сценарий. В противном случае сценарий передается клиенту.
<SCRIPT LANGUAGE="vbscript" RUNAT="server"> </SCRIPT>
Продолжаем редактировать нашу страницу Test1.asp
Дополняем ее кодом для выполнения запроса к БД.
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<P>ASP по шагам</P>
<%
' Следующая строка обращается к объекту Server и создает соединение:
Set Conn = Server.CreateObject("ADODB.Connection")
' Строка открытия сессии использует нашу глобальную переменную, объявленную
в файле GLOBAL.ASA (Шаг 2)
Conn.Open Session("DBConnectionString")
'Открываем RecordSet с именем RS, используя для этого SQL запрос к БД
DoubleInfo и таблице T_InfoRub.
Set RS = Conn.Execute("select * from DoubleInfo..T_InfoRub")
%>
' Начинаем цикл по нашему RecordSet
<% Do While Not RS.EOF %>
' Выводим значение поля FldStrName таблицы T_InfoRub
<%=RS("FldStrName")%>
' Начинаем новую строку для следующей записи
</br>
<%
' Переходим к следующей записи
RS.MoveNext
' Конец цикла по записям
Loop
' Закрываем RecordSet
RS.Close
' Закрываем соединение
Conn.Close
%>
</BODY>
</HTML>
Оказывается, все очень просто !!!
В следующем шаге мы узнаем, почему после изменения данных в таблице мы не видим этого в нашей активной странице.