dotConnect for SQLite Documentation
Devart.Common Namespace / DbScript Class
Members Example

DbScript Class
Serves to execute series of SQL statements separated by special symbols.
Syntax
'Declaration
 
Public MustInherit Class DbScript 
   Inherits System.ComponentModel.Component
   Implements System.ComponentModel.IComponentSystem.IDisposable 
 
Remarks

Use DbScript to consecutively execute several SQL statements stored in ScriptText property. DbScript allows to execute them all at once or one by one. You can use Progress event to monitor execution flow and Error to catch errors.

There are three ways to execute a script:

- using Execute method;

- using ExecuteNext method;

- using SqlStatement.SqlStatement.Execute method.

For more information refer to corresponding method.
Example
This sample demonstrates how to execute script and retrieve information about execution flow using Progress and Error events.
[STAThread]
static void Main(string[] args)
{
string script =
@"CREATE TABLE DEPT (
  DEPTNO INTEGER PRIMARY KEY,
  DNAME VARCHAR(14),
  LOC VARCHAR(13)
);"+
  "INSERT INTO DEPT VALUES (10,'ACCOUNTING','NEW YORK');"+
  "INSERT INTO DEPT VALUES (20,'RESEARCH','DALLAS');"+
  "INSERT INTO DEPT VALUES (30,'SALES','CHICAGO');"+
  "INSERT INTO DEPT VALUES (40,'OPERATIONS','BOSTON');"+
  "SELECT * FROM DEPT";
      SQLiteConnection sqConn = new SQLiteConnection(
          "DataSource=mydatabase.db;");
      SQLiteScript sqScript = new SQLiteScript(script,sqConn);
      sqScript.Progress += new Devart.Common.ScriptProgressEventHandler(OnProgress);
      sqScript.Error += new Devart.Common.ScriptErrorEventHandler(OnError);
      sqConn.Open();
      sqScript.Execute();
      sqConn.Close();
    }

static void OnProgress(object sender, Devart.Common.ScriptProgressEventArgs e)
{
  Console.WriteLine(e.Text);
  Console.WriteLine("  Successfully executed.");
}

static void OnError(object sender, Devart.Common.ScriptErrorEventArgs e)
{
  e.Ignore = true;
  Console.WriteLine(e.Text);
  Console.WriteLine("  Failed.");
}
Module Module1

  Friend WithEvents sqScript As Devart.Data.SQLite.SQLiteScript

  Sub Main()
    Dim script As String = _
@"CREATE TABLE DEPT (" & _
  "  DEPTNO INTEGER PRIMARY KEY," & _
  "  DNAME VARCHAR(14)," & _
  "  LOC VARCHAR(13)" & _
  ");" & _
  "INSERT INTO DEPT VALUES (10,'ACCOUNTING','NEW YORK');" & _
  "INSERT INTO DEPT VALUES (20,'RESEARCH','DALLAS');" & _
  "INSERT INTO DEPT VALUES (30,'SALES','CHICAGO');" & _
  "INSERT INTO DEPT VALUES (40,'OPERATIONS','BOSTON');" & _
  "SELECT * FROM DEPT"
    Dim sqConn As SQLiteConnection = New SQLiteConnection( _
        "DataSource=mydatabase.db;")
    sqScript = New SQLiteScript(script, sqConn)
    sqConn.Open()
    sqScript.Execute()
    sqConn.Close()
    Console.ReadLine()
  End Sub

  Sub OnProgress(ByVal sender As Object, ByVal e As Devart.Common.ScriptProgressEventArgs) Handles sqScript.Progress
    Console.WriteLine(e.Text)
    Console.WriteLine("  Successfully executed.")
  End Sub

  Sub OnError(ByVal sender As Object, ByVal e As Devart.Common.ScriptErrorEventArgs) Handles sqScript.Error
    e.Ignore = True
    Console.WriteLine(e.Text)
    Console.WriteLine("  Failed.")
  End Sub

End Module
Inheritance Hierarchy

System.Object
   System.MarshalByRefObject
      System.ComponentModel.Component
         Devart.Common.DbScript
            Devart.Data.SQLite.SQLiteScript

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