Удаление документа

@yvoshkototus · Регистрация: 22.03.2006

Студворк — интернет-сервис помощи студентам

Доброе утро, Лотусисты!

Возникла такая проблема, не могу нормально удалить документ из базы.

Код такой:

Code
1
2
3
4
5
6
7
8
9
10
11
12
Sub Click(Source As Button)
 
Dim doc As NotesDocument
Dim docUI As NotesUIDocument
Dim ws As New NotesUIWorkspace
 
Set docUICurr=ws.CurrentDocument
Set docCurr=docUICurr.Document
 
Call docUICurr.Close()
Call docUICurr.DeleteDocument()
End Sub

Такая штука только помечает документ на удаление.
После F9 все удаляется, но как "нажать" F9 программно?
Что то типа DB.Refresh() есть наверное?

Если удалять бэкэнд документ (doc.Remove(false)), то если он взят из UI документа, его удалить нельзя ;) О чем честно сказано в хелпе
То есть нужно искать документ через view. Чего не хочется, так как единственный очевидный идентефикатор документа это поле Дата/Время, по которому документ не находится

Может что подскажите.

@Domymo6 · 16.04.2006, 16:43

<span class="vbquote">(ivashkalotus @ 17:04:2006, 10:16 )</span>Если удалять бэкэнд документ (doc.Remove(false)), то если он взят из UI документа, его удалить нельзя О чем честно сказано в хелпе
То есть нужно искать документ через view.
[snapback]33731" rel="nofollow" target="_blank[/snapback]?[/quote]

именно так только искать его по UNID

@yvoshkototus · 17.04.2006, 11:12

Не злиться, см в подпись

Т.е. взять UNID из документа полученного из UI документа, и найти его в базе?

P.S. Кто нить расскажет почему такой изврат ???

@yvoshkototus · 17.04.2006, 11:47

Не помагает :D
Выдает такую же ошибку, что и до этого

код

Code
1
2
3
4
5
6
7
8
9
Call doc.Save(True,True)
Call docUICurr.Close()
Call docCurr.Save(True,True)
 
Создаем промежуточный документ для удаления текущего документа
Dim doc4Del As NotesDocument
 
Set doc4Del =db.GetDocumentByID(docCurr.NoteID)
Call doc4Del.Remove(True)

У doc4Del свойство IsUIdocopen все равно стоит в true :D

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

@yvoshkototus · 17.04.2006, 11:48

P.S. UNID я то же пробовал

@Domymo6 · 17.04.2006, 12:35

Перед поиском по УНИД набо удалить из памяти объект UIDocument

@yvoshkototus · 17.04.2006, 12:38

А как, если скрипт находиться именно в нем (т.е. в форме, которая для него открыта)?

@Domymo6 · 17.04.2006, 13:33

<span class="vbquote">(ivashkalotus @ 18:04:2006, 08:59 )</span>P.S. Кто нить расскажет почему такой изврат ???
[snapback]33862" rel="nofollow" target="_blank[/snapback]?[/quote]

Это не изврат просто при нахождении в памяти объекта и доступ к нему нотест определяет его как расположеного в памяти и не занимает лишние участки памяти

Code
1
2
3
4
5
6
UNID$=docCurr.NoteID
docUICurr Delete
docCurr Delete
 
Set docCurr =db.GetDocumentByID(UNID$)
Call docCurr.Remove(True)

Новые блоги и статьи Все статьи Все блоги /
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .

@Domymo6 0 / 0 / 2 Регистрация: 07.05.2005 Сообщений: 743
	16.04.2006, 16:43
	<!--QuoteBegin-ivashkalotus+17:04:2006, 10:16 --> <span class="vbquote">(ivashkalotus @ 17:04:2006, 10:16 )</span><!--QuoteEBegin-->Если удалять бэкэнд документ (doc.Remove(false)), то если он взят из UI документа, его удалить нельзя О чем честно сказано в хелпе То есть нужно искать документ через view. [snapback]33731" rel="nofollow" target="_blank[/snapback]?[/quote] именно так только искать его по UNID 0

@yvoshkototus 0 / 0 / 0 Регистрация: 22.03.2006 Сообщений: 41
	17.04.2006, 11:12
	Не злиться, см в подпись Т.е. взять UNID из документа полученного из UI документа, и найти его в базе? P.S. Кто нить расскажет почему такой изврат ??? 0

@yvoshkototus 0 / 0 / 0 Регистрация: 22.03.2006 Сообщений: 41
	17.04.2006, 11:48
	P.S. UNID я то же пробовал 0

@Domymo6 0 / 0 / 2 Регистрация: 07.05.2005 Сообщений: 743
	17.04.2006, 12:35
	Перед поиском по УНИД набо удалить из памяти объект UIDocument 0

@yvoshkototus 0 / 0 / 0 Регистрация: 22.03.2006 Сообщений: 41
	17.04.2006, 12:38
	А как, если скрипт находиться именно в нем (т.е. в форме, которая для него открыта)? 0