Guys,I want to extrude a center rectangle using api.
#To draw a center rectangle and exit the sketch
swApp.Visible = True
swModel = swApp.INewPart()
swModel = swApp.IActiveDoc2
swExt = swModel.Extension
swSelMgr = swModel.SelectionManager
skManager = swModel.SketchManager
boolstatus = swExt.SelectByID2("Front Plane", "PLANE", 0, 0, 0, False, 0, Nothing, 0)
skManager.InsertSketch(True)
Centerrectangle() # sub program called for drawing a center rectangle
skManager.InsertSketch(True)
# Zoom to fit and isometric view, rotate the component
swModel.ViewZoomtofit2()
swModel.ShowNamedView2("*Trimetric", 8)
swModel.ViewRotate()
# Select all edges and points for the current center rectangle
boolstatus = swExt.SelectByID2("Edge", swSelectType_e.swSelEDGES, 0, 0, 0, False, 0, Nothing, 0)
boolstatus = swExt.SelectByID2("Points", swSelectType_e.swSelSKETCHPOINTS, 0, 0, 0, False, 0, Nothing, 0)
# Converting depths from 'm' to 'mm'
Dim D1 As Double = depth1.Text / 1000
Dim D2 As Double = depth1.Text / 1000
# Extrusion feature
myfeature = features1.FeatureExtrusion3(True, False, False, swEndConditions_e.swEndCondBlind, swEndConditions_e.swEndCondBlind, D1, D2, False, False, False, False, 0, 0, False, False, False, False, True, True, True, swStartConditions_e.swStartSketchPlane, 0, False)
I've selected all the points and edges on the curve and given a extrusion feature program, but the extrusion feature fails to execute.
Did I miss something?
SolidworksApi macros