с помощью C/AL отправить почту

[volant]

Цитата:

Изначально опубликовано Polar

Самое оптимальное пользоваться внешней программкой
напрмер postie (спроси у яндекса где достать), отлично посылает и принимает почту
из командной строки. Навижн остается только выгрузить данные в файл или загрузить из него. Посыл/прием, архивация/деархивация осуществляется с помощью маленького батничка порядка 5 строчек.

Код в навижн выглядит примерно вот так:

PHP код:

ErrorCode:=SHELL('c:\\send.bat'); 


Было реализовано еще в старой доброй текстовой версии Navision 3.56

Call send.bat from navision.
------- Send.bat: ---------
@echo off
echo use: send.bat to@adress.ua filename.txt c: cd \mail
echo Message:>>mail.txt
echo To: %1>>mail.txt
echo From: navi356@ukr.net>>mail.txt
echo Subject: File with a file: %2>>mail.txt
echo Contents:>>mail.txt
echo This message was exported automatic from Navision!>>mail.txt
echo ------------->>mail.txt
echo qwertyuiop>>mail.txt
echo File Item: %2>>mail.txt
echo.>>mail.txt
postie -host:mail.host.ua -import -file:c:\mail\mail.txt del mail.txt
------ Navision program: ------
dbSETRANGE(NAEx.Text,''); {text field from any table}
Chr64 := COPYSTR(dbGETFILTER(NAEx.Text),1,1); {get char "@"}
NameFile := 'c:\autoexec.bat'; {File to send}
Shell := 'c:\command.com'; {Shell}
ToAdress := 'test'+Chr64+'mail.ua';
callSYSTEM(Shell,'/c','send.bat',ToAdress,NameFile);
---------------------------------------
send.bat создаст send.txt. можно создать непосредственно в navision.