?? 9-2.aspx
字號:
<%@import namespace="System.Data.SqlClient"%>
<script language=“VB” runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim SQLText as String = "SELECT * FROM authors"
Dim cnString as string = "server=localhost;uid=sa;pwd=;database=pubs;"
Dim dbRead AS SQLDataReader
Dim SQLCmd AS SQLCommand
SQLCmd = New SQLCommand(SQLText,cnString)
SQLCmd.ActiveConnection.Open()
SQLCmd.execute(dbread)
while dbRead.Read()
response.write("<br>" & dbRead.Item("au_lname"))
End while
End Sub
</script>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -