[Iska]

APiM, Вам пора ознакомиться с тэгом [code].

но как сделать чтобы не указывать путь типо C:\test.txt, а чтобы отправлялся файл из этой же папки где лежит скрипт »

Код:

Dim objFSO

Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")
…
objMessage.AddAttachment objFSO.BuildPath(objFSO.GetParentFolderName(WScript.ScriptFullName), "File.txt")
…
Set objFSO = Nothing