Книга: VBA для чайников
Использование параметров команды
Использование параметров команды
Если для выполнения команды требуются входные параметры (значения, передаваемые команде при выполнении, например диапазон данных или критерий поиска), вы должны определить индивидуальные объекты Parameter, добавляя их к коллекции Parameters объекта Command. Пример, приведенный ниже, иллюстрирует, как это все работает, и как можно использовать объект Command для выполнения хранимой процедуры, а не инструкции SQL:
Dim consecrate As Connection
Dim cmdVBA As Command
Dim prmDate
( Connection...)
Set cmdVBA = New Command
With cmdV3A
.ActiveConnection = consecrate
.CommandText = "qryDeleteOldRecords"
.CommandType = adCmdStoredProc ' in Jet, _
adCmdTable
End With
Set prmDate - New Parameter
With prmDate
.Name = "Date"
.Value = InputBox "Enter the cut-off date."
.Type = adDate
.Direction = adParamlnput
End With
With cmdVBA
.iarameters.Append prrnDate ' Добавление параметра
.Execute ‘ Выполнение команды
End With
Если вы выполняете запрос, сохраненный в базе данных Jet/Access, используйте значение adCmdTable свойства CommandType объекта Command, а не adCmdStoredProc, относящееся к SQL Server и многим другим серверам баз данных.
- Подготовка параметров SQL-запроса
- Единое имя файла параметров InterBase
- Урок 8.2. Средства безопасности Windows Vista
- Центр обеспечения безопасности
- 3.7. Программы ipcs и ipcrm
- Установка текста команды
- Обработка ошибок
- Использование объекта Command
- Настройка объекта Command
- 4.4. Специальные типы переменных
- Пример 11-12. Замена имени переменной на ее значение, в исходном тексте программы на языке Perl, с помощью eval
- Написание кода базы данных с помощью ADO