Диалоги Lotus developers

Domino6 · 06.10.2005

(Guest_moonlight_* @ 6:10:2005, 14:09 )Проблема в следующем:
юзер в локальной базе создает документ и его сохраняет, затем
делает репликацию на сервер - сервер в это время не в сети (проблемы с сетью) (репликация естественно не происходит), затем сервер снова подконнективается к сети, опять юзер делает репликацию и в итоге ДОКУМЕНТА НЕТ НИ У ЮЗЕРА НИ НА СЕРВЕРЕ ! В чем проблема?

[snapback]25564" rel="nofollow" target="_blank[/snapback]

[/quote]

правила репликации и доступ.

Вероятность ситуации.
1.В правилах записано что к пользователю реплика идет по правилу Поле1="Вася"
2. На сервер в ТУД записано что пользователь имеет доступ "Читатель"

Ситуация
Пользователь создает документ в локальной базе в документе поле1="Петя"
Наступает репликация - документ на сервер не передается поскольку Пользователь не имет прав создания документов на сервер. Затем из локальной реплики удаляется документ , как не сответсвующий правилам репликации.

Gor · 21.10.2005

Всем доброго время суток...
Хотел бы спросить как открыть свою базу данных (nsf) с помощью Web?
А ещё хотел бы спросить может быть где нить есть в свойствах полей такая штука - например поле Editable - вводишь в него что нибудь выходишь из этого поля а он отображает содержимое этого поля Editable как гипертекст?
(если поможет вкратце обрисую ситуацию свою - из базы данных Survey.nsf посылается письмо пользователю, а он должен по этой ссылке уже зайти на базу с помощью Web) Может неточно немного выражаюсь.... но в голову ничего болоьше не лезет... И вообще буду очень благодарен если кто нибудь даст ссылки на литературу про Lotus и Web

Domino6 · 21.10.2005

(Gor @ 21:10:2005, 14:30 )сылки на литературу про Lotus и Web

[snapback]26139" rel="nofollow" target="_blank[/snapback]

[/quote]
Help раздел Design for Web

Ссылку на документ формировать можно разными способами орятже хелп.
Вариант

Ссылка скрыта от гостей

documentid - UNID или другое ключевое слово ("anketa001"), еслине UNID, то ключ должен присутствовать в 1-ой сотрированной колонке в указанном виде (колонку можно скрыть)

На сервер должна быть запущена задача http
В ацл базы указан доступ, если всем то долно явно быть прописано для анонимуса

Guest · 24.10.2005

Есть очень срочный вопрос. На сервере лежат мейловые базы, которые нужно очистить.
Сделала базу на которой повесила кнопку с таким кодом:

Код:

Sub Click(Source As Button)
Dim s As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Set db = s.CurrentDatabase
Set agent = db.GetAgent("DEL")
If agent.RunOnServer = 0 Then
'If agent.Run = 0 Then
Messagebox "Агент запущен",, "Success"
Else
Messagebox "Агент не запущен",, "Failure"
End If
End Sub

На форме есть поле patch в которое вносится путь к папке в которой лежат базы (типа: c:\lotus\data\mail\)

И есть агент:

Код:

Sub Initialize
Dim session As New NotesSession 
Dim db,db2 As NotesDatabase	
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim doc2 As NotesDocument
Dim dateTime As NotesDateTime
Dim i As Integer
Dim count As Integer
Dim pathName As String 
Dim pathName2 As String

Set agent = session.CurrentAgent
Set db = session.CurrentDatabase	
Set doc = db.GetDocumentByID(agent.ParameterDocID)	
pathName$ = doc.patch(0)
'Msgbox pathName$

fileName$ = Dir$(pathName$, 0)
Do While fileName$ <> "" 
Set db2=session.GetDatabase("",pathName$+ fileName$,False)	
Set collection = db2.Search({ Form = "Memo" | Form = "Reply" },Nothing,0)

Set doc = collection.getfirstdocument
While Not doc Is Nothing
Set doc2 = collection.getnextdocument(doc)
Call doc.RemovePermanently(True)
Set doc = doc2
Wend
fileName$ = Dir$()
Loop
End Sub

