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

[Kron]

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

 

[Guest]

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

 

[root]

Для: Kron
так попробуй "@@237@@([[3012]])"

 

[fvoice]

так попробуй "@@237@@([[3012]])"

:blink: ват из ит?

 

[Kron]

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

 

[Sandr]

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

Не вижу связи смеждурепликацией, копированием и вызовом диалога печатного...

 

[Kron]

я сам не вижу но когда даю права такие рабоатет

 

[Sandr]

я сам не вижу но когда даю права такие рабоатет

а простой Ctr+P работает?

 

[Kron]

неа

 

[Sandr]

неа

А какие вообще права у пользоватея должны быть?

 

[Kron]

залеплены команды в меню Файла

 

[Kron]

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

 

[Sandr]

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

глупо затыкать одну дырку, а открывать другую... Что мешает тому же менеджеру все распечатать?

 

[Kron]

120000 доков, разбитых по разным формам, устанет печатать

 

[Kron]

Вот что выдает может это поможет приоткрыть тайну

 

[Sandr]

Вот что выдает может это поможет приоткрыть тайну

Здается мне, что на кнопке, кроме @command([fileprint]) есть еще что-то, что может выполнятся только в режиме редактирования... Код в студию...

 

[Kron]

Сори, нашел код выполнения, убрал все залетало, горе горе, нельзя впонедельник к работе приступать

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

 

[Kron]

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

 

[Sandr]

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

B)

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

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

 

[Guest]

<!--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]
это верно! я же сразу спрашивал какие еще параметры задете и т.д. Зачем огород городить если можно все указать в вышеуказанной команде???