DataGrid简单连接Oracle

1. 在datagrid里创建4个BoundColumn和一个LinkButton。
<asp:DataGrid id="DataGrid1" style="Z-INDEX: 110; LEFT: 16px; POSITION: absolute; TOP: 168px"
Visible="True" runat="server" AutoGenerateColumns="False">
<Columns>
<asp:BoundColumn DataField="ID" HeaderText="ID"></asp:BoundColumn>
<asp:BoundColumn DataField="NUM1" HeaderText="NUM1"></asp:BoundColumn>
<asp:BoundColumn DataField="NUM2" HeaderText="NUM2"></asp:BoundColumn>
<asp:BoundColumn DataField="NUM3" HeaderText="NUM3"></asp:BoundColumn>
<asp:EditCommandColumn ButtonType="LinkButton" UpdateText="Update" HeaderText="Edit!" CancelText="Cancel"
EditText="Edit"></asp:EditCommandColumn>
</Columns>
</asp:DataGrid>
2.通过OracleConnection的open语句获得数据
Dim OraclDataSet As DataSet
Dim OraclDataAd As OracleDataAdapter
Dim OrclCnn As OracleConnection
Try
OrclCnn = New OracleConnection
OrclCnn.ConnectionString = "Data Source=edc81;User Id=test;Password=test"
OracleConnection1.Open()
OraclDataSet = New DataSet
OraclDataAd = New OracleDataAdapter("select ID,NUM1,NUM2,NUM3 from test1", OrclCnn)
OraclDataAd.Fill(OraclDataSet)
OracleConnection1.Close()
DataGrid1.DataSource = OraclDataSet.Tables(0).DefaultView
DataGrid1.DataBind()
Catch ex As Exception
Throw ex
Finally

End Try
3.通过OracleDataAdapter的Fill函数获得数据，并自动关闭连接
Dim OraclDataSet As DataSet
Dim OraclDataAd As OracleDataAdapter
Dim OrclCnn As OracleConnection
Try
OrclCnn = New OracleConnection
OrclCnn.ConnectionString = "Data Source=edc81;User Id=test;Password=test"

OraclDataSet = New DataSet
OraclDataAd = New OracleDataAdapter("select ID,NUM1,NUM2,NUM3 from test1", OrclCnn)
OraclDataAd.Fill(OraclDataSet)

DataGrid1.DataSource = OraclDataSet.Tables(0).DefaultView
DataGrid1.DataBind()
Catch ex As Exception
Throw ex
Finally

End Try
4. datagrid的Edit事件
Private Sub DataGrid1_EditCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.EditCommand
DataGrid1.EditItemIndex = e.Item.ItemIndex
BindDataGrid()
End Sub
5. datagrid的Cancel事件
Private Sub DataGrid1_CancelCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.CancelCommand
DataGrid1.EditItemIndex = -1
BindDataGrid()
End Sub
6. datagrid的Update事件
Private Sub DataGrid1_UpdateCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.UpdateCommand
''略
End Sub