Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
Dim MyConnection As SqlConnection = New SqlConnection(Application("ConnectionString"))
MyConnection.Open()
Dim MyCommand As SqlDataAdapter = New SqlDataAdapter("select * from operator", MyConnection)
Dim ds As DataSet
ds = New DataSet
MyCommand.Fill(ds, "operator")
DataGrid1.DataSource = ds.Tables("operator").DefaultView
DataGrid1.DataBind()
MyConnection.Close()
End Sub
End Class
Sub GetAuthors_Click(Sender As Object, E As EventArgs)
Dim DS As DataSet
Dim MyConnection As SqlConnection
Dim MyCommand As SqlDataAdapter
Dim SelectCommand As String = "select * from Authors where state = @State"
MyConnection = New SqlConnection("server=(local)\NetSDK;database=pubs;Trusted_Connection=yes")
MyCommand = New SqlDataAdapter(SelectCommand, MyConnection)