<script language="VB" runat="server"> Sub Page_Load(Sender As Object, E As EventArgs) Dim MyConnection As SqlConnection = New SqlConnection("server=(local)\NetSDK;database=pubs;Trusted_Connection=yes")
Dim MyCommand As SqlCommand = New SqlCommand("select * from Authors", MyConnection) MyConnection.Open() Dim dr As SqlDataReader = MyCommand.ExecuteReader() MyDataGrid.DataSource = dr
MyDataGrid.DataBind() MyConnection.Close()
End Sub</script>请大家作详细注释!谢谢
Dim MyCommand As SqlCommand = New SqlCommand("select * from Authors", MyConnection) MyConnection.Open() Dim dr As SqlDataReader = MyCommand.ExecuteReader() MyDataGrid.DataSource = dr
MyDataGrid.DataBind() MyConnection.Close()
End Sub</script>请大家作详细注释!谢谢
进行数据查询,结果SqlDataReader dr里,然后绑定到MyDataGrid
Dim MyCommand As SqlCommand = New SqlCommand("select * from Authors", MyConnection)//定义SQL查询 MyConnection.Open()//打开数据库 Dim dr As SqlDataReader = MyCommand.ExecuteReader()//运行查询并返回SqlDataReader MyDataGrid.DataSource = dr
MyDataGrid.DataBind()//绑定数据源 MyConnection.Close()//关闭连接