?? global.asax
字號:
<%@ Import Namespace="System.IO" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script language="VB" runat="server">
Sub Application_Start(Sender As Object, E As EventArgs)
' Do application startup code here
Dim dv as DataView
Dim i as integer
Dim myConnection As OleDbConnection
Dim myCommand As OleDbDataAdapter
Dim ds As New DataSet
Dim ConnStr As String
Dim SQL As String
ConnStr = "Provider=SQLOLEDB; Data Source=(local); Initial Catalog=ASPNET;User ID=sa;"
myConnection = New OleDbConnection(ConnStr)
SQL = "select * from groups "
myCommand = New OleDbDataAdapter(SQL, myConnection)
myCommand.Fill(ds, "groups")
dv = new DataView(ds.Tables("groups"))
Application("Source") = dv
End Sub
</script>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -