Проектирование Интернет приложений. Тузовский А.Ф. - 85 стр.

UptoLike

Составители: 

85
<% @LANGUAGE = VBScript %>
<% Set conn = Server.CreateObject("ADODB. Connection")
conn.open("Data Source=mydata; User ID=myname;Password=*****")
Set results = Server.CreateObject("ADODB.RecordSet")
Set results.ActiveConnection = conn
query = "SELECT X, Y, Z FROM TABLE1 WHERE X > 23"
results.Open query %>
<html> <head><title>Active Server Page Example</title></head>
<body id="c09-body-0003 " bgcolor="#ffffff" >
<table>
<tr>
<td align="center">X</td>
<td align="center">Y</td>
<td align="center">Z</td>
</tr>
<%
While Not results. EOF
Response.Write "<tr>"
Response.Write "<td>" &results(" X") & " </td>"
Response.Write "<td>" &results(" Y") & " </td>"
Response.Write "<td>" &results(" Z") & " </td>"
Response.Write "</tr>"
Wend
%>
</table>
</body>
</html>
Рис. 3.7. Пример описания ASP страницы и полученный результат
Первый блок, расположенный в начале шаблона, создает соедине-
ние с БД и открывает его с использованием заданных параметров под-
ключения; после этого создается объект results, который будет содер-
жать данные полученные из БД и связывается с открытым соединением;
затем описывается SQL запрос к БД query и с его помощью результаты