Created on Jul 18, 2008, 9:46 AM by 9notes
กำลังทำระบบ survey อยู่หรือเปล่าครับ Dim s As New NotesSession
Set w = New NotesUIWorkspace
Set s = New NotesSession
Set db = s.CurrentDatabase Set note = New NotesDocument(db)
note.SendTo = ""
note.SubjectTo = ""
If Not w.DialogBox("NamesPrompt", True, Tr
Read More
|