.NET

Reply
*Tomi
Message 1 of 1 (119 Views)

SummaryInfo CustomProperties

119 Views, 0 Replies
11-28-2005 08:50 AM
Hi,
I'm trying to read FileSummaryInfo.Customproperties but I get an error
while trying to read the entries. Any ideas what I'm missing/doing wrong in
here?

/ Tomi


Public Shared Function GetCustomProperty(ByVal doc As Document, ByVal
szCustomProp As String) As String
Dim oAcadSummaryInfo As DatabaseSummaryInfo
Dim oAcadDB As Database = doc.Database
oAcadSummaryInfo = oAcadDB.SummaryInfo
Try
Dim oCustomProps As System.Collections.IDictionaryEnumerator =
oAcadSummaryInfo.CustomProperties
oCustomProps.Reset()
oCustomProps.MoveNext()
Do While oCustomProps.MoveNext = True
If oCustomProps.Key = szCustomProp Then
Return oCustomProps.Value.ToString
End If
oCustomProps.MoveNext()
Loop
Catch
Return Nothing
End Try
End Function

You are not logged in.

Log into access your profile, ask and answer questions, share ideas and more. Haven't signed up yet? Register

Announcements
Welcome to the new Autodesk Community!
If this is your first visit, click here to get started and make the most of the Community. Let us know what you think of the new experience in the Community Feedback Forum.

Need installation help?

Start with some of our most frequented solutions to get help installing your software.

Ask the Community