ビューの最初の文書の作成日時を取得(NotesDocument クラス)

Sub Initialize
	Dim session As New NotesSession
	Dim db As NotesDatabase
	Dim view As NotesView
	Dim doc As NotesDocument
	Set db = session.Currentdatabase
	Set view = db.GetView("vwAll")
	Set doc = view.Getfirstdocument()
	Print doc.Created
End Sub





LotusScript 入門 Step1-4 NotesDocument

5行目 NotesDocument クラスの変数 doc を宣言
8行目 NotesView クラスの GetFirstDocument メソッドからビューの最初の文書を取得、変数 doc に格納。その際、Set ステートメントを使用
9行目 NotesDocument クラスの Created プロパティから文書が作成された日付/時刻を取得。Print ステートメントを使って、名前をクライアントのステータスバーに表示

LotusScript
tyoshida
April 28, 2018 at 5:31 PM
Rating
0





No comments yetLogin first to comment...