<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)