It says "the object invoked has disconnected from its clients"
I'm trying to draw an arc and then extrude it as a thin feature...
Here's my code:
Part.ClearSelection2 True boolstatus = Part.Extension.SelectByID("XY (Front)", "PLANE", 0, 0, 0, False, 0, Nothing) 'start sketching Part.InsertSketch2 (True) Part.CreateArc2 0, 0, z, 1, 1, z, -1, 1, z, 1 Part.InsertSketch2 False
boolstatus = Part.Extension.SelectByID("Sketch1", "SKETCH", 0, 0, 0, False, 0, Nothing) empty_var = Part.FeatureBossThin2(True, True, False, swEndCondBlind, swEndCondBlind, 1 * 0.0254, 0, False, False, False, False, 0, 0, False, False, False, False, 0.03 * 0.0254, 0.03 * 0.0254, 0.03 *
0.0254, 0, 0, False, 0)
End
VB highlights the empty_var = Part.FeatureBossThin2 line. I've gone over the inputs over and over and I can't see the problem. When I run the macro once, it creates a sketch, then gives me that error. If I run the macro again (after having run it once already) it actually extrudes the arc and gives me the same error message again. If I go and manually edit the feature (the extruded arc) after it is created, an error box comes up:
"Please enter a number greater than or equal to blablabla and less than bla bla bla"
I just press OK and then press OK again to exit the feature edit box, and everything seems fine after that (if I go to edit the feature again, I don't get the error). I tried changing all the numbers (the ones with data type double) to values of various sorts but doesn't fix it.
I can't use it as it is (using the workaround above) because I want to repeat this arc over and over at different sizes and locations, so I cant go back and edit this manually each time because there will be too many, so I have to get rid of the error. Any suggestions?
Thanks, Mike