<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>请大家作详细注释!谢谢

解决方案 »

  1.   

    打开数据库
    进行数据查询,结果SqlDataReader dr里,然后绑定到MyDataGrid
      

  2.   

    Dim MyConnection As SqlConnection = New SqlConnection("server=(local)\NetSDK;database=pubs;Trusted_Connection=yes")//定义数据库连接字符串 
            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()//关闭连接