Сообщения без ответов | Активные темы


Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 2 
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
  Moduvator

Member
Статус: Не в сети
Регистрация: 02.08.2005
Откуда: Казань
Доброго времени суток всем. Обращаюсь к людям, которые имеют опыт работы в Access. Требуется решить следующую задачу:
Имеется готовая таблица, содержащая записи из трех полей - Имя, и два числовых коэф-та. Также имеется таблица, в которую заносятся некоторые данные. Основные поля - вид, длинна тела, масса. Прочие поля в решении задачи не участвуют. Требуется при введении вида и длинны тела в таблицу автоматически сделать выборку из таблицы данных по введеному виду, получить для данного имени коэф-ты, и с их помощью по известному уравнению вычислить массу.

Пока я дошел до формы ввода, написав для события AfterUpdate() обработчик на VB. Застопорился я на работе с запросом:
Код:
Private Sub Name_AfterUpdate()
    Dim species As String
    Dim SQL As String
   
    species = Forms![Таблица1]![Name].Text
   
    SQL = "SELECT Data.q, Data.b " & _
        "FROM Data " & _
        "WHERE (((Data.Name)='" + species + "'))"
    CurrentDb.QueryDefs![Query1].SQL = SQL

    'Now what?
End Sub

Подскажите пожалуйста - как в Access запустить SQL-запрос на исполнение, а после получить доступ к его result-set? Ибо я с программированием в Access раньше никогда не сталкивался...
Заранее признателен.

_________________
Feci quod potui, faciant meliora potentes.

Реклама

Партнер
  Moduvator

Member
Статус: Не в сети
Регистрация: 02.08.2005
Откуда: Казань
А задача решается так:
Код:
Dim result As Recordset

With CurrentDb.QueryDefs![Query1]
 .SQL = SQL
 Set result = .OpenRecordset(, dbReadOnly)
End With
r = result.GetRows
'теперь в r - двумерный массив-результат

"А ларчик просто открывался"(С)
Все - тему можно закрывать.

_________________
Feci quod potui, faciant meliora potentes.

Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 2 
-

Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1

Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan