Hej Christian,
Der er i kernen ikke support for at angive attachment i processkaldet, men med en mindre omskrivning af SendSimpleMail.FNC, som stadig ikke bruges i standard applikationen:
{XAL:.SendSimpleMail}
FUNCTION SendSimpleMail (STR 254 &Profile, STR 500 &Recipient, STR 500 &CC='', STR 500 &BCC='', STR 500 &Subject='', STR 500 &Body='', STR 500 &FileAttach='',INT &ErrorLog=1, INT &ShowGUI=1)
// Send a simple mail
#MacroLoad(TMP_FILE)
#LOCALMACRO.InsertTmpFrmVirtual
#Element(%1,&TmpText)
WHILE &TmpText
SET Txt1=&TmpText
INSERT TmpFrmVirtual
#Element(%1,&TmpText)
END
#ENDMACRO
INT &Session
STR 254 &TmpText
#GetTempId(&Session)
INTRODUCE TmpFrmVirtual[SesFileRecIdx,&Session]
SET File = 0
SET Record = 0
#InsertTmpFrmVirtual(&Recipient)
SET Record = 1
#InsertTmpFrmVirtual(&CC)
SET Record = 2
#InsertTmpFrmVirtual(&BCC)
SET Record = 0
SET File = 1
SET Txt1 = &Subject
INSERT TmpFrmVirtual
SET File = 2
SET Txt1 = &Body
INSERT TmpFrmVirtual
SET File = 3
SET Txt1 = &FileAttach
INSERT TmpFrmVirtual
SET SendMail('', &Session, &ErrorLog, &ShowGUI)
RETURN
kan man få support for attachments a la:
■ SendMail ─────────────────────────────────────────────────────────────────────────────────────────────
│STR 254 &Profile = "Outlook"
│STR 500 &Recipient = "hhanse@online.microsoft.com"
│STR 500 &CC=''
│STR 500 &BCC=''
│STR 500 &Subject = "Test Mail"
│STR 500 &Body = "Test fra SendSimpleMail.\nmvh\nHenrik Hansen"
│STR 500 &FileAttach = "D:\\Work D\\Microsoft Dynamics C5 2012 NAT Latest\\c5.bmp"
│INT &ErrorLog=1
│INT &ShowGUI=1
│
│SET SendSimpleMail (&Profile, &Recipient, &CC, &BCC, &Subject, &Body, &FileAttach, &ErrorLog, &ShowGUI)
Omkring Outlook signatur, så kan Outlook sættes op til at have en default signatur på nye mails.
Venlig Hilsen Henrik Hansen Program Manager II Microsoft Dynamics C5
