<Script Language="VB" RunAt="Server">
Function createdatasource()
Dim conn AS SQLConnection
Dim connstr As String
Dim strsql AS String
Dim sqlCmd AS SQLDataSetCommand
Dim ds AS New DataSet
'串連資料庫
connstr=
"Server=NHGA-D36KQ26TWB;DataBase=NorthWind;Pwd=;Uid=sa"
conn= New SQLConnection(connstr)
'SQL語句
strsql="Select * from Products "
'建立DataSet
sqlCmd=New SQLDataSetCommand(strsql,conn)
'將表Products加入DataSet
sqlCmd.FillDataset(ds,"Products")
return ds.Tables("Products").DefaultView
end Function
'綁定資料函數
sub BindGrid()
DataGrid1.DataSource=CreateDataSource()
DataGrid1.DataBind()
End Sub
'頁面登入
Sub Page_Load(Source AS Object,E AS EventArgs)
CreatedataSource()
BindGrid()
End Sub
</Script>
三)資料排序
資料排序不是在SQL語句裡面就可以設定嗎,為什麼還要專門來一個資料排序?SQL語句的資料排序只能伺服器端設定,如果使用者希望按照自己的喜好排序怎麼辦?ASP裡面是沒有辦法解決的,現在,我們看看ASP.NET怎樣解決這個問題。
在DataGrid設定裡面加入一下語句:
AllowSorting="true"
OnSortCommand="Sort_Grid"
第一句表示DataGrid採用要求排序;第二局表示點擊排序以後的事件;我們來看看這個事件:
Sub Sort_Grid(Sender As Object,E As DataGridSortCommandEventArgs)
SortField=E.SortField
DataGrid1.DataSource=CreateDataSource()
DataGrid1.DataBind()
End Sub
點擊排序以後,首先,設定排序欄位為點擊的欄位,如何重新顯示資料。效果如下:
四) 資料編輯
資料庫操作出了資料瀏覽,最大部分其實就是對資料的處理(增加,修改,刪除)。資料處理,ASP.NET和ASP沒有太多的區別,我們看一個增加資料的例子就可以瞭解ASP.NET的資料編輯的實現了。
Sub InsertRec()
Dim conn AS SQLConnection
Dim connstr As String
Dim sqlinsertcmd AS SQLCommand
Dim sqlinsert AS String
connstr="Server=NHGA-D36KQ26TWB;DataBase=MyBase;Pwd=;Uid=sa"
conn= New SQLConnection(connstr)
sqlinsert="Insert Into MyTable(title,name,content) Values(@title,@name,@content)"
sqlinsertcmd=New SQLCommand(sqlinsert,conn)