Execute Method (DbScript)

In This Topic

Executes the script specified in ScriptText property.

Syntax

Visual Basic
C#

'Declaration
 
Public Sub Execute()

public void Execute()

Remarks

Use Execute method to execute the script. Text of the script should be specified by ScriptText property.

After execution of each individual statement the Progress event fires. If the statement has produced an error, event Error fires.

Example

This sample demonstrates how to execute script and retrieve information about execution flow using Progress and Error events.

csharp

[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.");
}

Visual Basic

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

Reference

DbScript Class
DbScript Members
ScriptText Property
ExecuteNext Method
Progress Event
Error Event

Send Feedback