ارسال email

[razaghi]

کد ارسال email

[ealireza]

کد ارسال emailبا چه کامپوننتی میخوای

[esi022]

رازقی پر پر شد :flower:
سلام
اگه سرورت win 2000 هست معمولا CDONTS.NewMail استفاده میشه
اما برای 2003 CDO.message .
یکبار آبجکت شو بساز ببین کدوم رو داری؟

Set MyCDONTSMail3 = CreateObject("CDONTS.NewMail")
set MyCDONTSMail3=nothing
و

Set MyCDONTSMail3 = CreateObject("CDO.message")
set MyCDONTSMail3=nothing

[razaghi]

ممنون از جوابتان.
رزاقی پرپر شد یعنی چه؟

[esi022]

راستش یکی از آهنگهای داریوشه
مشکلت حل شد؟

[binyaz2003]

میشه لطفا یک مثال کامل ساده بزارید من سرورم linux هست

[esi022]

گذاشتن مثال ساده هست
اما اینکه رو سرور linux میتونی آبجکت ویندوز بسازی مهمه؟؟/؟

[binyaz2003]

نمیدونم از کجا باید بفهمم؟

[esi022]

اول مشخص کن با چی داری مینیویسی؟ یعنی کدت چیه؟

[binyaz2003]

با asp میشه؟

[esi022]

Function send_mail()
mailer=1

If mailer = 1 Then
Set objCDOMail = server.CreateObject("CDO.Message")
Else
If mailer = 2 Then
Set objCDOMail = server.CreateObject("CDONTS.NewMail")
objCDOMail.BodyFormat = 0
objCDOMail.MailFormat = 0
End If
End If

matn = "body"

If mailer = 1 Then
matn = body
objCDOMail.htmlBody = matn
else
objCDOMail.body = matn
End If

objCDOMail.from = from
objCDOMail.To = db("email")
objCDOMail.Subject = Request("subject")
objCDOMail.Send

Set objCDOMail = Nothing
End Function

[Asad.Safari]

Set objCDOMail = server.CreateObject("CDONTS.NewMail

دراین باید dll
cdo رو سرور رجیستر کرده باشند در غیر این صورت
کار نخواهد کرد!!!!!!!!!!!!!!!!!!


:موفق:

[Delphi Skyline]

با PHP چی؟

[Asad.Safari]

فکر نکنم تو php بخاد!!!!

[esi022]

php کار نمیکنم ولی میدونم که تو اون بخش هم یه چند نفری در این مورد پست زدن
تو google و سایتهای php بگردی پیدا میکنی