• پایان فعالیت بخشهای انجمن: امکان ایجاد موضوع یا نوشته جدید برای عموم کاربران غیرفعال شده است

تمام مسائل در مورد ایمیل == برنامه ها ، رفع مشکل

aref1364

Registered User
تاریخ عضویت
23 جولای 2005
نوشته‌ها
395
لایک‌ها
1
سلام،

من با ASP.NET و VB.NET قطعه کدی نوشته بودم که تا یه چند ماه پیش روی تمامی سایتهایی که نوشته بودم کار می کرد اما الان دیگه ایمیلی فرستاده نمیشه. از تنظیمات سرور فکر نکنم باشه چون روی تمام سرورهام اینجوری شده. اینم کد:

PHP:
        Public Function send_news(ByVal sender_name As String, ByVal receiver_email As String, ByVal sender_message As String, ByVal final_text As String) As Boolean

            Dim smtp_message As New MailMessage
            smtp_message.From = New MailAddress("[email protected]")
            smtp_message.To.Add(New MailAddress(receiver_email))
            smtp_message.SubjectEncoding = Encoding.UTF8
            smtp_message.Subject = "پیام جدید از طرف دوستان!"
            smtp_message.IsBodyHtml = True
            smtp_message.Body = final_text
            Dim smtp_client As New SmtpClient("mail.iana.ir")
            smtp_client.Credentials = New Net.NetworkCredential("username", "password")
            smtp_client.DeliveryMethod = SmtpDeliveryMethod.Network
            Try
                smtp_client.Send(smtp_message)
                Return True
            Catch ex As Exception
                Return False
            End Try
            smtp_message.Dispose()

        End Function
 

Graveworm

Registered User
تاریخ عضویت
23 می 2005
نوشته‌ها
1,071
لایک‌ها
12
محل سکونت
Tehran
سلام،

من با ASP.NET و VB.NET قطعه کدی نوشته بودم که تا یه چند ماه پیش روی تمامی سایتهایی که نوشته بودم کار می کرد اما الان دیگه ایمیلی فرستاده نمیشه. از تنظیمات سرور فکر نکنم باشه چون روی تمام سرورهام اینجوری شده. اینم کد:

PHP:
        Public Function send_news(ByVal sender_name As String, ByVal receiver_email As String, ByVal sender_message As String, ByVal final_text As String) As Boolean

            Dim smtp_message As New MailMessage
            smtp_message.From = New MailAddress("[email protected]")
            smtp_message.To.Add(New MailAddress(receiver_email))
            smtp_message.SubjectEncoding = Encoding.UTF8
            smtp_message.Subject = "پیام جدید از طرف دوستان!"
            smtp_message.IsBodyHtml = True
            smtp_message.Body = final_text
            Dim smtp_client As New SmtpClient("mail.iana.ir")
            smtp_client.Credentials = New Net.NetworkCredential("username", "password")
            smtp_client.DeliveryMethod = SmtpDeliveryMethod.Network
            Try
                smtp_client.Send(smtp_message)
                Return True
            Catch ex As Exception
                Return False
            End Try
            smtp_message.Dispose()

        End Function
smtp_message.From
همون آدرسی هست که نوشتید؟
اون رو به یه آدرس از دامین خودت تغییر بده مثل [email protected] ببین درست میشه؟
 

aref1364

Registered User
تاریخ عضویت
23 جولای 2005
نوشته‌ها
395
لایک‌ها
1
smtp_message.From
همون آدرسی هست که نوشتید؟
اون رو به یه آدرس از دامین خودت تغییر بده مثل [email protected] ببین درست میشه؟

درست نشد.
ایمیلهای داخلی به همدیگه send میشن اما خارجیا نه. یعنی نمیتونم از [email protected] به [email protected] ایمیل بفرستم اما از [email protected] به [email protected] می تونم ارسال کنم.
 

Graveworm

Registered User
تاریخ عضویت
23 می 2005
نوشته‌ها
1,071
لایک‌ها
12
محل سکونت
Tehran
درست نشد.
ایمیلهای داخلی به همدیگه send میشن اما خارجیا نه. یعنی نمیتونم از [email protected] به [email protected] ایمیل بفرستم اما از [email protected] به [email protected] می تونم ارسال کنم.
مشکل از mail server و تنظیمات smtp هست که احتمالا کسی عوض کرده

