Опора деревянной одностоечной и способы укрепление угловых опор: Опоры ВЛ - конструкции, предназначенные для поддерживания проводов на необходимой высоте над землей, водой...
Семя – орган полового размножения и расселения растений: наружи у семян имеется плотный покров – кожура...
Топ:
Оснащения врачебно-сестринской бригады.
История развития методов оптимизации: теорема Куна-Таккера, метод Лагранжа, роль выпуклости в оптимизации...
Интересное:
Подходы к решению темы фильма: Существует три основных типа исторического фильма, имеющих между собой много общего...
Берегоукрепление оползневых склонов: На прибрежных склонах основной причиной развития оползневых процессов является подмыв водами рек естественных склонов...
Лечение прогрессирующих форм рака: Одним из наиболее важных достижений экспериментальной химиотерапии опухолей, начатой в 60-х и реализованной в 70-х годах, является...
Дисциплины:
2022-10-29 | 26 |
5.00
из
|
Заказать работу |
|
|
Dim Rs As New ADODB.RecordSet 'создание объекта Rs типа RecordSet
'подключение набора (можно не указывать, если набор открывается)
Set Rs.ActiveConnection=Cn 'подключение набора Rs (можно не указывать)
Rs.Open rsOff, Cn ‘повторное открытие набора Rs
Rs.UpdateBatch 'пакетное обновление набора
End Sub
Копирование набора в двумерный массив (GetRows)
Для копирования в ADO и DAO используется метод GetRows [(n)], который возвращает двумерный массив типа Variant(k,n). Первый индекс определяет поле, второй ‑ строку. По умолчанию копируется весь набор.
Пример формирования массива из таблицы “Заказчики” и его вывод.
Private Sub Command7_Click() ‘процедура копирования набора
Dim Cn As New ADODB.Connection, Rs As New ADODB.RecordSet
Dim i As Integer, j As Integer, Massiv As Variant 'массив для копирования
Cn.Open “DSN=Строительство“ 'установка связи через DSN-имя
Rs.Open “Заказчики“, Cn, adOpenForwardOnly, adLockReadOnly 'открытие
Rs.Fields.Refresh: Rs.MoveFirst: Massiv = Rs.GetRows 'копирование набора
Rs.Close: Set Rs = Nothing: Cn.Close: Set Cn = Nothing ‘закрытие базы
For j = 0 To UBound(Massiv, 2) ‘цикл чтения строк таблицы
For i=0 To UBound(Massiv, 1): Debug.Print Massiv(i, j); “ “;: Next ‘вывод полей
Debug.Print ‘переход на следующую строку
Next ‘конец цикла чтения строк таблицы
End Sub
Создание запросов с использованием конструктора среды данных
|
Рис. 9.10.1. Окна конструктора запросов, просмотра и среды данных
Перетащим из окна просмотра таблицу Stroiki в верхнюю часть окна запросов. Перетащим все поля из таблицы в сетку окна запросов. В нижней части окна запроса формируется текст команды SQL (Select …). Для перетаскивания всех полей можно щелкнуть на первом поле “*”. Для выполнения запроса выберем команду Query/Run, и сформированный запрос выведется в нижней части окна конструктора запросов. Для сохранения запроса выберите команду File/Save Uchet_Stroek. Используя команды контекстного меню в окне запросов, можно создать запросы на выборку данных (Select Query), на добавление записей в другую таблицу (Insert Query), на удаление существующих записей (Delete Query), на изменение отдельных значений полей и записей (Update Query), на создание таблицы (Make Table Query), на группировку записей (Group By). Текст команды Select можно изменять, например Qbjom*1,1 увеличит в запросе объем выполненных работ в 1,1 раза.
Используя конструктор запросов, можно визуально установить связь между таблицами: установите мышку на поле связи, нажмите левую кнопку мыши и, не отпуская ее, перетащите указатель на поле связи другой таблицы и отпустите кнопку. На экране появится линия связи.
Для удаления связи щелкните на линии связи правой кнопкой мыши и выберите команду из контекстного меню Remove.
Внимание! Для повторного формирования среды окружения (например, перед выводом отчета (п. 9.11)) нужно выполнить команду Unload <имя среды>.
|
|
Индивидуальные очистные сооружения: К классу индивидуальных очистных сооружений относят сооружения, пропускная способность которых...
Кормораздатчик мобильный электрифицированный: схема и процесс работы устройства...
Особенности сооружения опор в сложных условиях: Сооружение ВЛ в районах с суровыми климатическими и тяжелыми геологическими условиями...
Опора деревянной одностоечной и способы укрепление угловых опор: Опоры ВЛ - конструкции, предназначенные для поддерживания проводов на необходимой высоте над землей, водой...
© cyberpedia.su 2017-2024 - Не является автором материалов. Исключительное право сохранено за автором текста.
Если вы не хотите, чтобы данный материал был у нас на сайте, перейдите по ссылке: Нарушение авторских прав. Мы поможем в написании вашей работы!