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