Практикум для изучения возможностей работы в СУБД Access. Устюгова В.Н. - 60 стр.

UptoLike

Составители: 

60
3. Связать созданный объект с открытым ранее соединением:
MyCommand.ActiveConnection = MyConn
4. Указать тип и текст команды. Для этого используются свойства CommandType и
CommandText. В приведенном ниже отрывке кода в качестве текста команды указывается
текст SQL-оператора и соответствующий тип команды:
MyComm.CommandText = "Delete * from [Временная];"
MyComm.CommandType = adCmdText
5. При необходимости задать значения других свойств, например, время ожидания
завершения команды CommandTimeout.
6. Осталось только выполнить команду при помощи метода Execute: MyComm.Execute. В
зависимости от типа выполняемой команды есть некоторые различия в использовании
метода Execute. Эти различия поясняются в приведенных ниже примерах.
Использование объекта Command для запуска запроса на выполнение
В этом примере создается объект MyComm типа Command. При помощи свойства
ActiveConnection объект Command связывается с открытым соединением (объектом типа
Connection). В качестве текста команды указывается строка SQL-оператора,
предназначенного для удаления всех записей из таблицы Временная, а в качестве значения
свойства CommandType задается константа adCmdText. В заключение примера
освобождается память и ресурсы, занятые объектами.
Dim MyConn As ADODB.Connection
Dim ConStr As String
Dim MyComm AS ADODB.Command
ConStr="Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\db2.mdb"
Set MyConn= New ADODB.Connection
MyConn.Open ConStr
Set MyComm = New ADODB.Command
MyCommand.ActiveConnection = MyConn
MyComm.CommandText = "Delete * from [Временная];"
MyComm.CommandType = adCmdText
MyComm. Execute
MyConn.Close
Set MyConn = Nothing
Set MyComm = Nothing
Использование объекта Command для возвращения набора записей
Начало этого примера напоминает начало предыдущего примера. Отличие состоит в
следующем. В дополнение к другим объектам объявляется и создается экземпляр объекта
типа Recordset. В качестве текста команды для объекта MyComm указывается имя таблицы
Временная, а для свойства CommandType задается соответствующая константа
adCmdTable. Обратите внимание на формат использования метода Execute. Поскольку в
этом случае в результате его выполнения возвращается набор записей, то применена
конструкция SET, инициализирующая переменную MyRec. В результате выполнения этой
строки кода набор данных будет открыт, то есть отпадает необходимость использования
3. Связать созданный объект с открытым ранее соединением:
MyCommand.ActiveConnection = MyConn

4. Указать тип и текст команды. Для этого используются свойства CommandType и
CommandText. В приведенном ниже отрывке кода в качестве текста команды указывается
текст SQL-оператора и соответствующий тип команды:
MyComm.CommandText = "Delete * from [Временная];"
MyComm.CommandType = adCmdText

5. При необходимости задать значения других свойств, например, время ожидания
завершения команды CommandTimeout.
6. Осталось только выполнить команду при помощи метода Execute: MyComm.Execute. В
зависимости от типа выполняемой команды есть некоторые различия в использовании
метода Execute. Эти различия поясняются в приведенных ниже примерах.

     Использование объекта Command для запуска запроса на выполнение

     В этом примере создается объект MyComm типа Command. При помощи свойства
ActiveConnection объект Command связывается с открытым соединением (объектом типа
Connection). В качестве текста команды указывается строка SQL-оператора,
предназначенного для удаления всех записей из таблицы Временная, а в качестве значения
свойства CommandType задается константа adCmdText. В заключение примера
освобождается память и ресурсы, занятые объектами.


Dim MyConn As ADODB.Connection
Dim ConStr As String
Dim MyComm AS ADODB.Command

ConStr="Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\db2.mdb"
Set MyConn= New ADODB.Connection
MyConn.Open ConStr

Set MyComm = New ADODB.Command
MyCommand.ActiveConnection = MyConn
MyComm.CommandText = "Delete * from [Временная];"
MyComm.CommandType = adCmdText
MyComm. Execute

MyConn.Close
Set MyConn = Nothing
Set MyComm = Nothing

             Использование объекта Command для возвращения набора записей

     Начало этого примера напоминает начало предыдущего примера. Отличие состоит в
следующем. В дополнение к другим объектам объявляется и создается экземпляр объекта
типа Recordset. В качестве текста команды для объекта MyComm указывается имя таблицы
Временная, а для свойства CommandType задается соответствующая константа
adCmdTable. Обратите внимание на формат использования метода Execute. Поскольку в
этом случае в результате его выполнения возвращается набор записей, то применена
конструкция SET, инициализирующая переменную MyRec. В результате выполнения этой
строки кода набор данных будет открыт, то есть отпадает необходимость использования
                                            60