查看单个帖子
旧 2009-04-13, 12:42 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】macro to update cut lis

macro to update cut list
i'm trying to use the following to force an update to the cutlist of a weldment with no success.
any body else have code to manually update the cut list?
description
this method updates an automatically generated cut list.
syntax (ole automation)
retval = bodyfolder.updatecutlist ()
output (variant_bool) retval true to update an automatically generated cut list, false to not or false because the document does not contain an automatically generated cut list
thanks
dim mybodyfolder as bodyfolder = nothing
dim mysubfeature as feature = mydoc.firstfeature
do while not myfeature is nothing
if myfeature.gettypename2 = "solidbodyfolder" then
mybodyfolder = myfeature.getspecificfeature2
if mybodyfolder.updatecutlist then
exit do
end if
end if
myfeature = myfeature.getnextfeature
loop
--john
thanks for the help. that gave me what i needed.
thanks again!
dan
quick
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)