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

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

aref1364

Registered User
تاریخ عضویت
23 جولای 2005
نوشته‌ها
395
لایک‌ها
1
چند تا نکته هم در مورد کد html خدمت عرض کنم :

کلا این html در Mail Server ها هیچ قاعده خاصی نداره . یعنی چی ... IMail رو که میشناسی یک Mail Server فوق العاده مذخرف :cool: من ایمیل فارسی بهش ارسال میکرم وقتی تو میل باکس کلیک می کردم رو عنوان تا برم متن رو ببینم خطا میومد که متن body نداره . حالا داشت ها همه چیز هم درست بود بعضی موقع ها هم همون ایمیل که ارور میداد رو نشون میداد . تو این میل سرور های رايگان مثل یاهو و گوگل هم که هیچ چی . اصلا عکس را نمیزارن لود بشه خودت رو به خاطر این داستان نکش کاربر باید خودش بخواد تا عکس ها لود بشه . بعد هم من توصیه می کنم که اصلا از استایل استفاده نکن و همش برای درست کردن ظاهر از تک و Property ها استفاده کنی . منظورم از استایل چه فايل خارجی .css و چه تگ Style و چه Property استایل (Style) در تگ های دیگه می باشد . مثلا برای اینکه فونت نوشتت Tahoma و 9 باشه این کار رو بکن

<font face="Tahoma" Size="2">تست</font>

و کلا فرض کن که اصلا استایل اختراع نشده و باید بدون آن کار کنی .

خیلی ممنون از راهنماییت!
 

mehdivk

Registered User
تاریخ عضویت
5 آپریل 2006
نوشته‌ها
319
لایک‌ها
0
خواهش میکنم . قابل شما را نداشت :D
 

irajgaderi

کاربر تازه وارد
تاریخ عضویت
7 نوامبر 2006
نوشته‌ها
13
لایک‌ها
0
لطفا کمک فوری


این برنامه من برای ارسال ایمیل
کد:
<%@LANGUAGE="VBSCRIPT" CodePage=1256%>
<%Session.CodePage="1256"%>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1256">

<%
						stremail ="[email protected]"
						strname = "pedram"
						strshams = "20/05/86"
						striddesign = "5a-(506)"

						
