Właściwość DocumentBase.RevisedDocumentTitle —
Po wykonaniu operacja porównania dokument tylko zmiany prawne, otrzymuje tytuł recenzowanym dokumencie.
Przestrzeń nazw: Microsoft.Office.Tools.Word
Zestaw: Microsoft.Office.Tools.Word.v4.0.Utilities (w Microsoft.Office.Tools.Word.v4.0.Utilities.dll)
Składnia
'Deklaracja
Public ReadOnly Property RevisedDocumentTitle As String
public string RevisedDocumentTitle { get; }
Wartość właściwości
Typ: System.String
Tytuł recenzowanym dokumencie po wykonaniu operacja porównania dokument tylko zmiany prawnej.
Uwagi
Aby wykonać operację Porównaj dokumentu tylko zmiany prawne, należy użyć CompareDocuments metoda Application właściwość.
Przykłady
W poniższym przykładzie kodu porównanie dokumentów programu Word w dostosowania poziomie dokumentu (nazywany oryginalnego dokumentu) z inną wersją tego samego dokumentu (nazywane recenzowanym dokumencie).Umieszcza on wyników porównania do oryginalnego dokumentu.W przykładzie następnie powiadamia użytkownika, czy tytuł oryginalnego dokumentu i tytuł recenzowanym dokumencie są identyczne lub różne i wyświetla zarówno tytuły dokumentów.Aby wykorzystać ten przykład, należy uruchomić go z ThisDocument klasy w projekcie na poziomie dokumentu.
Private Sub GetDocumentTitlesAfterComparison()
Dim originalFileName As Object = "c:\myDocs\HikingGuide.docx"
Dim originalDoc As Word.Document = Me.Application.Documents.Open( _
originalFileName)
Dim revisedFileName As Object = "c:\myDocs\RevisedHikingGuide.docx"
Dim revisedDoc As Word.Document = Me.Application.Documents.Open( _
revisedFileName)
Me.Application.CompareDocuments( _
originalDoc, revisedDoc, _
Word.WdCompareDestination.wdCompareDestinationOriginal, _
Word.WdGranularity.wdGranularityWordLevel, True, True, _
True, True, True, True, True, True, True, True, "", True)
Dim sb As StringBuilder = New StringBuilder()
If Me.OriginalDocumentTitle = Me.RevisedDocumentTitle Then
sb.Append("The titles of the orginal and revised document are identical.")
Else
sb.Append("The titles of the orginal and revised document are different.")
End If
sb.Append( _
vbCrLf + "Title of original document: " _
+ Me.OriginalDocumentTitle _
+ vbCrLf + "Title of revised document: " _
+ Me.RevisedDocumentTitle)
MessageBox.Show(sb.ToString())
End Sub
private void GetDocumentTitlesAfterComparison()
{
object OriginalFileName = @"c:\myDocs\HikingGuide.docx";
Word.Document originalDoc = this.Application.Documents.Open(
ref OriginalFileName, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing);
object RevisedFileName = @"c:\myDocs\RevisedHikingGuide.docx";
Word.Document revisedDoc = this.Application.Documents.Open(
ref RevisedFileName, ref missing, ref missing, ref missing, ref missing,
ref missing,ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,ref missing,
ref missing);
this.Application.CompareDocuments(
originalDoc, revisedDoc,
Word.WdCompareDestination.wdCompareDestinationOriginal,
Word.WdGranularity.wdGranularityWordLevel, true, true,
true, true, true, true, true, true, true, true, "", true);
StringBuilder sb = new StringBuilder();
if (this.OriginalDocumentTitle == this.RevisedDocumentTitle)
{
sb.Append(
"The titles of the orginal and revised document are identical.");
}
else
{
sb.Append(
"The titles of the orginal and revised document are different.");
}
sb.Append(
"\r\nTitle of original document: " + this.OriginalDocumentTitle
+ "\r\nTitle of revised document: " + this.RevisedDocumentTitle);
MessageBox.Show(sb.ToString());
}
Zabezpieczenia programu .NET Framework
- Pełne zaufanie do bezpośredniego wywołującego. Tego elementu członkowskiego nie można używać w kodzie częściowo zaufanym. Aby uzyskać więcej informacji, zobacz Przy użyciu bibliotek z częściowo zaufanego kodu..