'Declaration Public Class SqlScript Inherits Devart.Common.DbScript Implements System.ComponentModel.IComponent, System.IDisposable
public class SqlScript : Devart.Common.DbScript, System.ComponentModel.IComponent, System.IDisposable
'Declaration Public Class SqlScript Inherits Devart.Common.DbScript Implements System.ComponentModel.IComponent, System.IDisposable
public class SqlScript : Devart.Common.DbScript, System.ComponentModel.IComponent, System.IDisposable
Often it is necessary to execute several SQL statements one by one. It can be performed by using a lot of components such as SqlCommand. Usually it isn't a good solution. With only one SqlScript component you can execute several SQL statements as one. This sequence of statements is named script. To separate individual statements use semicolon (;) symbol.
[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"; SqlConnection myConn = new SqlConnection( "User Id=sa;Server=localhost;Initial Catalog=Test;"); SqlScript myScript = new SqlScript(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.Data.SqlServer.SqlScript 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 SqlConnection = New SqlConnection( _ "User Id=sa;Server=localhost;Initial Catalog=Test;") myScript = New SqlScript(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
System.Object
System.MarshalByRefObject
System.ComponentModel.Component
Devart.Common.DbScript
Devart.Data.SqlServer.SqlScript