请看下面示例,这是一个用来显示图书分类的例子程序:
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;
- }
- % >