<%@import namespace="system.data.SQL"%>
<%@OutputCache Duration = "3600"%>
/*
这个 OutputCache 的前缀的意思是 这个页面
在 server 被保持的 时间的长度 单位是 秒
我现在把这个程序的 保持时间 设置成为 3600 也就是一个小时
这样，即使你对 数据库 的 数据进行 任何的 改变 程序都不会去理睬
仍然显示的是 你的 没有修改的以前的 数据
*/
<SCRIPT LANGUAGE="vb" RUNAT="server">
Sub Page_Load(myList AS Object,E as EventArgs)
Dim dbRead AS SQLDataReader
Dim dbComm AS SQLCommand
Dim SQLserver AS String
Dim SQL AS String
conn = "server=localhost;uid=sa;password=;database=doufu"
'这个是另外一种 连接 数据库 的方法，我们不需要去 创建一个 SQLConnection
’性质 其实是 一样的
SQL = "Select * from msgboard"
dbComm = New SQLCommand(SQL,conn)
dbComm.ActiveConnection.Open()
dbComm.execute(dbRead)
While dbRead.Read()
'这里简单的介绍了 asp+ 中对 dropdownlist 的简单操作办法
test.items.add(New ListItem(dbRead.Item("msgTitle")))
End While
End Sub
</SCRIPT>
<FORM RUNAT="server" method="get">
<asp:DropDownList id="test" runat="server"/>
</FORM>

作者:豆腐(原创)

（出处：）