---
title: "F_MAIL_MAPI()"
url: "https://gidas.rivile.lt/sistemos_programavimas/funkcijos/siuntimo_funkcijos/f_mail_mapi"
updated: "2025-06-18"
parent: "https://gidas.rivile.lt/sistemos_programavimas/funkcijos/siuntimo_funkcijos.md"
---

# F_MAIL_MAPI()

Siuntimas elektroniniu paštu naudojant MS MAPI

**Sintaksė**

`F_MAIL_MAPI(To,Subject,Body,Files,CC,BCC,UserName,Password)`

**Grąžina**

.T. - jei išsiųsta be klaidų, priešingu atveju  - klaidos pranešimą

**Parametrai**

| Parametras | Aprašymas                                                | Formatas |
| :--------- | :------------------------------------------------------- | -------- |
| To         | laiško adresas                                           | C        |
| Subject    | laiško antraštė                                          | C        |
| Body       | laiško tekstas                                           | C        |
| Files      | prisegtas failas ar failų sąrašas atskirtas kabliataškiu | C        |
| CC         | laiško kopijos adresas                                   | C        |
| BCC        | laiško kopijos nematomas adresas                         | C        |
| UserName   | vartotojo vardas                                         | C        |
| Password   | slaptažodis                                              | C        |

> **Dėmesio:** Norint pamatyti klaidą, reikia vartotojui uždėti SISTEMOS INIT‘ą, kuris techniškai parodo visą pilną klaidos pranešimą.

```
titi_pagr.smtp_server="EXECSCRIPT("
titi_pagr.smtp_server=titi_pagr.smtp_server+'[LPARAMETERS _adresas,_antraste,_tekstas,_failas]+CHR(13)+CHR(10)+'
titi_pagr.smtp_server=titi_pagr.smtp_server+'[_klaida=""]+CHR(13)+CHR(10)+'

titi_pagr.smtp_server=titi_pagr.smtp_server+'[lRet=f_mail_mapi(_adresas,_antraste,_tekstas,_failas)]+' && Ideti savo siuntimo funkcija

titi_pagr.smtp_server=titi_pagr.smtp_server+'CHR(13)+CHR(10)+'
titi_pagr.smtp_server=titi_pagr.smtp_server+'[=IIF(!EMPTY(_klaida),f_info(_klaida,.T.),"")]+CHR(13)+CHR(10)+'
titi_pagr.smtp_server=titi_pagr.smtp_server+'[return lRet]+CHR(13)+CHR(10)+'
titi_pagr.smtp_server=titi_pagr.smtp_server+"[],_adresas,_antraste,_tekstas,_failas)"
```



**Pavyzdžiai	**

f_mail_MAPI('rivile@rivile.lt','Laiško pavadinimas', 'Laiško turinys','c:\tekstas.txt;c:\temp\ataskaita.pdf')

**Pastaba 1 **

Naudojant MS MAPI , siunčiama per Windows operacinėje sistemoje nurodytą el. pašto programą, jei ji palaiko MAPI objektą. Pati programa jau turi būti sukonfigūruota taip, kad laiškai galėtų siųstis – nurodytas vartotojas pagal nutylėjimą, serveris, prisijungimo vardai ir pan., todėl aprašinėjant šį metodą RIV_GAMA programoje, pastaroji informacija nereikalinga, o atliekamas tiesiog el. laiško siuntimas.

**Pastaba 2**  

> **Dėmesio:** Naudojant MS MAPI, sistemos INIT-e turi būti užprogramuotas metodas:

**titi_pagr.smtp_server=[f_mail_MAPI(_adresas,_antraste,_tekstas,_failas)]**

Visi keturi perduodami parametrai visada fiksuoti:  _adresas,_antraste,_tekstas,_failas.