后台增加SMTP邮件发送配置

1.打开include/admin_config_edit.asp

在sub joekoe_chk_common()上添加

sub joekoe_chk_smtp()
    if chk() then
    web_sm_server=code_config(request.form("web_sm_server"),0)
    web_sm_user=code_config(request.form("web_sm_user"),0)
    web_sm_pass=code_config(request.form("web_sm_pass"),0)
call joekoe_template_common()
    call joekoe_template_common_other()
    call joekoe_template_js_config()
    call admin_msg("已成功修改了"&ntit&tit_fir&"！","?action="&action,1)
    exit sub
  end if
  call form_first()
%>
<form action='?action=<%response.write action%>' method=post>
<input type=hidden name=chk value='yes'>
<tr><td colspan=3 class=td> 网站SMTP邮件认证信息</td></tr>
<tr>
<td>SMTP邮件服务器：</td>
<td><input type=text name=web_sm_server value='<%response.write web_sm_server%>' size=20 maxlength=100></td>
<td class=gray>发信的邮件服务器</td>
</tr>
<tr>
<td>SMTP验证帐号：</td>
<td><input type=text name=web_sm_user value='<%response.write web_sm_user%>' size=20 maxlength=100></td>
<td class=gray>发信的邮件服务器的SMTP验证帐号</td>
</tr>
<tr>
<td>SMTP认证密码：</td>
<td><input type=password name=web_sm_pass value='<%response.write web_sm_pass%>' size=20 maxlength=100></td>
<td class=gray>发信的邮件服务器的SMTP认证密码</td>
</tr>
<%
  call submit_config()
end sub




2.common_other.asp
dim web_sm_server,web_sm_user,web_sm_pass
web_sm_server="smtp.163.com"
web_sm_user="asp126.com"
web_sm_pass="*******"

3.打开admins_config_edit.asp
在相应位置添加  <td><a href='?action=smtp'<%if action="shop" then response.write " class=red"%>>邮件<%response.write tit_fir%></a></td>
case "smtp"
  ntit="邮件"
  call joekoe_chk_smtp()

4.打开include/jk_template.asp
在 temp1=vbcrlf&"<"&"%"&vbcrlf&"dim后添加
web_sm_server,web_sm_user,web_sm_pass
在vbcrlf&"web_n_girl="""&web_n_girl&"""" & _后加
    vbcrlf&"web_sm_server="""&web_sm_server&"""" & _
    vbcrlf&"web_sm_user="""&web_sm_user&"""" & _
    vbcrlf&"web_sm_pass="""&web_sm_pass&"""" & _

文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: