asp下如何在ADO服务器端利用好缓存技术?
请看下面示例,这是一个用来显示图书分类的例子程序:
displayBooks.asp
%@ LANGUAGE=JavaScript % >
html >
body >
form method=post >
图书分类; %= getBooksListBox() % >
p>
input type=submit >
%
function getBooksListBox()
{
BooksListBox = Application("BooksListBox")
if (BooksListBox != null) return BooksListBox;
crlf = String.fromCharCode(13, 10)
BooksListBox = " select name=Books>" + crlf;
SQL = "SELECT * FROM Books ORDER BY Name";
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技术的精华应哦
return BooksListBox;
}
% >