شایدم مشکلی داره و همه چی الان تو queue اون هست. سرور رو یه بررسی کنید
 

aref1364

Registered User
تاریخ عضویت
23 جولای 2005
نوشته‌ها
395
لایک‌ها
1
بله درست شد. مشکل از این بود که Relay Option روی close تنظیم شده بود که گذاشتمش روی Open, SMTP و مشکل حل شد.
 

the wizard

کاربر تازه وارد
تاریخ عضویت
8 آگوست 2009
نوشته‌ها
31
لایک‌ها
0
سلام
چطور مي تونم يك query بنويسم كه وقتي يكي از جدولهام update شد براي يكي از اعضا در جدول ديگه DB ميل بزنه؟
 

masiham

کاربر تازه وارد
تاریخ عضویت
9 آگوست 2009
نوشته‌ها
9
لایک‌ها
0
سلام دوستان ...

من خیلی توی فروم های اینجا مشکلاتم حل شده ... ولی یه مشکلی دارم ...

جوابم رو پیدا نکردم ... خواهش میکنم کمکم کنین ....

من دارم یه صفحه ثبت نام اینتر نتی درست میکنم ....


از این کد ها استفاده کردم ...

<%

Dim Object_Mail

Set Object_Mail = CreateObject("CDONTS.NewMail")

Object_Mail.From = Request.Form("From_EditBox")

Object_Mail.To= Request.Form("To_EditBox")

Object_Mail.Subject= Request.Form("Subject_EditBox")

Object_Mail.Body= Request.Form("Body_EditBox")

Object_Mail.Send

Set Object_Mail = Nothing

Response.Write "!ارسال با مو فقیت انجام شد"

%>





اولین مشکلم اینه که میخوام وقتی اطلاعات کاربر وارد شد با یه دکمه بره صفحه بعد ....

اونجا یه صفحه تایید بیاد یعنی بگه شما این اطلاعات رو وارد کردین .... اگه کاربر خواست با یه

دکمه برگرده و اطلاعاتش رو اصلاح کنه اگه نه با یه دکمه دیگه اطلاعات ارسال بشه به یه ایمیل

پیش فرض ...

دومین مشکلم اینه که حالا فرض میکنیم اون درست شد ... ایمیلی که ارسال میشه اگه

فارسی باشه بهم ریخته میشه ... یعنی چرت و پرت مینویسه ... توی فروم های دیگه

چندتا راه بود برای فارسی ارسال کردن ولی نشد ... خواهش میکنم کمک کنین .... مرسی
 

illusion

Registered User
تاریخ عضویت
26 ژانویه 2008
نوشته‌ها
149
لایک‌ها
4
سلام دوستان ...

من خیلی توی فروم های اینجا مشکلاتم حل شده ... ولی یه مشکلی دارم ...

جوابم رو پیدا نکردم ... خواهش میکنم کمکم کنین ....

من دارم یه صفحه ثبت نام اینتر نتی درست میکنم ....


از این کد ها استفاده کردم ...

<%

Dim Object_Mail

Set Object_Mail = CreateObject("CDONTS.NewMail")

Object_Mail.From = Request.Form("From_EditBox")

Object_Mail.To= Request.Form("To_EditBox")

Object_Mail.Subject= Request.Form("Subject_EditBox")

Object_Mail.Body= Request.Form("Body_EditBox")

Object_Mail.Send

Set Object_Mail = Nothing

Response.Write "!ارسال با مو فقیت انجام شد"

%>





اولین مشکلم اینه که میخوام وقتی اطلاعات کاربر وارد شد با یه دکمه بره صفحه بعد ....

اونجا یه صفحه تایید بیاد یعنی بگه شما این اطلاعات رو وارد کردین .... اگه کاربر خواست با یه

دکمه برگرده و اطلاعاتش رو اصلاح کنه اگه نه با یه دکمه دیگه اطلاعات ارسال بشه به یه ایمیل

پیش فرض ...

دومین مشکلم اینه که حالا فرض میکنیم اون درست شد ... ایمیلی که ارسال میشه اگه

فارسی باشه بهم ریخته میشه ... یعنی چرت و پرت مینویسه ... توی فروم های دیگه

