dotConnect Universal Documentation
Devart.Data.Universal Namespace / UniScript Class
Members Example

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

Often it is necessary to execute several SQL statements one by one. It can be performed by using a lot of components such as UniCommand. Usually it isn't a good solution. With only one UniScript component you can execute several SQL statements as one. This sequence of statements is named script. To separate single statements use semicolon (;) symbol.

When UniScript encounters a BEGIN keyword in the script, it looks for a slash symbol "/" in the first position of some consecutive line. Everything between the BEGIN and the slash is considered single block. Usually the slash is placed after the line containing END keyword. You do not have to place slash after nested BEGIN...END block.

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 =

  "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";
      UniConnection myConn = new UniConnection("Provider=SQL Server;Data Source=SERVER;Initial Catalog=Northwind;User ID=sa");
      UniScript myScript = new UniScript(script,myConn);
      myScript.Progress += new Devart.Common.ScriptProgressEventHandler(OnProgress);
      myScript.Error += new Devart.Common.ScriptErrorEventHandler(OnError);
      myConn.Open();
      myScript.Execute();
      myConn.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 myScript As Devart.Uni.UniScript

  Sub Main()
    Dim script As String = _

  "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 myConn As UniConnection = New UniConnection("Provider=SQL Server;Data Source=SERVER;Initial Catalog=Northwind;User ID=sa")
    myScript = New UniScript(script, myConn)
    myConn.Open()
    myScript.Execute()
    myConn.Close()
    Console.ReadLine()
  End Sub

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

  Sub OnError(ByVal sender As Object, ByVal e As Devart.Common.ScriptErrorEventArgs) Handles myScript.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.Universal.UniScript

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