''''''''' Check if all required fields are completed then starat sending E-mail '''''''''''''
If strname<>"" OR stremail<>"" OR striddesign<>"" Then
											
					
strText ="<meta http-equiv='Content-Type' content='text/html; charset=windows-1256'>"_
&"<body background='http://www.op.ir/op/pics/bag/234.gif'><br>"_
&"<table align='center' width='414'  border='0' cellspacing='0' cellpadding='0'>"_
&"<tr><td width='414px' height='112px' background='http://www.op.ir/picer/email/aa.gif' valign='bottom'></td></tr>"_
&"<tr><td width='414px' height='69px' background='http://www.op.ir/picer/email/c.gif'>"_
&"<p align='center' style='font-family:'Tahoma'; font-size:10px;  color:#FFFFFF;'><br>"_
&"شما طرح "&striddesign&" <br>"_
&"</p></td></tr>"_
&"<tr><td valign='top' align='justify' height='150px' background='http://www.op.ir/picer/email/d.gif'>"_
&" <p style='padding-right:40px; padding-left:40px; font-family:'Tahoma'; font-size:10px;color:#FFFFFF;'><br><br><br><br><br><br><br></p></td></tr>"_
&"<tr><td align='center' width='414px' height='84'  background='http://www.op.ir/picer/email/e.gif' valign='bottom'>"_
&" <p style='font-family:'Tahoma'; font-size:10px;  color:#FFFFFF;'>با اميد به رضايتمندي شما از پاسخ<br>با تشکر</p>"_
&"<p align='center'><a style='font-size:10px; color:#FFFFFF; font:Tahoma;' href='http://www.op.ir'>w w w . o  p . i r</a></p></td></tr></table>"_
&"</body>"
  

						Set objEmail = CreateObject("CDO.Message")
						
						objEmail.BodyPart.Charset = "windows-1256"
						
						objEmail.From = "[email protected]"
						objEmail.To =strEmail
						objEmail.Subject = "w w w . o  p . i r "
						
						objEmail.AddAttachment  "e:\eslimi\dbcdr\"&striddesign&".cdr"
						
						
						strText = replace(strText,vbCrLf,"<br>")
						objEMail.HTMLBody = strText
						
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="mail.op.ir"
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")  = 25
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

objEmail.Configuration.Fields.Update

objEmail.TextBodyPart.Charset = "windows-1256"
objEmail.HTMLBodyPart.Charset = "windows-1256"
						
						objEmail.Send
						
						
						'''''''''''''' The E-mail has been sent and now we say Thank You '''''''''''''
		
						Response.Redirect("freesend.asp")
						
						
						Else
						Response.Redirect("error.html")
						End If
						%>



ارسال نمیکنه و ایراد میگیره لطفا راهنمایی کنید
 

irajgaderi

کاربر تازه وارد
تاریخ عضویت
7 نوامبر 2006
نوشته‌ها
13
لایک‌ها
0
500 internal server erore

--------------------------------------------------------------------------------

لطفا کمک فوری
من میخوام از سیستمم یه فایل با ایمیل به کاربرام بفرستم از تو سایت خودم
یعنی سایتی که تو اینترنت دارم از رو سیستمم به فایل اتچ کنه و بفرسته
کد زیر این کار رو نمیکنه
من رو راهنمایی کنید تا کار دست خودم ندادم




این برنامه من برای ارسال ایمیل

کد:
:
<%@LANGUAGE="VBSCRIPT" CodePage=1256%>
<%Session.CodePage="1256"%>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1256">

<%
						stremail ="[email protected]"
						strname = "pedram"
						strshams = "20/05/86"
						striddesign = "5a-(506)"

						
''''''''' Check if all required fields are completed then starat sending E-mail '''''''''''''
If strname<>"" OR stremail<>"" OR striddesign<>"" Then
											
					
strText ="<meta http-equiv='Content-Type' content='text/html; charset=windows-1256'>"_
&"<body background='http://www.op.ir/op/pics/bag/234.gif'><br>"_
&"<table align='center' width='414'  border='0' cellspacing='0' cellpadding='0'>"_
&"<tr><td width='414px' height='112px' background='http://www.op.ir/picer/email/aa.gif' valign='bottom'></td></tr>"_
&"<tr><td width='414px' height='69px' background='http://www.op.ir/picer/email/c.gif'>"_
&"<p align='center' style='font-family:'Tahoma'; font-size:10px;  color:#FFFFFF;'><br>"_
&"شما طرح "&striddesign&" <br>"_
&"</p></td></tr>"_
&"<tr><td valign='top' align='justify' height='150px' background='http://www.op.ir/picer/email/d.gif'>"_
&" <p style='padding-right:40px; padding-left:40px; font-family:'Tahoma'; font-size:10px;color:#FFFFFF;'><br><br><br><br><br><br><br></p></td></tr>"_
&"<tr><td align='center' width='414px' height='84'  background='http://www.op.ir/picer/email/e.gif' valign='bottom'>"_
&" <p style='font-family:'Tahoma'; font-size:10px;  color:#FFFFFF;'>با اميد به رضايتمندي شما از پاسخ<br>با تشکر</p>"_
&"<p align='center'><a style='font-size:10px; color:#FFFFFF; font:Tahoma;' href='http://www.op.ir'>w w w . o  p . i r</a></p></td></tr></table>"_
&"</body>"
  

						Set objEmail = CreateObject("CDO.Message")
						
						objEmail.BodyPart.Charset = "windows-1256"
						
						objEmail.From = "[email protected]"
						objEmail.To =strEmail
						objEmail.Subject = "w w w . o  p . i r "
						
						objEmail.AddAttachment  "e:\eslimi\dbcdr\"&striddesign&".cdr"
						
						
						strText = replace(strText,vbCrLf,"<br>")
						objEMail.HTMLBody = strText
						
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="mail.op.ir"
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")  = 25
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

objEmail.Configuration.Fields.Update

objEmail.TextBodyPart.Charset = "windows-1256"
objEmail.HTMLBodyPart.Charset = "windows-1256"
						
						objEmail.Send
						
						
						'''''''''''''' The E-mail has been sent and now we say Thank You '''''''''''''
		
						Response.Redirect("freesend.asp")
						
						
						Else
						Response.Redirect("error.html")
						End If
						%>

ارسال نمیکنه و ایراد میگیره لطفا راهنمایی کنید
 

k_asg

