@command([fileprint]) Не хочет работать

  • Автор темы Kron
  • Дата начала
K

Kron

#1
Создал форму для печати, а вот печатать ни как не хочет :)
 
G

Guest

#2
а еще что-нибудь добавите? фаил принт без параметров, что печатается и т.д....
 
K

Kron

#5
ДОбавляю: Создается форма, и её нужно распечатать как она есть, данная команда и печатает, но права юзера распространяются на репликация и копирование, что в приниципе не допустимо, вот и загвоздочка!!!
 
S

Sandr

#6
ДОбавляю: Создается форма, и её нужно распечатать как она есть, данная команда и печатает, но права юзера распространяются на репликация и копирование, что в приниципе не допустимо, вот и загвоздочка!!!
Не вижу связи смеждурепликацией, копированием и вызовом диалога печатного...
 
K

Kron

#7
:rolleyes: я сам не вижу но когда даю права такие рабоатет
 
K
#12
Access to current database (cur) Для печати нужен доступ натаком уровне, как его обойти, если я его даю то менеджер не чистый на руку может просто скопировать или среплицировать БД со всеми вытекающими :rolleyes:
 
S

Sandr

#13
Access to current database (cur) Для печати нужен доступ натаком уровне, как его обойти, если я его даю то менеджер не чистый на руку может просто скопировать или среплицировать БД со всеми вытекающими :rolleyes:

глупо затыкать одну дырку, а открывать другую... Что мешает тому же менеджеру все распечатать?
 
K
#14
120000 доков, разбитых по разным формам, устанет печатать
 
K
#15
Вот что выдает может это поможет приоткрыть тайну
 

Вложения

  • 122.5 КБ Просмотры: 57
K
#17
Сори, нашел код выполнения, убрал все залетало, горе горе, нельзя впонедельник к работе приступать :p

Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
' Dim ns As notessession
Dim db As notesdatabase
Dim view As notesview
Dim doc1 As notesdocument
Dim doc2 As notesdocument
Dim dc As notesdocumentcollection
Dim i As Integer
Set doc1= source.document
Set db = doc1.parentdatabase
Set view = db.getview("(view1)")
Set dc = view.GetAllDocumentsByKey(doc1.AgentShortName(0))

End Sub
 
K
#18
Итеперь последний вопрос, создал новую форму в неё поместил поля из ормы которую нужно распечатать дал кнопку переход @Command([ViewSwitchForm];"PrintAgentFormDemo1") в новой форме для печати просто дал кнопку Печать @Command([FilePrint]) И все больше ни каких действий не дополнял, просто в фороме для печати поля подвигал как надо, для визуализации и восприятия информации, и самое главное не печатает

:p
 
S

Sandr

#19
Итеперь последний вопрос, создал новую форму в неё поместил поля из ормы которую нужно распечатать дал кнопку переход @Command([ViewSwitchForm];"PrintAgentFormDemo1") в новой форме для печати просто дал кнопку Печать @Command([FilePrint]) И все больше ни каких действий не дополнял, просто в фороме для печати поля подвигал как надо, для визуализации и восприятия информации, и самое главное не печатает

B)
А что говорит?

А вообще, все можно гораздо проще сделать...
@Command( [FilePrint] ; ""; ""; ""; ""; ""; "PrintAgentFormDemo1"; ""; ""; ""; "")
 
G

Guest

#20
<!--QuoteBegin-Sandr+24:09:2007, 22:57 -->
<span class="vbquote">(Sandr @ 24:09:2007, 22:57 )</span><!--QuoteEBegin-->А вообще, все можно гораздо проще сделать...
@Command( [FilePrint] ; ""; ""; ""; ""; ""; "PrintAgentFormDemo1"; ""; ""; ""; "")
[snapback]79432" rel="nofollow" target="_blank[/snapback]​
[/quote]
это верно! я же сразу спрашивал какие еще параметры задете и т.д. Зачем огород городить если можно все указать в вышеуказанной команде???