두 가지 서식있는 텍스트 필드를 비교하는 방법

Question

form1에 body라는 두 개의 richtext 필드와 form2에 body1이라는 내용을 비교하는 스크립트가 필요합니다. richtext 유형 필드가 포함 된 두 개의 서식을 작성하고 분류보기를 작성하고이보기에서 비교라는 단추를 작성합니다.이 단추는이 두 가지 포함 항목을 비교하여 메시지로 표시합니다.

Sub Click(Source As Button) 

Dim session As NotesSession 
Dim db As NotesDatabase 
Dim dc As NotesDocumentCollection 
Dim doc, doc1 As NotesDocument 
Dim body, body1 As Variant 
Dim view As NotesView 
Dim rtitem As NotesRichTextItem 

Set session = New NotesSession 
Set db = session.CurrentDatabase 
Set dc = db.UnprocessedDocuments 
Set doc = dc.GetFirstDocument 
Set doc1=dc.GetNextDocument(doc) 

body = doc.GetItemValue("body") 
Msgbox body(0), ,"Richtext field of First form" 

body1=doc1.GetItemValue("body1") 
Msgbox body1(0) ,, "Rich Text field of Second form" 


'If body.value=body1.value Then 
Msgbox"both are same" 
'End If 
Msgbox"both are different" 

End Sub 

Answer 1

수동으로해야합니다. 여기에 설명 된대로 당신은 검색 기능을 사용할 수 있습니다 전체 내용 BOX2에서 OPF BOX1에 대한

http://msdn.microsoft.com/en-us/library/bb787877%28VS.85%29.aspx#re_operations

검색. 일치하는 항목이 있으면이 일치 항목이 box2의 유일한 내용인지 확인하십시오. 그렇다면 내용은 동일합니다.