Solved

How can I programmatically remove Custom Document Properties from Word Documents?

Posted on 2008-09-29
6
5,834 Views
Last Modified: 2008-10-05
I have been working on a project that requires me to be able to add and remove custom document properties from Word documents.  It was fairly easy to find demonstrations on how to add/view Custom Document properties, but I have been unable to remove them.  How can I do this? I've included examples I found of how to add/view.
public void ReadCustom()
{
	object oDocCustomProps = _document.CustomDocumentProperties;
	Type typeDocCustomProps = oDocCustomProps.GetType();
 
	string strIndex = "Knowledge Base Article";
	string strValue;
	try
	{
		object oKBProp = typeDocCustomProps.InvokeMember("Item",
															 BindingFlags.Default |
															 BindingFlags.GetProperty,
															 null, oDocCustomProps,
															 new object[] { strIndex });
		Type typeKBProp = oKBProp.GetType();
		strValue = typeKBProp.InvokeMember("Value",
															 BindingFlags.Default |
															 BindingFlags.GetProperty,
															 null, oKBProp,
															 new object[] { }).ToString();
		MessageBox.Show("The KB is: " + strValue, "KB");
	}
	catch (TargetInvocationException ex)
	{
		MessageBox.Show(strIndex + " does not exist");
	}
}
 
public void DeleteCustom()
{
	object oDocCustomProps = _document.CustomDocumentProperties;
	Type typeDocCustomProps = oDocCustomProps.GetType();
 
	string strIndex = "Knowledge Base Article";
	string strValue;
	object oKBProp = typeDocCustomProps.InvokeMember("Remove",
														 BindingFlags.Default |
														 BindingFlags.GetProperty,
														 null, oDocCustomProps,
														 new object[] { strIndex });
	
}

Open in new window

0
Comment
Question by:guxiyou
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
6 Comments
 
LVL 8

Assisted Solution

by:Bradley Haynes
Bradley Haynes earned 200 total points
ID: 22601689
I found this at:  http://www.aspose.com/community/forums/142488/custom-document-properties-yes-no-field/showthread.aspx

This may be what you need:
Document doc = new Document(@"Test064\in.doc");

doc.CustomDocumentProperties["test"].Value = false;

doc.Range.UpdateFields();

doc.Save(@"Test064\out.doc");
0
 
LVL 76

Assisted Solution

by:GrahamSkan
GrahamSkan earned 200 total points
ID: 22603869
This is a tested Word macro to do that.
Sub ClearDocProperties(wdDoc As Word.Document)
    Dim wdProp As Office.DocumentProperty
    
    For Each wdProp In wdDoc.CustomDocumentProperties
        wdProp.Delete
    Next wdProp
End Sub

Open in new window

0
 

Author Comment

by:guxiyou
ID: 22606490
Graham Skan:

I've see this example in several bogs/help sites, but it doesn't appear to work in C#. Whenever I try it I get errors, specifically I get:

"Unable to cast COM object of type 'System.__ComObject' to interface type 'Microsoft.Office.Core.DocumentProperties'. This operation failed because the QueryInterface call on the COM component for the interface with IID '{2DF8D04D-5BFA-101B-BDE5-00AA0044DE52}' failed due to the following error: No such interface supported (Exception from HRESULT: 0x80004002 (E_NOINTERFACE)).
public void DeleteCustom()
{
	DocumentProperties properties = (DocumentProperties) _document.CustomDocumentProperties;
	foreach (DocumentProperty wdProp in properties)
	{
		wdProp.Delete();
	}
}

Open in new window

0
Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

 

Author Comment

by:guxiyou
ID: 22606567
b_haynes:

I tried the solution that you proposed, and it wouldn't compile, I got a, "Cannot apply indexing with [ ] to an expression of type 'object'. I'm tried casting it, but no matter how I cast it I still get problems.
0
 

Author Comment

by:guxiyou
ID: 22608087
Thanks for both your help.  Here I found a solution that seems to work:
public void DeleteCustom()
{
	object oDocCustomProps = _document.CustomDocumentProperties;
	Type typeDocCustomProps = oDocCustomProps.GetType();
 
	string strIndex = "PropertyName";
	try
	{
		object oKBProp = typeDocCustomProps.InvokeMember("Item",
															 BindingFlags.Default |
															 BindingFlags.GetProperty,
															 null, oDocCustomProps,
															 new object[] { strIndex });
		Type typeKBProp = oKBProp.GetType();
		typeKBProp.InvokeMember("Delete", BindingFlags.Default | BindingFlags.InvokeMethod, null, oKBProp, null);
	}
	catch { }
}

Open in new window

0
 

Accepted Solution

by:
guxiyou earned 0 total points
ID: 22608164
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I would like to show you some basics you can do with Mailings in MS Word. It´s quite handy feature you can use for creating envelopes, labels, personalized letters etc. First question could be what is this feature good for? Mailing can really he…
Shortcuts in Word Just the other day I had a training for Microsoft and they wanted me to show how well the new Windows and Office behaved on a touch device, which by the way is great, but it was only then that I realized that using keyboard shortc…
This video walks the viewer through the process of creating envelopes and labels, with multiple names and addresses. Navigate to the “Start Mail Merge” button in the Mailings tab: Follow the step-by-step process until asked to find the address doc…
Office 365 is currently available in five editions. Three of them are for business use: Office 365 Business Essentials, Office 365 Business, and Office 365 Business Premium. Two of them are for home/personal use: Office 365 Home and Office 365 Perso…

733 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question