goACAD = CREATEOBJECT("AutoCAD.Application") goACAD.Visible = .T. DIMENSION laXCoord(3) AS Double laXCoord(1) = 10 laXCoord(2) = 20 laXCoord(3) = 0 goacad.ActiveDocument.ModelSpace.AddCircle(@laXCoord, 10) *-* In the other direction, you can find objects in your *-* drawing and change them. An example to find a block and *-* change two attributes. FOR EACH loItem IN loACAD.ActiveDocument.PaperSpace IF loItem.ObjectName = "AcDbBlockReference" IF UPPER(loItem.Name) = "MYBLOCK" laAttributes = loItem.GetAttributes FOR n = 1 TO ALEN(laAttributes, 1) DO CASE CASE laAttributes(n).TagString = "NAME" laAttributes(n).TextString = "blabla" CASE laAttributes(n).TagString = "FILE" laAttributes(n).TextString = ALLTRIM(THISFORM.cBestand) ENDCASE ENDFOR EXIT ENDIF ENDIF ENDFOR