可以把这两个组件放在Application里面,在其他页面里读取这个Application。
但是把Connection放在Application里面并不能节省资源。

解决方案 »

  1.   

    动态实现        Dim cnn As New OleDb.OleDbConnection()
            Dim cnstr As String = "Provider = SQLOLEDB.1;Password=mvb1234;Persist Security Info=True;User ID=sa;Initial Catalog=tfmsdb;Data Source=mvb"
            Dim dc As OleDb.OleDbDataAdapter
            Dim ds As New DataSet()
            Dim dr As DataRow
            Dim mytable As DataTable
            cnn.ConnectionString = cnstr
            cnn.Open()
            dc = New OleDb.OleDbDataAdapter("select top 20 * from person", cnstr)
            dc.Fill(ds, "person")
            mytable = ds.Tables("person")
            DataGrid1.DataSource = ds.Tables("person")
            DataGrid1.DataBind()
            DataGrid1.DataMember = mytable.TableName