1

Konu: FoxyPreviewer299 da mail atma

mail göndermeye kalkınca böyle bir mesaj alıyorum.

#1429 -send- 0*00000213 CDO message 1 aktarım sunucuya bağlanamadı

bir kaç gün öncesine kadar sorun yoktu ama şimdi meil atamıyorum.
Yardım eden herkese teşekkürler

FoxyPreviewer de e-mail ayarlarında ;
e-psta biçimi CDO-HTML
SUNUCU :mail.veterinerx.com
PORT: 16
Gönderen avrasya at veterinerx.com

2

Re: FoxyPreviewer299 da mail atma

portu 587 yada 25 yapmalisin

http://www.soykansoft.com/images/twitter.jpghttp://www.soykansoft.com/images/wp.jpg

3

Re: FoxyPreviewer299 da mail atma

Öyle yapınca gönderen yada alıcılardan en az biri bulunamadı diyor. oysa hepsi var sad

4 Son düzenleyen, ugurlu2001 (13.06.2014 14:48:37)

Re: FoxyPreviewer299 da mail atma

Bende çalışan örnek. Üzerinde düzeltme yapmadım.

Cesar 'a bu harika araç için tekrardan Teşekkürlerimi sunarım smile

Visual Fox Pro
LOCAL lcMail

m.lcMail = Inputbox('Müşteri e-mail adresi', '','')
 
IF Empty(m.lcMail)
    RETURN
ENDIF
 
=ReportOrderCursor()
 
DO "System.App"
 
SET PROCEDURE TO LOCFILE("FoxyPreviewer.App") ADDITIVE
LOCAL loReport as "PreviewHelper" OF "FoxyPreviewer.Prg"
loReport = CREATEOBJECT("PreviewHelper")
WITH loReport as ReportHelper
 
.AddReport(Addbs(oApp.PathofRapor)+"FRX_DOSYASI.FRX")
.cDestFile      = "D:\Test.pdf"  && Use to create an output without previewing
 
.lAutoSendMail  = .T.
.lEmailAuto     = .T.   && Automatically generates the report output file
.cEmailType     = "PDF" && The file type to be used in Emails (PDF, RTF, HTML or XLS)
 
.cEmailTo       = (m.lcMail) && "gonderilecekmail@hotmail.com"
.cSMTPServer    = "mail.domainadi.com"
.cEmailFrom     = "order@domainadi.com"
.cEmailSubject  = "Online Order / Online Siparis"
 
.nSMTPPort      = 587 && 465
.lSMTPUseSSL    = .F. && .T. Default
.cSMTPUserName  = "order@domainadi.com"
.cSMTPPassword  = "SifreM"
 
.lReadReceipt   = .T.
.lPriority      = .T.
* .cAttachments   = "D:\FazladanDosya.File"  && GETFILE() && Comma delimited
 
.cEmailBody = "This e-mail automaticaly generated after your orders! Please confirm your total order quantities & weights"
 
.RunReport()
ENDWITH
 
loReport = NULL
Uğur
-------------------------------------------------------------------------------------------------------------
Hayat bir bisiklete binmek gibidir. Pedalı çevirmeye devam ettiğiniz sürece düşmezsiniz. Claude Peppeer
Kusuru söylenmeyen adam, ayıbını hüner sanır.  Türk Atasözü

5

Re: FoxyPreviewer299 da mail atma

Arkadaşlar teşekkürler.
Ayarlamaları tekrar yapınca sorun çözüldü