DATE STAMP BLOCK

- F
- fujka
  
  Contact options for registered users
posted
17 years ago

Tue, Jul 5, 2005 3:52 PM

I need to make a date stamp block. I dont want to use the date stamp in
autocad I want a block that will update the date whenever I open the
dwg. I want it to read "2005 July 5th" and and change by month and day.
Is this possible?
Thanks

Loading thread data ...

- K
- keithknow
  
  Contact options for registered users
posted
17 years ago

Tue, Jul 5, 2005 4:10 PM

You will have to modify this for your needs if you know Visual Basics.
Sub Example_AddText()
Dim textObj As AcadText Dim textString As String Dim insertionPoint(0 To 2) As Double Dim height As Double
' Define the text object textString = Date insertionPoint(0) = 8.7208: insertionPoint(1) = 0.4937: insertionPoint(2) = 0 height = 0.056
' Create the text object in paper space Set textObj = ThisDrawing.PaperSpace.AddText(textString, insertionPoint, height) End Sub