Funkce SendMail: posφlejte e-maily z ASP strßnek efektivn∞
Ka₧d² den pφÜete ASP strßnky. Ka₧d² den °eÜφte jistΘ problΘmy. ZjednoduÜt∞ si problΘm posφlßnφ e-mailu. Vyu₧ijte funkci SendMail, kterß je pro prßci s poÜtou vynikajφcφm pomocnφkem. Vφce v Φlßnku...

Jestli₧e jste si nedßvno p°eΦetli Φlßnek o kompone≥te CDONTS resp. posφlßnφ e-mailu, jist∞ vφte jak e-mail odeslat a jakΘ parametry CDONTS.NewMail akceptuje.

Dnes Vßm ukß₧φ efeketivnφ °eÜenφ, kterΘ napom∙₧e, zrychlφ a z elegantnφ VaÜi prßci s poÜtou v ASP strßnkßch.

Pomocφ nßsledujφcφ funkce lze mail odeslat ruttinn∞.

<%
Function SendMail(strFrom,strTo,strSubject,strBody,strSecurity)
       Set objCDONTS = CreateObject("CDONTS.NewMail")
          objCDONTS.From = strFrom
          If strSecurity = 1 Then
             objCDONTS.Bcc = strTo
          Else
           objCDONTS.To = strTo
         End If
 
         objCDONTS.Subject = strSubject
         objCDONTS.Body = strBody
         objCDONTS.MailFormat = 0
         objCDONTS.Send
       Set objCDONTS = Nothing
End Function
%>
<%
vystup = SendMail("speed.express@seznam.cz", "ceskywap@ceskywap.cz", "test", "telo", 1)
%>

Funkce mß n∞kolik parametr∙:

SendMail(Komu, OdKoho, P°edm∞t, T∞loZprßvy, Security)

Komu - E-mailovß adresa adresßta.

OdKoho - VßÜ e-mail resp. mail na kter² chcete zaslat odpov∞d danΘho e-mailu.

P°edm∞t - P°edm∞t zprßvy

T∞loZprßvy - T∞lo zprßvy :)

Security - Forma zabezpeΦenφ adresßta. 1 - Adresßt bude jako BCC(skrytß kopie) - nebude vid∞t. 0 - adresßt se ulo₧φ do TO resp. bude vid∞t.

P°φklad:

<%
vystup = SendMail("ferda@mravenec.cz", "deda@mraz.cz", "test", "telo", 1)
>%

Kde funkci vyu₧φt?

Zden∞k Cendra
ceskywap@ceskywap.cz