IDalCommand.Connection

Синтаксис

Connection: IDalConnection;

Описание

Свойство Connection возвращает ссылку на интерфейс IDalConnection, управляющий текущим соединением с базой данных.

Пример

Sub Main;

Var

MB: IMetabase;

DB: IDatabaseInstance;

Com: IDalCommand;

Conn: IDalConnection;

Proc: IDalProcedures;

ParamInfo, ValueParam: IArrayList;

i: Integer;

ProcFields: IDalCursorFields;

ProcField: IDalCursorField;

Begin

MB := MetabaseClass.Active;

DB := MB.ItemById("BD").Open(Null) As IDatabaseInstance;

Com := DB.Connection.CreateCommand("");

Conn := Com.Connection;

Proc := Conn.Procedures("Proc_1");

ParamInfo := New ArrayList.Create;

ValueParam := New ArrayList.Create;

ProcFields := Proc.Fields;

While Not Proc.Eof Do

For i := 0 To ProcFields.Count - 1 Do

ProcField := ProcFields.Item(i);

ParamInfo.Add(ProcField.Name);

ValueParam.Add(ProcField.Value);

End For;

Proc.Next;

End While;

Conn.Close;

Com.Close;

For i := 0 To ParamInfo.Count - 1 Do

Debug.Write(ParamInfo.Item(i));

Debug.Write(" = ");

Debug.WriteLine(ValueParam.Item(i));

End For;

End Sub Main;

После выполнения примера произойдет подключение к базе данных «BD». На базе данного соединения будет получен курсор, содержащий информацию о процедуре "Proc_1", после чего в массивы ParamInfo и ValueParam будет считана эта информация. Данная информация будет выведена в консоль среды разработки.

См. также:

IDalCommand