|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
下面的代码可以给文件添加自定义属性，但添加时文件如Part1必须在SE中关闭，请问如果想给SE中当前打开的文件添加属性该如何修改？谢谢
6 ^" K3 c' r0 ]$ v) jDim objPropertySets As SolidEdgeFileProperties.PropertySets
5 `& |6 _6 ` g1 n8 ?Dim objProperties As SolidEdgeFileProperties.Properties
, r* ~) ]4 e+ HDim objProperty As SolidEdgeFileProperties.Property! X3 x3 f/ _- W; c
1 v& I" b, ]: L1 z8 X
Set objPropertySets = New SolidEdgeFileProperties.PropertySets8 ?5 w9 b1 y) D1 S- }. R7 c
Call objPropertySets.Open("C:\Part1.par", False)
# b4 v( t0 o1 J0 ]4 PSet objProperties = objPropertySets.Item("Custom")- r+ O5 d6 G6 J6 P3 J% Q( D, @
Set objProperty = objProperties.Add("My Custom Property", "My Custom Value") |
|
发表于 2008-10-19 18:04:43