Parameters
- row
- Row index at which to start adding rows
- count
- Number of rows to add
string conStr = "Provider=Microsoft.JET.OLEDB.4.0;data source= " + Application.StartupPath + "\\Patients2000.mdb"; string sqlStr = "SELECT * FROM Patients"; System.Data.OleDb.OleDbConnection conn = new System.Data.OleDb.OleDbConnection(conStr); DataSet ds = new DataSet(); System.Data.OleDb.OleDbDataAdapter da = new System.Data.OleDb.OleDbDataAdapter(sqlStr, conn); fpSpread1.ActiveSheet.DataAutoSizeColumns = false; fpSpread1.ActiveSheet.DataMember = "Patients"; da.Fill(ds); fpSpread1.ActiveSheet.DataSource = ds; DialogResult dlg; dlg = MessageBox.Show("Do you want to add a row to the data source?", "AddRowToDataSource", MessageBoxButtons.YesNo); if (dlg == DialogResult.Yes) { fpSpread1.ActiveSheet.AddUnboundRows(1, 2); fpSpread1.ActiveSheet.SetValue(2, 0, "Daly"); fpSpread1.ActiveSheet.SetValue(2, 1, "John"); fpSpread1.ActiveSheet.SetValue(2, 2, "111390"); fpSpread1.ActiveSheet.SetValue(2, 3, "12 Courtney Place"); fpSpread1.ActiveSheet.AddRowToDataSource(2, true); }
Dim conStr As String = "Provider=Microsoft.JET.OLEDB.4.0;data source= " & Application.StartupPath & "\Patients2000.mdb" Dim sqlStr As String = "SELECT * FROM Patients" Dim conn As New System.Data.OleDb.OleDbConnection(conStr) Dim ds As DataSet = New DataSet() Dim da As New System.Data.OleDb.OleDbDataAdapter(sqlStr, conn) FpSpread1.ActiveSheet.DataAutoHeadings = False FpSpread1.ActiveSheet.DataMember = "Patients" da.Fill(ds) FpSpread1.ActiveSheet.DataSource = ds Dim dlg As DialogResult dlg = MessageBox.Show("Do you want to add a row to the data source?", "AddRowToDataSource", MessageBoxButtons.YesNo) If dlg = DialogResult.Yes Then FpSpread1.ActiveSheet.AddUnboundRows(1, 2) FpSpread1.ActiveSheet.SetValue(2, 0, "Daly") FpSpread1.ActiveSheet.SetValue(2, 1, "John") FpSpread1.ActiveSheet.SetValue(2, 2, "111390") FpSpread1.ActiveSheet.SetValue(2, 3, "12 Courtney Place") FpSpread1.ActiveSheet.AddRowToDataSource(2, True) End If