LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Отчеты......
 Отчеты...
 
 15.09.2008 22:52:26
Alek_B
1 сообщения


Отчеты...
Всем привет! У меня такая проблема: есть отчет, который состоит из ЗаголовкаОтчета, ЗаголовкаГруппы, ОбластиДанных и ПримечанияОтчета. В ЗаоловкеГруппы в Событии Форматирования у меня используются Запросы типа:

strSQL = "SELECT Sum([Сумма]) As Ostatok FROM [Остатки] WHERE [Код_организации] = " & [Forms]![Отчеты]![Организация] & IIf([Forms]![Отчеты]![Все_подразделения], "", " AND [Код_подразделения] = " & [Forms]![Отчеты]![Подразделение]) & " ;"

Set rs = CurrentDb.OpenRecordset(strSQL)
If Not (IsNull(rs!Ostatok)) Then
Ostatok = rs!Ostatok
Else
Ostatok = 0
End If
rs.Close
... и т.д.
Все хорошо выводится при Просмотре на экран. Но если Отчет выведен на Просмотр на экран и я хочу через кнопку "Принтер" в Меню распечать его (или через кнопку "Связи с Office" хоу его скинуть в Word), то он невыдавая никакой ошибку быстро промаргивает имитацию выбранного действия и не выполняет его. Если же я такой запрос заремариваю (ставлю кавычку впереди), то все печатается и перекидывается в Word. Без запроса в ЗаголовкеГруппы обойтись практически нельзя. Помогите, как все таки распечатать или перекинуть в Word такой отчет, используя в ЗаголовкеГруппы данный запрос.
Спасибо...
 16.09.2008 8:17:26
Admin1
731 сообщения
1-ый


Re: Отчеты...

Может переменные некоректно обрабатываются. Решается проблема так

Set db = CurrentDb
Set rs = db.OpenRecordset(...

  Программирование  Microsoft Access. Файлы mdb и accdb  Отчеты......
ПоискПоиск  Список форумовСписок форумов  
right