Простые операции на Ls

Cleric-Lviv

Well-Known Member
Lotus team
03.01.2008
600
0
33
Lemberg
#1
Всем привет!
вопросов много :) но вот литератури мало:(
никогда не програмировал.......но теперь пришлось
учусь с самого легкого пробую писать кнопки на lotusscript
типа Save вишло
Код:
Sub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = ws.currentdocument
Call uidoc.save
Call uidoc.Close
End Sub
нормально
вот пробую edit
Код:
Sub Click(Source As Button)
Dim ws As NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = ws.CurrentDocument
uidoc.EditMode = True
End Sub
неканает :(
ну и чтото пробивал на скрипте следующую команду @command([compose]; "form")
здесь глушняк полний как задать форму?
Код:
Sub Click(Source As Button)
Dim ws As NotesUIWorkspace
Dim sesion As New NotesSession
Dim form As NotesForm
Dim uidoc As NotesUIDocument

????	 = "ADMCR"	---типа форма
End Sub
может кто хорошую книгу подкинет еще:blink:))))) буду признателен!!!!
 

morpheus

скриптописец
07.08.2006
3 915
1
34
Украина, Киев
#2
Код:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim ws As NotesUIWorkspace
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set doc = New NotesDocument ( db )
doc.Form = "ADMCR"
call ws.editdocument( true, doc )
 

Cleric-Lviv

Well-Known Member
Lotus team
03.01.2008
600
0
33
Lemberg
#3
Morpheus
спасибо, но на будующее плиз просто толкой в правильное направление а то так и не научусь:)
 

Akupaka

А че я?.. О.о
04.10.2007
3 360
2
34
Kiev, Ukraine
#4
пробуй пользоваться справкой, там много того, что нужно :)

notesUIWorkspace.ComposeDocument( [ server$ [, file$ [, form$...)
 

abbatik

Well-Known Member
Lotus team
20.10.2008
277
0
35
Москва
#5
В простых кнопках лучше юзать формулы.

Сохранить и заркрыть - @If ( @Command ( [FileSave] ) ; @Command ( [FileCloseWindow] ) ; @Return ("") )
Просто сохарнить соответственно @Command ( [FileSave] )
Редактировать @Command ( [EditDocument] )
 

Omh

Well-Known Member
Lotus team
04.07.2007
2 210
1
37
Латвиджа, Рига
#6
Ещё можно не использовать dot-notation, а спец. ф-ии NotesDocument'a.
Т.е. вместо
Код:
doc.Form = "Z"
писать
Код:
doc.ReplaceItemValue("Form", "Z")