asp下如何在ADO服务器端利用好缓存技术？

请看下面示例，这是一个用来显示图书分类的例子程序：

displayBooks.asp

1. < %@ LANGUAGE=JavaScript % >   
2. < html >   
3. < body >   
4. < form method=post >   
5. 图书分类； < %= getBooksListBox() % >   
6. < p>   
7. < input type=submit >   
8.  
9. < %   
10. function getBooksListBox()   
11. {   
12. BooksListBox = Application("BooksListBox")   
13. if (BooksListBox != null) return BooksListBox;   
14. crlf = String.fromCharCode(13, 10)   
15. BooksListBox = "< select name=Books>" + crlf;   
16. SQL = "SELECT * FROM Books ORDER BY Name";   
17. cnnBooks = Server.CreateObject("ADODB.Connection");   
18. cnnBooks.Open("Books", "Admin","");   
19. rstBooks = cnnBooks.Execute(SQL);   
20. fldBookName = rstBooks("BookName");   
21. while (!rstBooks.EOF){   
22. BooksListBox = BooksListBox + " < option>" +   
23. fldBookName + "" + crlf;   
24. rstBooks.MoveNext();   
25. }   
26. BooksListBox = BooksListBox + ""   
27. Application("BooksListBox") = BooksListBox  
28.  
29. ' 注意这句，Application技术的精华应哦  
30. return BooksListBox;   
31. }   
32. % >