Несколько слов о тэгах 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>
Оказывается, все очень просто !!!
В следующем шаге мы узнаем, почему после изменения данных в таблице мы не видим этого в нашей активной странице.