Registered User
تاریخ عضویت
1 سپتامبر 2005
نوشته‌ها
63
لایک‌ها
2
سلام
تمام برنامه هایی که شما توضیح دادی و سورسشو نوشتی با آبجکت CDO بود .اگه ممکنه لطف کن و برای آبجکت PERSITS هم توضیح بده
البته این نکترو باید ذکر کنم که من میخوام در قسمت ادمین سایتم یک ایمیل رو برای گروه خاصی از کاربرانم بفرستم یعنی NewsLetter داشته باشم ولی این آبجکت پرسیتس فقط برای یک نفر میفرسته ایمیل رو و در ضمن برای سرورهایی مثل یاهوو به بالک میل میفرسته
من سورس این برنامه رو زیر میزارم که اگر تغییر و تحولی میخواد لطف کنید و اعمال کنید

کد:
 <%
' change to address of your own SMTP server
' To use eNom smtp you must autenticate with your username and password

strHost = "mysmtpserver"

'Uncomment and set username and password here
'strUser = "[email protected]"
'strPassword = "password"

If Request("Send") <> "" Then
Set Mail = Server.CreateObject("Persits.MailSender")
' enter valid SMTP host
Mail.Host = strHost

'Uncomment to use smtp authenctication
'Mail.Username = strUser
'Mail.Password = strPassword

Mail.From = Request("From") ' From address
Mail.FromName = Request("FromName") ' optional
Mail.AddAddress Request("To")

' message subject
Mail.Subject = Request("Subject")
' message body
Mail.Body = Request("Body")
strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Send ' send message
If Err <> 0 Then ' error occurred
     strErr = Err.Description
else
     bSuccess = True
End If

End If

%>

<HTML>
<BODY BGCOLOR="#FFFFFF">

<% If strErr <> "" Then %>
      <h3>Error occurred: <% = strErr %>
<% End If %>

<% If bSuccess Then %>
      Success! Message sent to <% = Request("To") %>.
<% End If %>


