[SyDr]

Можно, к примеру, так:

Код:

#include <File.au3>
Global $F[1]
Global $FilePath = "List.txt"
Global $Sum = 0
_FileReadToArray($FilePath, $F)

For $I = 1 To $F[0]
    If NOt(IsInt($F[$I])) Then $Sum += StringRegExpReplace($F[$I], '(\d+)\sсообщени', "$0")
Next

MsgBox(4096, "Готово", "Общее чиcло сообщений:" & @CRLF & $Sum)