چندتا راه بود برای فارسی ارسال کردن ولی نشد ... خواهش میکنم کمک کنین .... مرسی


با سلام

فکر میکنم باید code page مربوط به email رو بذاری رو windows-1256
 

hamed_Dejected

کاربر تازه وارد
تاریخ عضویت
25 سپتامبر 2009
نوشته‌ها
1
لایک‌ها
0
با عرض سلام
خشته نباشید من یک سایت تو asp درست کرده بودم که تا 6 ماه قبل استفاده می کردم ازش ولی حالا تو IIS هر چقدر می خوام حتی یک صفحه اش را باز نمیکنه ! ERor 404 میده . مرسی اگه جواب بدین
 

sh_sepehr

Registered User
تاریخ عضویت
8 نوامبر 2006
نوشته‌ها
38
لایک‌ها
0
Form.html

کد:
<form action=sendmail.asp method=post>
Your Full Name : <input type=text name=name> <br>
Your E-mail : <input type=text name=email> <br>
Your Comments: <textarea name="comments" cols="22" rows="5"></textarea> <br>
<input type=submit value=submit> <br>
</form>




sendmail.asp

کد:
<%


Body ="Name : " & request.form("name") & vbCrLf _
     & "E-Mail : " & request.form("email") & vbCrLf _ 
& "Comments : " & request.form("commentsl") & vbCrLf _
        & Trim(strMessage)
Set objMessage = CreateObject("CDO.Message") 
objMessage.Subject = "Online Contact From Website"
fromname="Domain WebContact"
emailfrom="[email protected]"
objMessage.From = fromname & " <" & emailfrom & ">"
objMessage.To = "[email protected]"
objMessage.TextBody = Body
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.yourdomain.com"
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
objMessage.Configuration.Fields.Update
objMessage.Send
%>

<p>Thank you for filling contact form</P>



faghat tavajoh kon
emailfrom="[email protected]" ro bayad emailo khodet ro bezanni , va emaili bashe ke dar site sakhte shodeh bashe ! yani pop3

objMessage.To = "[email protected]"
inja ham har email mitooni bezani , etelaat be in email mireh

soali dashti dar khedmatim

سلام
من از این کد استفاده کردم و خوشبختانه جواب داد ...!
ولی من یه سوال دیگه داشتم
میخوام وقتی طرف فرم رو پر کرد و ارسال کرد اتوماتیک یه تشکر هم به طرف ارسال بشه ....! مثل چیزایی که تو خیلی سایتها هست ...!
 

m.mirfazeli

Registered User
تاریخ عضویت
2 فوریه 2012
نوشته‌ها
7,503
لایک‌ها
1,237
محل سکونت
Golestan
سلام
دوستان ایمیل من از صبح یه سره رفرش میشه دهن منو سرویس کرده چیکار کنم ؟
 

okpnz

کاربر تازه وارد
تاریخ عضویت
17 مارس 2013
نوشته‌ها
2
لایک‌ها
0
محل سکونت
زنجان
سلام دوستان من یه مشکلی دارم که امیدوارم راهنماییم کنید.
من تو قسمت مدیریت اخبارو میفرسم به سایت توی دیتابیس idو خودکار گذاشتم و اومدم تو تنظیماتش گفتم صعودی مرتب بشه
حالا وقتی ادامه اخبارو میزنم که بره تو یه صفحه shownews نشون بده بر حسب او ID واسم بیاره (
<ahref='<%# Eval("Id","shownews.aspx?Id={0}") %>'style="height:70px">

)
ولی فقط اولین خبرو واسم نمایش میده من جیکار کنم؟:wacko::(:(
 

amin_fasayi

Registered User
تاریخ عضویت
11 ژوئن 2014
نوشته‌ها
902
لایک‌ها
383
سن
44
محل سکونت
فسا
سلام. یک نرم افزار واسه ارسال انبوه ایمیل معرفی کنید. من از ایران هاست سرویس میگیرم ، smtp که داره روزی 1000 تا ایمیل میشه باهاش زد ، ولی نصف ایمیل هایی ک میفرستم اسپم میشه! با اینکه متن خیلی زیادی هم نمیفرستم عکس هم نداره ایمیل هام.
ممنون
 
بالا