<FORM METHOD="POST" ACTION=""> <TABLE CELLSPACING=0 CELLPADDING=2 BGCOLOR="#E0E0E0">
      <tr>
            <td>Host (change as necessary in script):</td>
            <td><B></B></td>
      </tr>
      <tr>
            <td>From (enter sender's address):<>/td>
            <td><INPUT TYPE="TEXT" NAME="From"></td>
      </tr>
      <tr>
            <td>FromName (optional, enter sender's name):</td>
            <td><INPUT TYPE="TEXT" NAME="FromName"></td>
      </tr>
      <tr>
            <td>To: (enter one recipient's address):</td>
             <td><INPUT TYPE="TEXT" NAME="To"></td>
      </tr>
      <tr>
            <td>Subject:</td>
            <td><INPUT TYPE="TEXT" NAME="Subject"></td>
      </tr>
      <tr>
            <td>Body:</td>
            <td><TEXTAREA NAME="Body"></TEXTAREA></td>
      </tr>
      <tr>
            <td COLSPAN=2><INPUT TYPE="SUBMIT" NAME="Send" VALUE="Send Message">
           </td>
      </tr>
</TABLE>
</FORM>
</BODY>
</HTML>
 

mehdi_25

Registered User
تاریخ عضویت
31 آگوست 2006
نوشته‌ها
202
لایک‌ها
0
محل سکونت
طهران
عزیزم من با کامپونت PERSITS کار نکردم . در قسمت MSDN سایت ماکروسافت هم جستجو کردم مطلب قابل توجهی پیدا نشد .
این کامپونت رو روی سرورها نصب میکنن ولی کامپونت CDOSYS روی سایت ماکروسافت قرار داره و دیگه نیازی به نصب و پرداخت هزینه نیست .

ولی چیزی که مشخصه در پست شماره 21 شما SMTP ی سرورتون رو مشخص نکردین .
 

Soliz

کاربر تازه وارد
تاریخ عضویت
5 دسامبر 2005
نوشته‌ها
21
لایک‌ها
0

irajgaderi

کاربر تازه وارد
تاریخ عضویت
7 نوامبر 2006
نوشته‌ها
13
لایک‌ها
0
یکی به داد ما برسه کدایی که تو اون فرومه جداست من با این کد مشکل دارم کمک کنید؟؟؟؟؟؟؟
 

H_R

مدیر بازنشسته
تاریخ عضویت
30 مارس 2005
نوشته‌ها
3,298
لایک‌ها
17
سن
42
محل سکونت
North Pole
فکر میکنم منظور مهدی جان این بوده که شما سوالت رو اونجا بپرسی تا کسایی که مشکل شما رو دارن هم با مطالعه همون تاپیک مشکلشون حل بشه .
 

ikeyvan

Registered User
تاریخ عضویت
14 مارس 2005
نوشته‌ها
199
لایک‌ها
10
محل سکونت
Tehran
فایل باید روسرور باشه تا اتچ شه نه رو پی سی خودت .... مگه اینکه قبل از ایمیل فایل رو مثلا از طریق یک فرم به سرور اپلود کنی .
 

irajgaderi

کاربر تازه وارد
تاریخ عضویت
7 نوامبر 2006
نوشته‌ها
13
لایک‌ها
0
آدرس اتچ رو چجوری بدم وقتی فایل بغل سورس کد آپلود بشه
از سرور مپ پتچ استفاده کنم چجوری؟
 

H_R

مدیر بازنشسته
تاریخ عضویت
30 مارس 2005
نوشته‌ها
3,298
لایک‌ها
17
سن
42
محل سکونت
North Pole
آره دیگه، چون روی سرور میخوای آدرس بدی ، از http فقط وقتی استفاده میکنیم که میخوایم به مرورگر آدرس بدیم .
 

irajgaderi

کاربر تازه وارد
تاریخ عضویت
7 نوامبر 2006
نوشته‌ها
13
لایک‌ها
0
میتونید برام بنویسی
به چای آدرس بالا یه آدرس تو فولدر بغلش به هر نام که میشه
دو سه خط

ممنون میشم
 

soly_t

کاربر تازه وارد
تاریخ عضویت
11 مارس 2006
نوشته‌ها
8
لایک‌ها
0
محل سکونت
BR
سلام دوستان
من قبلا از اين كدها استفاده كرده بودم و مشكلي هم نداشتم ولي از وقتي كه سرورم يه سري تغييرات كرده ديگه فرمي به ميلم ارسال نميشه به نظر شما مشكل مربوط به كجاست؟
 

mehdivk

Registered User
تاریخ عضویت
5 آپریل 2006
نوشته‌ها
319
لایک‌ها
0
ممکنه سرور جدید از Authentication استفاده می کنه . حواست باشه که from یک ایمیل معتبر باشه . بعضی از میل سرور ها اگر from یک نامه نامعتبر باشد آن را ارسال نمی کنند .
در ضمن تکنولوژی مورد استفاده شما چیه ؟ ASP یا ASP.net
 

H_R

مدیر بازنشسته
تاریخ عضویت
30 مارس 2005
نوشته‌ها
3,298
لایک‌ها
17
سن
42
محل سکونت
North Pole
حتی ممکنه اسم SMTP سرورت عوض شده باشه !
 

ali1564

کاربر تازه وارد
تاریخ عضویت
16 ژوئن 2006
نوشته‌ها
9
لایک‌ها
0
سلام دوستان می خواستم بدونم چطور می شه یه mail رو به صورت فارسی با استفاده از #C فرستاد
من اینجوری نوشتم ولی وقتی تو gmail بازش می کنم فارسی هاش به شکل علامت سوال در میاد.

SmtpMail.SmtpServer = "127.0.0.1";
SmtpMail.Send("[email protected]", "[email protected]", "Registration Form", " نام : " + txtFirstName.Text + "\n نام خانوادگی : " + txtLastName.Text + "\n تاریخ تولد : " + txtBirthDate.Text + "\n تلفن تماس :" + txtPhoneNumber.Text + "\n فکس : " + txtFaxNumber.Text + "\n آدرس پست الکترونیکی : " + txtEmailAddress.Text + "\n نحوه آشنایی :" + comboRelation.SelectedItem.Text + "\n دوره مورد نظر : " + txtCourse.Text + "\n روز تشکیل : " + comboDays.SelectedItem.Text + "\n ساعت تشکیل کلاس : " + chkEvining.Text + " " + chkMorning.Text + "\n توضیحات : " + txtComment.Text);
 

Y2K

Registered User
تاریخ عضویت
20 فوریه 2006
نوشته‌ها
656
لایک‌ها
1
محل سکونت
Location
ali1564 سلام دوستان می خواستم بدونم چطور می شه یه mail رو به صورت فارسی با استفاده از #C فرستاد
من اینجوری نوشتم ولی وقتی تو gmail بازش می کنم فارسی هاش به شکل علامت سوال در میاد.

شا کدپیج صفحه رو به یونیکد تغییر بده



انقدر ازت بدم میاد
:blink:
 
بالا