问题描述：

在CATIAV5 R26中，我试图将与General --> Document选项卡相关的CATSettings转储到catvbs。CATIA V5 - dump通用/文档CATSettings到catvbs

认为这应该是对我的最终目标的第一步：完全用宏自动设置的，因为它是在官方文档（http://www.maruf.ca/files/caadoc/CAAScdInfTechArticles/CAAInfSettings.htm）

我希望转储功能创建一个包含catvbs建议所有的设置只有DLName设置被写入：结果是General-Document.catvbs仅包含来自CATSysDLNameSettingCtrl的设置

大多数设置（例如“文档环境”或“链接文档本地化”中的设置）部分（见下图）不会被导出。

这是有意图吗？这是一个错误？我如何确保将所有设置导出到catvbs？

CATSettings标签

甩一般-Document.catvbs

Language="VBSCRIPT" 

Sub CATMain() 

Set settingControllers1 = CATIA.SettingControllers 

Set dLNameSettingAtt1 = settingControllers1.Item("CATSysDLNameSettingCtrl") 

Dim boolean1 
boolean1 = dLNameSettingAtt1.DLNameCreationRight 
'-------------------------------------------------- 
' Returned value : (Boolean) True 
'-------------------------------------------------- 

Dim bSTR1 
bSTR1 = "" 
Dim bSTR2 
bSTR2 = "" 
Dim boolean2 
boolean2 = dLNameSettingAtt1.GetDLNameCreationRightInfo(bSTR1, bSTR2) 
'-------------------------------------------------- 
' Parameter 1 : (String) "Set at Admin Level 1" 
' Parameter 2 : (String) "Locked at Admin Level 1" 
' Returned value : (Boolean) False 
'-------------------------------------------------- 

Dim boolean3 
boolean3 = dLNameSettingAtt1.RootDLNameCreationRight 
'-------------------------------------------------- 
' Returned value : (Boolean) True 
'-------------------------------------------------- 

Dim bSTR3 
bSTR3 = "" 
Dim bSTR4 
bSTR4 = "" 
Dim boolean4 
boolean4 = dLNameSettingAtt1.GetRootDLNameCreationRightInfo(bSTR3, bSTR4) 
'-------------------------------------------------- 
' Parameter 1 : (String) "Default value" 
' Parameter 2 : (String) "Unlocked" 
' Returned value : (Boolean) False 
'-------------------------------------------------- 

Dim arrayOfVariantOfBSTR1 
arrayOfVariantOfBSTR1 = dLNameSettingAtt1.GetDLNameList() 
'-------------------------------------------------- 
' Returned value : (Array) 
' Array[0] : (Variant) (String) "My Sample DL Name" 
'-------------------------------------------------- 

Dim bSTR5 
bSTR5 = "" 
Dim bSTR6 
bSTR6 = "" 
Dim bSTR7 
bSTR7 = "" 
dLNameSettingAtt1.GetDLName "My Sample DL Name", bSTR5, bSTR6, bSTR7 
'-------------------------------------------------- 
' Parameter 1 : (String) "My Sample DL Name" 
' Parameter 2 : (String) "/tmp/here" 
' Parameter 3 : (String) "${MY_SAMPLE_VAR}" 
' Parameter 4 : (String) "" 
'-------------------------------------------------- 

Dim bSTR8 
bSTR8 = "" 
Dim bSTR9 
bSTR9 = "" 
Dim boolean5 
boolean5 = dLNameSettingAtt1.GetDLNameInfo("My Sample DL Name", bSTR8, bSTR9) 
'-------------------------------------------------- 
' Parameter 1 : (String) "My Sample DL Name" 
' Parameter 2 : (String) "Set at Admin Level 1" 
' Parameter 3 : (String) "Unlocked" 
' Returned value : (Boolean) False 
'-------------------------------------------------- 

End Sub

“考虑到这应该是实现我的最终目标的第一步：使用宏完全自动化设置，正如官方文档中所建议的那样。”我不认为这是完全有效的。我不记得一个V5版本，其中至少有所有可通过自动化API访问的重要设置。 – gdir

答

我的错误，我误解你的问题。我会删除自己这个答案，但我似乎我不能这样做。

对于你的情况，似乎只有DLNames是允许的，我想你只会得到那个catvbs。

如果你想要所有catvbs的所有catvbss，那么你需要做的是在图片的下方（见红色箭头）。

谢谢@Ferdo，但我已经尝试了“这个标签页”的选项（在General \ Document选项卡中）和选项“所有标签页”，希望所有设置（对于所有页面）都将被导出，但没有结果。 –

答

恐怕不是所有的CATSettings暴露于自动化（如GDIR正确地指出），包括我在寻找。

，你可以在文档（重点煤矿）看到

除了使用工具 - >选项...命令，许多设置可以进行管理和使用自动化给予...

很多，不是全部。据我所知，这可悲地阻止了CATSettings的全自动化。

CATIA V5 - dump通用/文档CATSettings到catvbs

CATSettings标签

甩一般-Document.catvbs

相关推荐