Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Значение запроса в переменную. Как?
 
 автор: Exciter   (02.08.2006 в 00:00)
 
 

Здравствуйте! :)

У меня появилась необходимость выводить в поля формы значения статистических выборок из таблиц. Как это сделать не понимаю :(
В идеале значение выборки хочу присваивать надписи :)
Типа просто надпись "У нас в базе вот этого " + значение выборки.

Запрос
"SELECT Count(Devices.ID_Device) AS CountOfID_Device " _
& "FROM Type RIGHT JOIN (Model RIGHT JOIN Devices ON Model.ID_Model = Devices.Link_Model) " _
& "ON Type.ID_Type = Model.Link_Type GROUP BY Type.Type " _
& "HAVING (((Type.Type)=" & Type_name & "));"
Me!Надпись.Caption = [значение этого запроса]

  Ответить  
 
 автор: ??????   (02.08.2006 в 00:00)
 
 

Re: Значение запроса в переменную. Как? set rst=currentdb.openrecordset("Запрос")
Me!Надпись.Caption=rst.fields(0)
set rst=nothing

  Ответить  
 
 автор: Andrew   (02.08.2006 в 00:00)
 
 

Или еще... Объявляем глобальную в пределах модуля переменную

Private Значение As variant

Функции

Public sub Set_Значение (varvalue as Variant)
Значение=varvalue
End sub

Public Function Get_Значение () as Variant
varvalue=Значение
End sub

А запрос вида "SELECT Count(Devices.ID_Device) AS CountOfID_Device " _
& "FROM Type RIGHT JOIN (Model RIGHT JOIN Devices ON Model.ID_Model = Devices.Link_Model) " _
& "ON Type.ID_Type = Model.Link_Type GROUP BY Type.Type " _
& "HAVING (((Type.Type)=Get_Значение()));"

т.е. перед вызовом запроса Set_Значение (213)
а запрос сам получит значение переменной

  Ответить  
 
 автор: Exciter   (03.08.2006 в 00:00)
 
 

Re[2]: Значение запроса в переменную. Как? СПАСИБО!!! ТО ЧТО НУЖНО!!!

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList