[Iska]

Например, так:

Код:

Option Explicit

Dim objDocument


With WScript.CreateObject("Word.Application")
    .Visible = True
    
    Set objDocument = .Documents.Open("C:\MyDoc.doc")
    
    With objDocument
        .Range(.Paragraphs(.Paragraphs.Count - 1).Range.Start, .Paragraphs(.Paragraphs.Count).Range.End).Text = "Some Text"
    End With
    
    '...
    
    Set objDocument = Nothing
End With

WScript.Quit 0

[Lenovo-1]

Как можно добавить

А что-бы сделать то же в блокноте. Как?

[Iska]

Lenovo-1, в Блокноте — только средствами AutoIt.

[Georgio]

в Блокноте — только средствами AutoIt. »

Как вариант на VBS:

Код:

With CreateObject("WScript.Shell")
 Set x = .Exec("notepad.exe")
 WScript.Sleep 1000
 .AppActivate(x.ProcessID)
 .SendKeys "9876543210~0123456789~9876543210"
 WScript.Sleep 1000
 .SendKeys "{BS 21}New line!"
End With

.