Forum: สอบถามปัญหา Notes ทางด้านพัฒนาโปรแกรม (Note Client) |
Tags1: | Created on Mar 6, 2008, 3:24 PM by 9notes/9Notes|Topic Responses: 12 |
&action=openDocument&documentId=27FA |
Dim w as New NotesUIWorkspace
Dim uidoc as NotesUIDocument
set uidoc = w.CurrentDocument
set note = uidoc.Document
Dim tmplist as Variant
' ........... อันนี้เราไป get doc มาจากที่อื่นนะครับ ............
set doc = view.GetDocumentByKey(Key)
note.DateBegin = doc.StartDate
note.DateEnd = doc.EndDate
' .. เราก็ move มาลงใน currentdoc แล้ว evaluate ต่อเลยครับ ...
tmplist = Evaluate({@BusinessDays([DateBegin; DateEnd; 1 : 7)}, note)
:yellow_cool.gif:
[quote]ปัญหาของผมคือไอ้ DateBegin กับ DateEnd มันไม่ใช่ Field ใน Document นี้น่ะครับ
มันเป็นตัวแปรที่รับค่ามาจาก Document อื่น จะทำยังไงดีครับ
[quote]ใช้ได้เกือบทุก Function ครับ แต่กับ @command ไม่ได้ครับ ตามนี้เลยครับ
Dim w as New NotesUIWorkspace
Dim uidoc as NotesUIDocument
set uidoc = w.CurrentDocument
set note = uidoc.Document
Dim tmplist as Variant
tmplist = Evaluate({@BusinessDays([DateBegin; DateEnd; 1 : 7)}, note)
:yellow_cool.gif:[/quote][/quote] |
|