{"id":54980,"date":"2017-09-29T09:33:02","date_gmt":"2017-09-29T09:33:02","guid":{"rendered":"\/forum\/forums\/reply\/54980\/"},"modified":"2017-09-29T09:33:02","modified_gmt":"2017-09-29T09:33:02","slug":"54980","status":"publish","type":"reply","link":"https:\/\/innovationspace.ansys.com\/forum\/forums\/reply\/54980\/","title":{"rendered":"Reply To: VBScript in Ansys Q3D extractor"},"content":{"rendered":"

This is the code <\/p>\n

<\/p>\n

Dim oAnsoftApp<\/span><\/p>\n

<\/p>\n

   Dim oDesktop<\/span><\/p>\n

<\/p>\n

   Dim oProject<\/span><\/p>\n

<\/p>\n

   Dim oDesign<\/span><\/p>\n

<\/p>\n

   Dim oEditor<\/span><\/p>\n

<\/p>\n

   Dim oModule<\/span><\/p>\n

<\/p>\n

   Set oAnsoftApp = CreateObject(“Q3DExtractor.ScriptInterface”)<\/span><\/p>\n

<\/p>\n

   Set oDesktop = oAnsoftApp.GetAppDesktop()    <\/span><\/p>\n

<\/p>\n

   oDesktop.NewProject    <\/span><\/p>\n

<\/p>\n

   Set oProject = oDesktop.GetActiveProject<\/span><\/p>\n

<\/p>\n

   oProject.InsertDesign “Q3D Extractor”, “Q3DDesign1”, “”, “”    <\/span><\/p>\n

<\/p>\n

   Set oDesign = oProject.SetActiveDesign(“Q3DDesign1”)<\/span><\/p>\n

<\/p>\n

   Set oEditor = oDesign.SetActiveEditor(“3D Modeler”)<\/span><\/p>\n

<\/p>\n

oEditor.ImportDXF (“NAME\"\"ptions”, “FileName:=”,  _<\/span><\/p>\n

<\/p>\n

  “C\"\"Users\/jawhar\/Desktop\/dfg\/wi3.dxf”, “Scale:=”, 0.001, “AutoDetectClosed:=”,  _<\/span><\/p>\n

<\/p>\n

  true, “SelfStitch:=”, true, “DefeatureGeometry:=”, false, “DefeatureDistance:=”,  _<\/span><\/p>\n

<\/p>\n

  0, “RoundCoordinates:=”, false, “RoundNumDigits:=”, 4, “WritePolyWithWidthAsFilledPoly:=”,  _<\/span><\/p>\n

<\/p>\n

  false, “ImportMethod:=”, 1, “2DSheetBodies:=”, false, (“NAME:LayerInfo”, (“NAME:0”, “source:=”,  _<\/span><\/p>\n

<\/p>\n

  “0”, “display_source:=”, “0”, “import:=”, true, “dest:=”, “0”, “dest_selected:=”,  _<\/span><\/p>\n

<\/p>\n

  false, “layer_type:=”, “signal”), (“NAME:cond”, “source:=”, “cond”, “display_source:=”,  _<\/span><\/p>\n

<\/p>\n

  “cond”, “import:=”, true, “dest:=”, “cond”, “dest_selected:=”, false, “layer_type:=”,  _<\/span><\/p>\n

<\/p>\n

  “signal”)))<\/span><\/p>\n

<\/p>\n

Set oEditor = oDesign.SetActiveEditor(“3D Modeler”)<\/span><\/p>\n

<\/p>\n

oEditor.Unite (“NAME:Selections”, “Selections:=”,  _<\/span><\/p>\n

<\/p>\n

  “cond_1,cond_2,cond_3,cond_26,cond_27,cond_39,cond_40,cond_52,cond_59,cond_60,c” & _ <\/span><\/p>\n

<\/p>\n

  “ond_4,cond_5,cond_28,cond_41,cond_53,cond_7,cond_29,cond_30,cond_42,cond_61,co” & _ <\/span><\/p>\n

<\/p>\n

  “nd_9,cond_8,cond_43,cond_6,cond_54”), (“NAME:UniteParameters”, “KeepOriginals:=”,  _<\/span><\/p>\n

<\/p>\n

  false)<\/span><\/p>\n

<\/p>\n

oEditor.Unite (“NAME:Selections”, “Selections:=”,  _<\/span><\/p>\n

<\/p>\n

  “cond_18,cond_19,cond_34,cond_35,cond_47,cond_48,cond_57,cond_64,cond_17,cond_2” & _ <\/span><\/p>\n

<\/p>\n

  “0,cond_21,cond_58,cond_67,cond_36,cond_49,cond_22,cond_65,cond_69,cond_38,cond” & _ <\/span><\/p>\n

<\/p>\n

  “_51,cond_25,cond_24,cond_23,cond_50,cond_37”), (“NAME:UniteParameters”, “KeepOriginals:=”,  _<\/span><\/p>\n

<\/p>\n

  false)<\/span><\/p>\n

<\/p>\n

oEditor.Unite (“NAME:Selections”, “Selections:=”,  _<\/span><\/p>\n

<\/p>\n

  “cond_31,cond_44,cond_10,cond_11,cond_12,cond_13,cond_14,cond_32,cond_45,cond_5” & _ <\/span><\/p>\n

<\/p>\n

  “6,cond_63,cond_66,cond_68,cond_55,cond_62”), (“NAME:UniteParameters”, “KeepOriginals:=”,  _<\/span><\/p>\n

<\/p>\n

  false)<\/span><\/p>\n

<\/p>\n

oEditor.Unite (“NAME:Selections”, “Selections:=”,  _<\/span><\/p>\n

<\/p>\n

  “cond_16,cond_15,cond_33,cond_46”), (“NAME:UniteParameters”, “KeepOriginals:=”,  _<\/span><\/p>\n

<\/p>\n

 <\/p>\n

<\/p>\n

  false)<\/span><\/p>\n

<\/p>\n

but the problem is in the command oEditor.Unite I want to make autoamtic selections since each time the numbers of conds is changed<\/span><\/p>\n","protected":false},"template":"","class_list":["post-54980","reply","type-reply","status-publish","hentry"],"aioseo_notices":[],"aioseo_head":"\n\t\t\n\t\n\t\n\t\n\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t\n\t\t