عدم ارسال ایمیل بعد از تغیرات سرور

shirani · Dec 6, 2008

خیلی فوری

بعد از تغیرات تو سرور به من گفتند باید کانفیگ ارسال ایمیل را تغییر بدم اما هرکاری میکنم فایده نداره این هم کد ارسال

PHP:

<%
'Send Email After RegUser
    'Sending SMTP mail via port 25 using CDOSYS
    'This VB sample uses CDOSYS to send SMTP mail using the cdoSendUsingPort option and specifying a SMTP host.

    ' Note: It is recommended that all input parameters be validated when they are
    ' first obtained from the user or user interface.
    'Dimension variables
    Dim strHTML
    
    ' Build HTML for message body
    strHTML = "<HTML>"
    strHTML = strHTML & "<HEAD>"
    strHTML = strHTML & "<BODY>"
    strHTML = strHTML & "<br><b>Name </b>" & Request.Form("Yourname") & ""
    strHTML = strHTML & "<br><b>E-mail: </b>" & Request.Form("YourEmail") & " "    
    strHTML = strHTML & "<br><b>SoftWare: </b>" & Request.Form("Software") & " "
    strHTML = strHTML & "<br><hr>"
    strHTML = strHTML & "" & Request.Form("Request") & " "
    strHTML = strHTML & "</BODY>"
    strHTML = strHTML & "</HTML>"

    'Send using the Port on a SMTP server
    Set objMail=Server.CreateObject("CDO.Message")
    Set objConf=Server.CreateObject("CDO.Configuration")
    Set objFields=objConf.Fields
    With objFields
        .Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.myartsbox.com"
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")=10
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25
        .Item("http://schemas.microsoft.com/cdo/configuration/sendusername")=iman
        .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")=123456
        .Update
    End With
    With objMail
        Set .Configuration=objConf
        .From = Request.Form("YourEmail")
        .To = "[email protected]"
        .Subject = "Send By Request Learn MyartsBox:::"& Request.form("Yourname") &":::"& Request.form("Software") &""
        .HTMLBody = strHTML
        '.TextBody="test"
        
    End With
    
    'Send Mail
    objMail.Send

    ' cleanup of variables
    Set objFields=Nothing
    Set objConf=Nothing
    Set objMail=Nothing
%>
<!--#include file="Header.asp"--><head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Content-Language" content="fa" />
<tr>
        <td align="left" valign="top"><table width="754" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td align="left" valign="top" class="body_box">
            <table width="736" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td align="left" valign="top"><br><table width="736" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="19" align="left" valign="top"><img src="images/box_left_top.gif" alt="" width="19" height="32" /></td>
                        <td align="center" valign="middle" class="box_top_bg" style="font-weight: bold">پیغام سیستم </td>
                        <td width="19" align="left" valign="top"><img src="images/box_right_top.gif" alt="" width="19" height="32" /></td>
                      </tr>
                      <tr>
                        <td align="left" valign="top" class="left_line">&nbsp;</td>
                        <td align="center" valign="middle">
                        &nbsp;<p dir="rtl"><font color="#008000">درخواست شما با موفقیت ارسال شد تا 
                        <b>24</b> الی <b>72</b> ساعت آینده به&nbsp; <br>نامه 
                        ارسالی شما رسیدگی خواهد شد .</font></p>
                        <p dir="rtl"><a href="default.asp" class="menu_link_User">بازگشت به صفحه اول 
                        سایت </a></td>
                        <td align="left" valign="top" class="right_line">&nbsp;</td>
                      </tr>
                      <tr>
                        <td align="left" valign="top" class="left_line">&nbsp;</td>
                        <td height="30" align="right" valign="middle">&nbsp;</td>
                        <td align="left" valign="top" class="right_line">&nbsp;</td>
                      </tr>
                      <tr>
                        <td align="left" valign="top"><img src="images/box_bottom_left.gif" alt="" width="19" height="8" /></td>
                        <td align="left" valign="top" class="bottom_line"><img src="images/spacer.gif" alt="" width="1" height="1" /></td>
                        <td align="left" valign="top"><img src="images/box_bottom_right.gif" alt="" width="19" height="8" /></td>
                      </tr>
                    </table>
            <table width="736" border="0" cellspacing="0" cellpadding="0">

            </table></td>
          </tr>
        </table></td>
      </tr>
<!--#include file="Footer.asp"-->

در ضمن نمیدونم چی گفتن بستن که با 127.0.01 نمیشه ارسال کرد

arman92 · Dec 7, 2008

دوست عزیز ،

در قسمت YourEmail در Request.Form ، باید یک آدرس ایمیل بزنی. که برای کسی که ارسال می شه ، به صورت فرستنده نمایش داده می شه.
To = "[email protected]" این هم فکر کنم جابجا زدی! چون شما می خوای به ایمیل کسی که ثبت نام می کنه بفرسته ، نه خودت!!

اینهارو درست کن ، نباید دیگه مشکلی باشه.
موفق باشید.

shirani · Dec 10, 2008

arman92 گفت:
دوست عزیز ،

در قسمت youremail در request.form ، باید یک آدرس ایمیل بزنی. که برای کسی که ارسال می شه ، به صورت فرستنده نمایش داده می شه.
To = "[email protected]" این هم فکر کنم جابجا زدی! چون شما می خوای به ایمیل کسی که ثبت نام می کنه بفرسته ، نه خودت!!

اینهارو درست کن ، نباید دیگه مشکلی باشه.
موفق باشید.