Microsoft Project Revision number

[Weird]

Hi,
Does anyone knows where is the information of the Revision
number kept behind?
the revision number i'm referring to is file->properties-

statistic->revision number

I'm able to see the changes there but when i call the
value out using ole db calling ProjectRevision the value
is always 0 other than following the changes.
Can someone out here help me with this problem?

thanx alot.

 

[Mark Durrenberger]

This code *should* work except the second for loop pukes at 10 and I don't
know why (there are 30 custom doc properties)... of course "revision number"
no doubt has an item number higher than 10...

Mark


Sub Macro1()

For i = 1 To ActiveProject.BuiltinDocumentProperties.Count
MsgBox i & " " & ActiveProject.BuiltinDocumentProperties.Item(i),
vbOKOnly, "Builtin"
Next i
'
For i = 1 To ActiveProject.CustomDocumentProperties.Count
MsgBox i & " " & ActiveProject.CustomDocumentProperties.Item(i), vbOKOnly,
"Custom"
Next i

End Sub


--
_________________________________________________________
Mark Durrenberger, PMP
Principal, Oak Associates, Inc, www.oakinc.com
"Advancing the Theory and Practice of Project Management"
________________________________________________________

The nicest thing about NOT planning is that failure
comes as a complete surprise and is not preceded by
a period of worry and depression.

- Sir John Harvey-Jones

 

[Mark Durrenberger]

This actually works...

a = ActiveProject.BuiltinDocumentProperties.Item("Revision Number")

and I still don't know why the code in my previous post crashes after
Item(10)

--
_________________________________________________________
Mark Durrenberger, PMP
Principal, Oak Associates, Inc, www.oakinc.com
"Advancing the Theory and Practice of Project Management"
________________________________________________________

The nicest thing about NOT planning is that failure
comes as a complete surprise and is not preceded by
a period of worry and depression.

- Sir John Harvey-Jones