Statements Property

In This Topic

Gets the collection of statements that make up the script.

Syntax

Visual Basic
C#

'Declaration
 
Public ReadOnly Property Statements As SqlStatementCollection

public SqlStatementCollection Statements {get;}

Property Value

Collection of statements.

Remarks

Use Statements to obtain SqlStatementCollection which allows to access individual statements of the script and execute them manually. The collection is read-only so you can not modify it in any way. It is also bound to originating DbScript object, which means that if you have altered ScriptText, previously obtained collection will be cleared.

Example

This sample shows how to retrieve collection of statements that make up the script and execute them one by one.

csharp

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";
DB2Connection db2Conn = new DB2Connection(
    "user id=db2admin;server=db2;database=SAMPLE;");
DB2Script db2Script = new DB2Script(script,db2Conn);
SqlStatementCollection db2Coll = db2Script.Statements;
IDataReader db2Reader;
db2Conn.Open();
foreach (SqlStatement db2Statement in db2Coll)
{
  Console.WriteLine(db2Statement.Text);
  try
  {
    db2Reader = db2Statement.Execute();
    Console.WriteLine("  Records affected " + db2Reader.RecordsAffected); 
    while (db2Reader.Read()) 
    { 
      Console.WriteLine(db2Reader.GetString(0)); 
    } 
    db2Reader.Close(); 
    Console.WriteLine();
  }
  catch
  {
    Console.WriteLine("  Failed");
  }
}
db2Conn.Close();

Visual Basic

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 db2Conn As DB2Connection = New DB2Connection( _
    "user id=db2admin;server=db2;database=SAMPLE;")
Dim db2Script As DB2Script = New DB2Script(script, db2Conn)
Dim db2Coll As SqlStatementCollection = db2Script.Statements
Dim db2Reader As IDataReader
db2Conn.Open()
For Each db2Statement As SqlStatement In db2Coll
  Console.WriteLine(db2Statement.Text)
  Try
    db2Reader = db2Statement.Execute()
    Console.WriteLine("  Records affected " & db2Reader.RecordsAffected)
    While db2Reader.Read()
      Console.WriteLine(db2Reader.GetString(0))
    End While
    db2Reader.Close()
    Console.WriteLine()
  Catch ex As Exception
    Console.WriteLine("  Failed")
  End Try
Next db2Statement
db2Conn.Close()

Reference

DbScript Class
DbScript Members
SqlStatementCollection Class
ScriptText Property

Send Feedback