Агент:
- action menu selection
- all documents in database
С правами на выполнение все нормально (переподписываю агент сервером).
Лотус 6.0.3
Локально агент отрабатывает на ура, на сервере не запускается.
Не могу понять в чем дело. 8(

Domino6 · 24.10.2005

(Юлия @ 24:10:2005, 10:48 )(типа: c:\lotus\data\mail\)

[snapback]26202" rel="nofollow" target="_blank[/snapback]

[/quote]
Указывай путь от даты т.е. только Mail\


(Юлия @ 24:10:2005, 10:48 )Set db2=session.GetDatabase("",pathName$+ fileName$,False)

[snapback]26202" rel="nofollow" target="_blank[/snapback]

[/quote]

может на сервере файлы лежат не в c:\lotus\data\

Guest · 24.10.2005

Для: Domino6
Путь точно правильный. Запускала разит локально на сервере - базы находились по этому пути.
Попытались с путем от data/ - не помогает. 8(

Medevic · 24.10.2005

Попробуй, сделать тестовый запуск (в меню пункт Test).
И запиши результаты методов через NotesLog.

Domino6 · 24.10.2005

(Юлия @ 24:10:2005, 10:48 )Set db2=session.GetDatabase("",pathName$+ fileName$,False)

[snapback]26202" rel="nofollow" target="_blank[/snapback]

[/quote]

перед строчкой напиши
Print pathName$+ fileName$
и посмотри правильно ли сформировался путь

Gor · 24.10.2005

Интересует ещё один небольшой вопрос)
Есть ли какие нибудь функции у Лотуса чтобы осуществить следующее?
Есть Form1 и Form2
В Form1 и Form2 есть поле URL1 и URL2
Оно не всегда статическое, т.е. Editable и может изменяться.
В Form2 есть кнопка по нажатию которой формируется письмо и текст письма тоже соответственно программно, а также берётся значение из поля URL1 Form1 и записывается в поле URL2.
Когда письмо приходит пользователю он видит поле URL и в нём содержится ссылка, но зайти по неё нельзя т.к. это не гипертекст...А как нибудь можно сделать чтобы в поле URL приходил всегда гипертекст?

Domino6 · 24.10.2005

1. Вариант 1
URL2- сделай ричтекстом
Перед ссылко добавляй "http://"
Нотес ретранслирует локаторы
http://
ftp://
mailto:
notes://

2. Вариант 2
на поле URL2 повесить поверху хотспот с командой
@URLOpen(URL2)

Guest · 24.10.2005

Вообще агент не запускает. ммм...мммм...
Ладно, зато локально все работает.
Что-то не любят меня серверные агенты.

Domino6 · 24.10.2005

(Юлия @ 24:10:2005, 16:26 )Вообще агент не запускает. ммм...мммм...

[snapback]26240" rel="nofollow" target="_blank[/snapback]

[/quote]
А что пишет

Guest · 24.10.2005

Пишет: Агент запущен
но никаких попыток отправить мне по мылулог с отработкой или прописать в строке статуса путь или хотябы признак начала/завершения работы, как происходит при локальном вызове агента нет.

Код:

Sub Initialize
Dim session As New NotesSession 
Dim db,db2 As NotesDatabase	
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim doc2 As NotesDocument
Dim dateTime As NotesDateTime
Dim i As Integer
Dim count As Integer
Dim pathName As String 
Dim pathName2 As String
Dim currentLog As New NotesLog( "DELETE_ALL" )

Print "Начало работы агента"
Set agent = session.CurrentAgent
Set db = session.CurrentDatabase	
Set doc = db.GetDocumentByID(agent.ParameterDocID)	
Call currentLog.OpenMailLog ( "Yulia Neverova/BWD", agent.Name & " in " & db.Title )
pathName$ = doc.patch(0)
Call currentLog.LogAction( "Путь: " + pathName$ )

fileName$ = Dir$(pathName$, 0)
Do While fileName$ <> ""
Call currentLog.LogAction( "Путь с файлом: " + pathName$+ fileName$ )
Print pathName$+ fileName$

Set db2=session.GetDatabase("",pathName$+ fileName$,False)	
Set collection = db2.Search({ Form = "Memo" | Form = "Reply" },Nothing,0)

Set doc = collection.getfirstdocument
While Not doc Is Nothing
Set doc2 = collection.getnextdocument(doc)
Call doc.RemovePermanently(True)
Set doc = doc2
Wend
fileName$ = Dir$()
Loop
Call currentLog.Close
Print "Окончание работы агента"
End Sub

Domino6 · 24.10.2005

(Юлия @ 24:10:2005, 16:45 )Пишет: Агент запущен
но никаких попыток отправить мне по мылулог с отработкой или прописать в строке статуса путь или хотябы признак начала/завершения работы, как происходит при локальном вызове агента нет.

[snapback]26242" rel="nofollow" target="_blank[/snapback]

[/quote]
А ты имееш права запускать агентов на сервере.

Попробуй подписать сервером выставь по расписанию и проследи за выполнением

Guest · 24.10.2005

Для: Domino6
Предупреждения не выдает (перепрописывала базы сервером).
Хорошо, попробую поставить по расписанию, но какая разница от типа вызова?

Gor · 25.10.2005

Для: Domino6
Действительно оба варианта работают...(преобразуют сразу текст в гиперссылку)
Наверно я немного неточто поставил вопрос...попробую немного пояснее...
В поле url заносится
текст письма формируется программно вот так:

Код:

Sub Click(Source As Button)
  'Creates survey documents according to specifications (dialogbox .window.send), and sends invitations
  'History of changes:

On Error Goto trapError

Dim session As New NotesSession
Dim doc As NotesDocument
Set doc = New NotesDocument( session.currentDatabase )

Dim uiws As New NotesUIWorkspace
If uiws.dialogBox( ".window.send", True, True, False, False, False, False, "Send survey invitations", doc ) Then
Dim body
body = doc.getFirstItem( "body" ).text

'First see if the user hasn't removed "<link>" or "<login>" from the message - if so, exit rightaway
If Instr( body, "<link>" ) = 0 Or Instr( body, "<login>" ) = 0 Then
Msgbox "The texts <link> and <login> are obligatory in the body, they indicate where to insert the hypertext reference and login information.", 16, "Survey"
Exit Sub
End If

'Check if there's anybody to send an invitation to...
If doc.getItemValue( "sendto" )(0) = "" Then Exit Sub

'Now create the mail to be send
Dim mail As New NotesDocument( session.currentDatabase )
Dim part1, part2, part3
Call mail.replaceItemValue( "Form", "Memo" )
Call mail.replaceItemValue( "Subject", doc.getItemValue( "subject" )(0))
part1 = Left( body, Instr( body, "<link>" ) -1 )
body = Right( body, Len( body ) -Len( part1 ) -6 )
part2 = Left( body, Instr( body, "<login>" ) -1 )
part3 = Right( body, Len( body ) -Len( part2 ) -7 )

'Pick up the survey
Dim survey As NotesDocument
Dim view As NotesView
Set view = session.currentDatabase.getView( "Surveys" )
Set survey = view.getDocumentByKey( doc.getItemValue( "survey" )(0), True )
If survey Is Nothing Then
Msgbox "The survey document could not be found.", 16, "Survey"
Exit Sub
End If
If survey.getItemValue( "url" )(0) = "" Then
Msgbox "The survey has no URL specified - cannot send invitations.", 16, "Survey"
Exit Sub
End If

'Add the href to <part1>, and join part2
[B]part1 = part1 & survey.getItemValue( "url" )(0) & part2[/B] - вот в этом месте из поля url берётся значение но даже если поле сделать ричтекстом или натянуть Hotspot на поле url, то всё равно когда письмо приходит к пользователю гипертекст не отображается...а отображается как просто один литой текст?

Domino6 · 25.10.2005

(Gor @ 25:10:2005, 08:12 )то всё равно когда письмо приходит к пользователю гипертекст не отображается...а отображается как просто один литой текст?

[snapback]26259" rel="nofollow" target="_blank[/snapback]

[/quote]
Так ты хочеш сформировать HTML содержимое письма ?

Тогда работай через майм или выставь свойства ричтекста "хранить содержимое в шимл и майм"

Gor · 26.10.2005

Да формируется html содержимое письма...

выставь свойства ричтекста "хранить содержимое в шимл и майм"

В свойствах поля url (Rich text) выставил галку - Store contents as HTML and Mime. Но всё равно результат тот же.... пользователю приходит письмо но ссылка на сервак отображается просто как текст а не гипертекст.

Тогда работай через майм

Чё то не совсем понятно в каком смысле? МАЙМ же это вроде формат письма для пересылки по SMTP протоколу...?! мож я туплю))) объясните пож-та

