ใน LWF 7 จะใช้ javascript ในการสร้างรายการ แต่ในกรณีที่คุณ nonnyboom ทำอยู่คือใช้ Agent ในการสร้างซึ่งในการทำงานจะทำให้มีเอกสารเกิดขึ้นหลังจากที่รัน agent ไปแล้ว ซึ่งถ้าผมเข้าใจไม่ผิดคงจะใช้วิธีนี้อยู่ โดยการเรียกใช้ Workflow API ในการทำงาน ลองสังเกตุดูจากคำสั่งจะเห็นว่ามีการส่งค่าของ maindoc เข้าไปด้วยได้ดังนันเราจึงสามารถไปเปิดเอกสารโดยใช้คำสั่ง print ในการ open เอกสาร maindoc ได้ จากตัวอย่างอาจจะไม่สมบรูณ์ (ผมเขียนสดไม่ได้ complie) แต่คิดว่าคงพอได้แนวทางครับ
dim db as NotesDatabase
dim s as New NotesSession
dim maindoc as NotesDocument
set db = s.CurrentDatabase
set maindoc = New NotesDocument(db)
ProcssName = "Your Process"
JobName = "Your Job Name"
success = DWFJobInitiate(ProcessName,JobName, "2. Medium", True, maindoc, "", ErrorMsg, Errorcode)
If success Then
call maindoc.save(true, false)
dummy = Evaluate(|@WebDBName|)
m_strpath = dummy(0) & "/0/" & maindoc.UniversalID & "?opendocument"
Print "[" & m_strPath & "]"
End If |