dotConnect for SQLite Documentation
Devart.Data.SQLite Namespace / SQLiteDataTable Class / InsertCommand Property
Example

InsertCommand Property (SQLiteDataTable)
Gets or sets a SQLite statement to insert new records into the data source.
Syntax
'Declaration
 
Public Shadows Property InsertCommand As SQLiteCommand
 

Property Value

A SQLiteCommand used during an update operation to insert records in the data source that correspond to new rows in the System.Data.DataSet.
Remarks
InsertCommand uses its own Connection if it is created. Otherwise InsertCommand uses Connection.
Example
This sample shows how to modify and display data using SQLiteDataTable.
public void UseDataTable(SQLiteConnection sqConnection)
{
  SQLiteDataTable myDataTable = new SQLiteDataTable("SELECT * FROM Dept", sqConnection);
  try
  {
    myDataTable.Active = true;
    myDataTable.Rows.Add(new object[] {30,"Sales2"});
    myDataTable.InsertCommand = new SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " +
      "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection);
    myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo");
    myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName");
    Console.WriteLine(myDataTable.Update()+" rows updated.");
    myDataTable.Active = false;
    //Refresh the table to check custom updates
    myDataTable.Active = true;                  
    foreach(DataRow myRow in myDataTable.Rows)
    {
      foreach(DataColumn myCol in myDataTable.Columns)
      {
        Console.Write(myRow[myCol]+"\t");
      }
      Console.WriteLine();
    }
  }
  finally
  {
    myDataTable.Active = false;
  }
}
public void UseDataTable(SQLiteConnection sqConnection)
{
        SQLiteDataTable myDataTable = new SQLiteDataTable("SELECT * FROM Dept", sqConnection);
        try
        {
                myDataTable.Active = true;
                myDataTable.Rows.Add(new object[] {30,"Sales2"});
                myDataTable.InsertCommand = new SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " +
                "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection);
                myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo");
                myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName");
                Console.WriteLine(myDataTable.Update()+" rows updated.");
                myDataTable.Active = false;
                //Refresh the table to check custom updates
                myDataTable.Active = true;                  
                foreach(DataRow myRow in myDataTable.Rows)
                {
                        foreach(DataColumn myCol in myDataTable.Columns)
                        {
                                Console.Write(myRow[myCol]+"\t");
                        }
                        Console.WriteLine();
                }
        }
        finally
        {
                myDataTable.Active = false;
        }
}
Public Sub UseDataTable(ByVal sqConnection As SQLiteConnection)
  Dim myDataTable As SQLiteDataTable = New SQLiteDataTable("SELECT * FROM Dept", sqConnection)
  Try
    myDataTable.Active = True
    Dim rowVals() As Object = {30, "Sales2"}
    myDataTable.Rows.Add(rowVals)
    myDataTable.InsertCommand = New SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " & _
        "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection)
    myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo")
    myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName")
    Console.WriteLine(myDataTable.Update() & " rows updated.")
    myDataTable.Active = False
    ' Refresh the table to check custom updates
    myDataTable.Active = True
    Dim myRow As DataRow
    Dim myCol As DataColumn
    For Each myRow In myDataTable.Rows
      For Each myCol In myDataTable.Columns
        Console.Write(myRow(myCol) & Chr(9))
      Next myCol
      Console.WriteLine()
    Next myRow
  Finally
    myDataTable.Active = False
  End Try
End Sub
Public Sub UseDataTable(ByVal sqConnection As SQLiteConnection)
        Dim myDataTable As SQLiteDataTable = New SQLiteDataTable("SELECT * FROM Dept", sqConnection)
        Try
                myDataTable.Active = True
                Dim rowVals() As Object = {30, "Sales2"}
                myDataTable.Rows.Add(rowVals)
                myDataTable.InsertCommand = New SQLiteCommand("INSERT INTO Dept (DeptNo, DName, Loc) " & _
                "VALUES (:DeptNo, :DName, 'Unverified')", sqConnection)
                myDataTable.InsertCommand.Parameters.Add("DeptNo", SQLiteType.Int32, 0, "DeptNo")
                myDataTable.InsertCommand.Parameters.Add("DName", SQLiteType.Text, 15, "DName")
                Console.WriteLine(myDataTable.Update() & " rows updated.")
                myDataTable.Active = False
                ' Refresh the table to check custom updates
                myDataTable.Active = True
                Dim myRow As DataRow
                Dim myCol As DataColumn
                For Each myRow In myDataTable.Rows
                        For Each myCol In myDataTable.Columns
                                Console.Write(myRow(myCol) & Chr(9))
                Next myCol
                Console.WriteLine()
                Next myRow
        Finally
                myDataTable.Active = False
        End Try
End Sub
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also