Thread View: ee.arvutid.mac
2 messages
2 total messages
Started by andrus
Mon, 16 Feb 2009 21:19
Visual skripti abil maili saatmine
Author: andrus
Date: Mon, 16 Feb 2009 21:19
Date: Mon, 16 Feb 2009 21:19
38 lines
2516 bytes
2516 bytes
Soovin saata maili, skript iseenesest töötab korralikult ainult et
mitte mul kodus, kus teenusepakkujaks Kernel. Nende support teatab, et
SMTP serveri audentimine pole vajalik.
Juhul, kui üritada kirjasaatmist, siis jääb asi pidama real
"objEmail.Send"
Set objEmail = CreateObject("CDO.Message")
Set objConf = objEmail.Configuration
Set objFlds = objConf.Fields
'---------------------------------------------------------------------
' SMTP server details
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
"mail.kodu.ee"
.Item("http://schemas.microsoft.com/cdo/configuration/
smtpauthenticate") = 0
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")
= "25"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") =
False
.Item("http://schemas.microsoft.com/cdo/configuration/
smtpconnectiontimeout") = 60
.Update
'---------------------------------------------------------------------
End With
objEmail.To = strMailTo
objEmail.From = "saatja@mail.ee"
objEmail.Subject = "Kirjake"
objEmail.TextBody = "Vt. Manust"
objEmail.AddAttachment "c:\file.pdf"
objEmail.Send
Set objFlds = Nothing
Set objConf = Nothing
Set objEmail = Nothing
Re: Visual skripti abil maili saatmine
Author: Virgo Pärna
Date: Thu, 19 Feb 2009 20:04
Date: Thu, 19 Feb 2009 20:04
11 lines
1382 bytes
1382 bytes
andrus@auc.ee wrote: > Juhul, kui �ritada kirjasaatmist, siis j��b asi pidama real > "objEmail.Send" > Ja mingit veateadet ei tule vastu saatmisel? Kas ei v�i olla, et mingi tulem��r v�i antiviirus v�ljuva �henduse smtp porti blokeerib? -- Virgo P�rna virgo.parna@mail.ee
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads