請看下面示例,這是一個用來顯示圖書分類的例子程序:
displayBooks.asp
<%@LANGUAGE=JavaScript%>
<html>
<body>
<formmethod=post>
圖書分類;<%=getBooksListBox()%>
<p>
<inputtype=submit>
<%
functiongetBooksListBox()
{
BooksListBox=Application("BooksListBox")
if(BooksListBox!=null)returnBooksListBox;
crlf=String.fromCharCode(13,10)
BooksListBox="<selectname=Books>"+crlf;
SQL="SELECT*FROMBooksORDERBYName";
cnnBooks=Server.CreateObject("ADODB.Connection");
cnnBooks.Open("Books","Admin","");
rstBooks=cnnBooks.Execute(SQL);
fldBookName=rstBooks("BookName");
while(!rstBooks.EOF){
BooksListBox=BooksListBox+"<option>"+
fldBookName+""+crlf;
rstBooks.MoveNext();
}
BooksListBox=BooksListBox+""
Application("BooksListBox")=BooksListBox
'注意這句,Application技術的精華應哦
returnBooksListBox;
}
%>