И ещё один попутно небольшой вопрос задам
почему то по этой ссылке база не открывается((хотя вроде бы синтаксис правильный...???????

Ссылка скрыта от гостей

В свойствах БД стоит галка открывать фреймсет при открытии бд
адаптированный под WEB?

Gor · 27.10.2005

И ещё один попутно небольшой вопрос задам
почему то по этой ссылке база не открывается((хотя вроде бы синтаксис правильный...???????

Ссылка скрыта от гостей

В свойствах БД стоит галка открывать фреймсет при открытии бд
адаптированный под WEB?

- этот вопрос у меня отпал))[/QUOTE]
путь такой вот надо было писать ок-тся -

Ссылка скрыта от гостей

А вот этот вопрос ещё остался.........

Да формируется html содержимое письма...

QUOTE
выставь свойства ричтекста "хранить содержимое в шимл и майм"

В свойствах поля url (Rich text) выставил галку - Store contents as HTML and Mime. Но всё равно результат тот же.... пользователю приходит письмо но ссылка на сервак отображается просто как текст а не гипертекст.

QUOTE
Тогда работай через майм

Чё то не совсем понятно в каком смысле? МАЙМ же это вроде формат письма для пересылки по SMTP протоколу...?! мож я туплю))) объясните пож-та

Domino6 · 27.10.2005

(Gor @ 27:10:2005, 08:34 )МАЙМ же это вроде формат письма для пересылки

[snapback]26364" rel="nofollow" target="_blank[/snapback]

[/quote]
Да именно , только можно и программно формировать майм содержимое ричтекста. Я про программный способи говорил

Все сервисы Codeby

Поиск

Поиск

Диалоги Lotus developers

Domino6

Gor

Domino6

Guest

Domino6

Guest

Medevic

Что это ? :)

Domino6

Gor

Domino6

Guest

Domino6

Guest

Domino6

Guest

Gor

Domino6

Gor

Gor

Domino6