Как отключить вопрос о сохранении

[STIL]

Я сделала кнопку, при нажатии на которую текущий документ сначала сохраняется, потом закрывается. Но MsBox о сохрании выскакивает. Как его отключить?

 

[Domino6]

Есть служебное поле SaveOptions

Выставь значение
"0" - документ никогда не сохраняется
"1" - документ всегда сохраняется

После операции сохранения выставляй к примеру в 0 и выходи

 

[STIL]

Здорово, больше не спрашивает. Правда поиском пришлось воспользоваться :blink:

 

[Domino6]

<!--QuoteBegin-STIL+18:01:2006, 11:27 -->
<span class="vbquote">(STIL @ 18:01:2006, 11:27 )</span><!--QuoteEBegin-->:blink: Здорово, б

[snapback]29459" rel="nofollow" target="_blank[/snapback]​

[/quote]
Не забудь ставить после сохранения, а то уже больше никогда не спросит

 

[STIL]

Как скажешь :blink:

 

[STIL]

Мне кажется я что-то не допонимаю. Если документ создается, то такое сохранение не работает. Т.е. он закрывается, но не сохраняется. А если уже существующий документ открыть и отредактировать, то все сохраняется и закрывается без вопросов. Почему так?

 

[Domino6]

Какое значение выставляеш?

 

[STIL]

0

 

[STIL]

Даже если и 1, то все равно новые не сохраняются.

 

[Domino6]

Делаеш так
- работаеш с документом
- сохраняеш
- выставляеш значение поля
- выходиш

В сохраненном документе поля нет но оно было в документе перед выходом по-этому вопрос не задавался

 

[STIL]

Вот мое произведение:

Dim note As NotesDocument
Dim uidoc As NotesUIDocument
Set note=uidoc.Document
Сall note.Save(True,True,False)
note.SaveOptions=1
Call uidoc.Close()

А почему ты после ш мягкий знак не пишешь в (10)?

 

[Domino6]

<!--QuoteBegin-STIL+18:01:2006, 15:17 -->
<span class="vbquote">(STIL @ 18:01:2006, 15:17 )</span><!--QuoteEBegin-->А почему ты после ш мягкий знак не пишешь в (10)?

[snapback]29483" rel="nofollow" target="_blank[/snapback]​

[/quote]
Не успеваю и "ь" в "-тся" "ш" моя слабость

Если это кнопка то лутше

Код этот где?

 

[STIL]

[/QUOTE]
Код этот где?

Код в событии Click кнопки.

Если это кнопка то лутше

Что-то не очень понятно

Не успеваю и "ь" в "-тся" "ш" моя слабость

Это легко. В гаголах, если заканчивается на "ш" всегда мягкий знак пишется. А с "тся" надо вопрос задать. Если "что делать" (т.е. на вопрос "ь" заканчивается), то с мягким знаком, а если, например, "что делает" (т.е. не заканчивается) то без "ь"

 

[STIL]

Никто не знает? Жалко

 

[Medevic]

<!--QuoteBegin-STIL+18:01:2006, 09:54 -->
<span class="vbquote">(STIL @ 18:01:2006, 09:54 )</span><!--QuoteEBegin-->Я сделала кнопку, при нажатии на которую текущий документ сначала сохраняется, потом закрывается. Но MsBox о сохрании выскакивает. Как его отключить?

[snapback]29456" rel="nofollow" target="_blank[/snapback]​

[/quote]
Код кнопки дай. Которая даёт вопрос.

 

[STIL]

Dim note As NotesDocument
Dim uidoc As NotesUIDocument
Set note=uidoc.Document
Сall note.Save(True,True,False)
note.SaveOptions=1
Call uidoc.Close()

 

[Guest]

У меня в кнопке "Сохранить и закрыть" такой код живет:

@PostedCommand([FileSave]);
@Command([FileCloseWindow])

Закрывает форму без лишних вопросов, сохраняя изменения.

 

[STIL]

(17) Здорово. Взлетает без всяких вопросов. Спасибо!!!

 

[NG]

Все гораздо проще.

Заводишь на форме поле SaveOptions, тип Text, Computed, значение "0".
В QuerySave на форме в случае если тебе нужно делать сохранение, добавляешь такую строчку:

Source.Document.Saveoptions = "1"

Все, больше никаких заморочек.

 

[STIL]

Попробую, спасибо