Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Печать текущей записи из формы  [new]
Felliks
Member

Откуда:
Сообщений: 19
Нужно напечатать в отчете текущую запись из формы, помогите пожалуйста это реализовать прально. У меня выводит все записи без разбора...
14 сен 06, 00:32    [3133303]     Ответить | Цитировать Сообщить модератору
 Re: Печать текущей записи из формы  [new]
bubucha
Member

Откуда:
Сообщений: 5633
есть несколько вариантов, один из них - параметры в docmd.openreport
14 сен 06, 00:36    [3133309]     Ответить | Цитировать Сообщить модератору
 Re: Печать текущей записи из формы  [new]
Ukraina
Member

Откуда: Ярославль (...) - Туркменистан
Сообщений: 24344
Создавай запрос, там выбирай нужную запись и делай отчет на основании этого запроса..., а не формы (таблицы)
14 сен 06, 02:07    [3133365]     Ответить | Цитировать Сообщить модератору
 Re: Печать текущей записи из формы  [new]
Felliks
Member

Откуда:
Сообщений: 19
Ukraina
Создавай запрос, там выбирай нужную запись и делай отчет на основании этого запроса..., а не формы (таблицы)


если можно, здесь подробней... в запросе коряво получается, а мне нужно еще обучить чайнистый персонал... хотелось бы упростить им их мучения. Я же чайнистый в VB... только учусь ))). Заранее спасибо.
14 сен 06, 03:52    [3133411]     Ответить | Цитировать Сообщить модератору
 Re: Печать текущей записи из формы  [new]
Felliks
Member

Откуда:
Сообщений: 19
bubucha
есть несколько вариантов, один из них - параметры в docmd.openreport



извиняюсь... хотел это процетировать
14 сен 06, 03:53    [3133412]     Ответить | Цитировать Сообщить модератору
 Re: Печать текущей записи из формы  [new]
Guest11111
Guest
автор
есть несколько вариантов, один из них - параметры в docmd.openreport


Будьте проще, и люди к вам потянутся...

Dim txt1 As String, x1 As Boolean

txt1 = Me.Filter
x1 = Me.FilterOn

Me.Filter = "IDN=" & Me.IDN
Me.FilterOn = True
DoCmd.PrintOut
Me.FilterOn = False

Me.Filter = txt1
Me.FilterOn = x1
19 окт 06, 17:11    [3283852]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить