|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来;ASP页面
作者:青苹果电脑事情室
这个例子中的第一站是ASP页。这个ASP页用ADO与Northwind数据库毗连。为了坚持优秀的编码习气,我
利用了OptionExplicit并明白地声了然一切变量。这个ASP页的第一个草稿利用了内联代码。
<%@LANGUAGE=VBScript%>
<%
ExampleofInlinecode
OptionExplicit
Declarevariables
DimoConn
DimoRS
DimConnectionString
Dimx
ConnectionString="DSN=Northwind;"
SetoConn=Server.CreateObject("ADODB.Connection")
oConn.OpenConnectionString
SetoRS=Server.CreateObject("ADODB.Recordset")
Setvariables
oRS.ActiveConnection=oConn
oRS.Source="Select*fromProducts"
oRS.Open
%>
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=windows-1252">
<title>NewPage1</title>
</head>
<body>
<h1>Products</h1>
<tablecellspacing="2"cellpadding="5">
<trbgcolor="#FF6666">
<th>ProductName</th>
<th>QuantityPerUnitr</th>
<th>Price</th>
</tr>
<%
DountiloRS.EOF
Ifx=1then
x=0
%>
<trbgcolor="#ffcccc">
<%else%>
<tr>
<%
x=1
endif
%>
<td><%=oRS("ProductName")%></td>
<td><%=oRS("QuantityPerUnit")%></td>
<td><%=oRS("UnitPrice")%></td>
</tr>
<%
oRS.MoveNext
Loop
%>
</table>
</body>
</html>
<%
Destroyobjects
SetoRS=Nothing
SetoConn=Nothing
%>
</p>asp是基于web的一种编程技术,可以说是cgi的一种。它可以完成以往cgi程序的所有功能,如计数器、留言簿、公告板、聊天室等等。 |
|