Create a workpoint

Create a workpoint

Anonymous
Not applicable
532 Views
3 Replies
Message 1 of 4

Create a workpoint

Anonymous
Not applicable
I want to write a code to create a work point using a plane and an axis;
however, I can't find that option
Any himt, Please
Thx, CVA

--
www.CVAengineering.com

IV11 Pro. sp2 and IV2008 Pro. sp1
Vault 2008 sp1
Window XP Pro sp2
Pentium 3.2 Ghz, 3.0 GB of RAM
NVIDIA FX 3400 91.85
SpacePilot V 3.3.6
0 Likes
533 Views
3 Replies
Replies (3)
Message 2 of 4

Anonymous
Not applicable
I'd hope not all of you already in Vegas for convention ...
CVA

--
www.CVAengineering.com

IV11 Pro. sp2 and IV2008 Pro. sp1
Vault 2008 sp1
Window XP Pro sp2
Pentium 3.2 Ghz, 3.0 GB of RAM
NVIDIA FX 3400 91.85
SpacePilot V 3.3.6
"CVAengineering" wrote in message
news:5786694@discussion.autodesk.com...
I want to write a code to create a work point using a plane and an axis;
however, I can't find that option
Any himt, Please
Thx, CVA

--
www.CVAengineering.com

IV11 Pro. sp2 and IV2008 Pro. sp1
Vault 2008 sp1
Window XP Pro sp2
Pentium 3.2 Ghz, 3.0 GB of RAM
NVIDIA FX 3400 91.85
SpacePilot V 3.3.6
0 Likes
Message 3 of 4

Anonymous
Not applicable
You should be able to use WorkPoints.AddByCurveAndEntity to create a work
point using a work plane and a work axis. Below is the sample code for it on
Inventor 2008.

Sub CreateWorkPoint()
Dim oDoc As PartDocument
Set oDoc = ThisApplication.Documents.Add(kPartDocumentObject,
ThisApplication.FileManager.GetTemplateFile(kPartDocumentObject), True)

Dim oComp As PartComponentDefinition
Set oComp = oDoc.ComponentDefinition

Dim oWorkPoint As WorkPoint
Set oWorkPoint = oComp.WorkPoints.AddByCurveAndEntity(oComp.WorkAxes("Z
Axis"), oComp.WorkPlanes("XY Plane"))
End Sub

Thanks,
Frodo

"CVAengineering" wrote in message
news:5786694@discussion.autodesk.com...
I want to write a code to create a work point using a plane and an axis;
however, I can't find that option
Any himt, Please
Thx, CVA

--
www.CVAengineering.com

IV11 Pro. sp2 and IV2008 Pro. sp1
Vault 2008 sp1
Window XP Pro sp2
Pentium 3.2 Ghz, 3.0 GB of RAM
NVIDIA FX 3400 91.85
SpacePilot V 3.3.6
0 Likes
Message 4 of 4

Anonymous
Not applicable
Thx, Frodo.
I never thought of "AddByCurveAndEntity" can be used for createing a wpoint
using a wplane and an axis
I should try before posting
CVA

--
www.CVAengineering.com

IV11 Pro. sp2 and IV2008 Pro. sp1
Vault 2008 sp1
Window XP Pro sp2
Pentium 3.2 Ghz, 3.0 GB of RAM
NVIDIA FX 3400 91.85
SpacePilot V 3.3.6
"Tingfang Zhou (Autodesk)" wrote in message
news:5786907@discussion.autodesk.com...
You should be able to use WorkPoints.AddByCurveAndEntity to create a work
point using a work plane and a work axis. Below is the sample code for it on
Inventor 2008.

Sub CreateWorkPoint()
Dim oDoc As PartDocument
Set oDoc = ThisApplication.Documents.Add(kPartDocumentObject,
ThisApplication.FileManager.GetTemplateFile(kPartDocumentObject), True)

Dim oComp As PartComponentDefinition
Set oComp = oDoc.ComponentDefinition

Dim oWorkPoint As WorkPoint
Set oWorkPoint = oComp.WorkPoints.AddByCurveAndEntity(oComp.WorkAxes("Z
Axis"), oComp.WorkPlanes("XY Plane"))
End Sub

Thanks,
Frodo

"CVAengineering" wrote in message
news:5786694@discussion.autodesk.com...
I want to write a code to create a work point using a plane and an axis;
however, I can't find that option
Any himt, Please
Thx, CVA

--
www.CVAengineering.com

IV11 Pro. sp2 and IV2008 Pro. sp1
Vault 2008 sp1
Window XP Pro sp2
Pentium 3.2 Ghz, 3.0 GB of RAM
NVIDIA FX 3400 91.85
SpacePilot V 3.3.6
0 Likes