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

Форум: MS ACCESS

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

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

 
 

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

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

тема: Страницы
 
 автор: Макс@   (17.03.2009 в 17:00)   личное сообщение
 
 

Всем доброе время суток! Подскажите можно ли сделать так, чтоб при загрузке отчета загружался последний лист или лист который я укажу?
Заранее спасибо.

  Ответить  
 
 автор: час   (17.03.2009 в 19:46)   личное сообщение
 
 

Можно конечно........
надо page reда-то засунуть

Необходимо отметить, что в Access мы можем легко вывести на печать не только отчет, но и любой активный объект, например форму или таблицу. Для этого используется метод PrintOut, который выполняет макрокоманду "Печать" (PrintOut). Синтаксис этого метода имеет следующий вид:

DoCmd.PrintOut [Диапазон] [, СоСтраницы, ПоСтраницу]
[, Качество] [, ЧислоКопий] [, РазобратьКопии]
В качестве аргумента Диапазон может использоваться одна из следующих встроенных констант:

acPrintAll - для печати всего отчета (по умолчанию);
acSelection - для печати фрагмента отчета;
acPages - для печати указанных страниц. При этом должны быть указаны аргументы СоСтраницы и ПоСтраницу.
Для задания значения аргумента Качество должна использоваться одна из следующих встроенных констант:

acHigh - высокое качество печати (разрешение принтера) - по умолчанию;
acMedium - среднее качество печати;
acLow - низкое качество печати;
acDraft - печать черновика.
Число печатаемых копий отчета задается аргументом ЧислоКопий которое по умолчанию равно 1.
Задание для аргумента РазобратьКопии значения, равного True(-1), определяет печать с раскладкой по копиям, а False (0) - печать без раскладки. Если оставить данный аргумент пустым, будет принято значение по умолчанию (True).
Напомним, что в Access необязательный аргумент посреди списка аргументов разрешается пропустить, однако при этом необходимо ввести запятую, отделяющую пропущенный аргумент. Если опускаются один или несколько последних аргументов, вводить запятые вслед за последним указанным аргументом не требуется.
Например, для вывода формы на принтер мы можем создать в ней специальную кнопку, для события OnClick которой запишем следующий код, при выполнении которого будут напечатаны три экземпляра отчета:

Private Sub cmdForm_Click()
DoCmd.PrintOut(acPrintAll,,3)
End Sub



===================================

Do While True
    On Error GoTo naFig
    DoCmd.SelectObject acReport
    DoCmd.PrintOut acPages, i, i, N, False
    i = i + 1
Loop
naFig:

  Ответить  
 
 автор: Lukas   (17.03.2009 в 19:55)   личное сообщение
 
 


Me.Visible = False


Час, вы зачем от Макс@-а отчет спрятали?

Макс@-у:
Может необходимо открывать отчет с фильтром, дабы выводить только нужные записи?

  Ответить  
 
 автор: час   (17.03.2009 в 19:58)   личное сообщение
 
 

Я исправилси

  Ответить  
 
 автор: час   (17.03.2009 в 20:13)   личное сообщение
18 Кб.
 
 

А вот интересный примерчик не мною придуманый......

  Ответить  
 
 автор: Макс@   (18.03.2009 в 14:40)   личное сообщение
 
 

Скорей всего так и буду делать.... всем спасибо за советы.

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