📄 dataupdate.asp

📁 .　缓存处理技术
💻 ASP
字号:
<!--#include file="send_function.asp"-->
<!--#include file="DataUpdate_Application.asp"-->
<%
Cnbbr_FiltrateIP

CnbbrTempAuc

CnbbrDealWithAuc

CnbbrUpdateStarAuc

CnbbrUpdateStarShop

Function EmailForAuc(AucTitle,AucID,SellerID,BuyerID)
Dim Rs_Users
set rs_Users=server.createobject("ADODB.recordset")
sql="select regusername,regemail from users where regid in ("& SellerID &","& BuyerID &")"
rs_Users.open sql,conn,1,1
if rs_Users.eof or rs_Users.RecordCount<2 then
   rs_Users.close
   set rs_Users=nothing
   Exit Function
else
   Dim RegEmail_S,RegEmail_B,UName_S,UName_B
   RegEmail_S=Rs_Users("RegEmail")
   UName_S=Rs_Users("RegUserName")
   
   Rs_Users.MoveNext

   RegEmail_B=Rs_Users("RegEmail")
   UName_B=Rs_Users("RegUserName")

   rs_Users.close
   set rs_Users=nothing







   AucTitle=AucTitle


   if SendAucEmail=1 then




	Dim MailTo,MailTopic,MailBody

	MailTo=RegEmail_S

	MailTopic="你在"& SYS_WEBNAME &"上的商品已经被用户"& Uname_B &"成功拍下！"
	   
	MailBody="<html>"
	MailBody=MailBody & "<head>"
	MailBody=MailBody & "<title>"&SYS_WEBNAME&"商品交易提醒邮件</title>"
	MailBody=MailBody & "<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"" >"
	MailBody=MailBody & "<meta name=""description"" content=""宝贝儿，拍卖，购物，商城，BBR,CNBBR,AUCTION"" >"
	MailBody=MailBody & "<meta name=""keywords"" content=""宝贝儿，拍卖，购物，商城，BBR,CNBBR,AUCTION"" >"
	MailBody=MailBody & "<style type=""text/css""> "
	MailBody=MailBody & "BODY {font-FAMILY: 宋体;MARGIN: 5px 0px 0px 0px; }"
	MailBody=MailBody & "td {font-SIZE: 14px; COLOR: #000000; font-FAMILY: 宋体}"
    MailBody=MailBody & "INPUT {font-SIZE: 14px;padding:4 2 0 2;}"
    
	MailBody=MailBody & "A:link {COLOR: #003399}"
	MailBody=MailBody & "A:visited {COLOR: #003399}"
	MailBody=MailBody & "A:hover {COLOR: #FF6600}"
    
	MailBody=MailBody & ".title-gray     {font-size:14px;color:#ffffff;LINE-HEIGHT:150%;padding: 4px 8px 3px 8px;background:#666666;border-bottom:1px solid #333333;border-left:10px solid #ff7300;}"
	MailBody=MailBody & ".h3-prom        {font-size:14px;LINE-HEIGHT:150%;padding:6px 8px 6 8; border: 1px solid #FF9966;background:#ffffee;}"
	MailBody=MailBody & ".h2-bottom      {font-weight:bold;font-size:14px;LINE-HEIGHT:150%;padding:8px 8px 3px 26px; border-bottom:2px solid #eeeedd;}"
	MailBody=MailBody & ".form-left-top  {border-top: 1px solid #EEEEdd;font-size:14px;vertical-align:top;LINE-HEIGHT:150%;padding:6px 3px 3px 3px;width:25%;text-align:right; }"
	MailBody=MailBody & ".form-right-top {border-top: 1px solid #EEEEdd;font-size:14px;vertical-align:top;LINE-HEIGHT:150%;padding:6px 3px 3px 3px;}"
	MailBody=MailBody & ".h3-note        {font-size:14px;LINE-HEIGHT:150%;padding:6px 8px 6px 8px; border:1px solid #CCCCEE; background:#EEEEFF;}"
	MailBody=MailBody & ".txtalipay      {font-size:16px;font-FAMILY: Arial;LINE-HEIGHT:150%;padding:6px 8px 6px 8px; text-align:center;border:1px solid #FFD0A8; background:#FFFFFF;}"
	MailBody=MailBody & ".box-danger     {LINE-HEIGHT:150%; padding:6px 8px 6px 8px; text-align:center; border:1px solid #FFD0A8; background:#ffffee;}"
	MailBody=MailBody & ".note-help   	 {font-size: 12px;LINE-HEIGHT:130%;padding-left:3px;color: #999999;}"
	MailBody=MailBody & ".txt12          {font-size: 12px;LINE-HEIGHT:130%;}"
	MailBody=MailBody & ".txt14          {font-size: 14px;LINE-HEIGHT:130%;}"
	MailBody=MailBody & ".lh15           {LINE-HEIGHT:150%;}"
	MailBody=MailBody & ".hiddenText     {COLOR:#ffffff}"
	MailBody=MailBody & "</style>"
	MailBody=MailBody & "</head>"
	
	MailBody=MailBody & "<BODY bgcolor=ffffff text=#000000 leftMargin=0 topMargin=4>"
	MailBody=MailBody & "<center>"
    
	MailBody=MailBody & "<table width=""550"" border=""0"" cellspacing=""0"" cellpadding=6>"
	MailBody=MailBody & "<tr><td bgcolor=ffffff>"
    
	MailBody=MailBody & "<table width=""100%"" border=""0"" cellspacing=""1"">"
	MailBody=MailBody & "  <tr>"
	MailBody=MailBody & "    <td width=""204""><img src=""http://"& SYS_WebUrl &"/Images/BBRlogo.gif"" border=""0"" alt="""& SYS_WebName &"""></td>"
	MailBody=MailBody & "    <td width=""19"" height=""50"">&nbsp;</td>"
	MailBody=MailBody & "    <td width=""309"" align=""right""><a href=""http://"& SYS_WEBURL &""" target=""_blank""><font class=txt12>"& SYS_WEBNAME &"</font></a>"
	MailBody=MailBody & "        | <a href=""http://"& SYS_WEBURL &"/HELP.asp"" target=""_blank""><font class=txt12>帮助中心</font></a></td>"
	MailBody=MailBody & "  </tr>"
	MailBody=MailBody & "</table>"
	MailBody=MailBody & "<br>"
	MailBody=MailBody & "<table width=""550"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td class=title-gray>请确认您的交易相关信息</td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td height=40>亲爱的"& UName_S &"，您好：</td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "</table>"

	MailBody=MailBody & "<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td valign=""top"" class=lh15>&nbsp;&nbsp;&nbsp;&nbsp;"& SYS_WEBNAME &"已经收到您的交易信息！请你主动与对方取得联系并完成交易！<br>&nbsp;&nbsp;&nbsp;&nbsp;以下是您此次交易相关信息，如果这些信息不正确的话，请删除此信。"
	MailBody=MailBody & "<br>"
	MailBody=MailBody & "<br>"

	MailBody=MailBody & "<table width=""100%"" border=""0"" cellpadding=""0"" cellspacing=""0""><tr>"
	MailBody=MailBody & "<td class=box-danger align=center>"
	MailBody=MailBody & "<a href=""Http://"& SYS_WEBURL &"/AucInfo.asp?AucID="& AucID &""" target=""_blank"">商品名称：<b>"& AucTitle &"</b></a><br>"
	MailBody=MailBody & "</td>"
	MailBody=MailBody & "<td class=box-danger align=left>"
	MailBody=MailBody & "&nbsp;&nbsp;&nbsp;&nbsp;你的商品已经被用户"& UName_B &"成功拍下，请尽快登陆系统查看对方联系方式，并完成交易！谢谢你的支持！"
	MailBody=MailBody & "</td></tr></table>"

	MailBody=MailBody & "</td></tr></table>"
	MailBody=MailBody & "<table width=""550"" border=""0"" cellpadding=""0"" cellspacing=""8"" bgcolor=""#FFFFFF"">"
	MailBody=MailBody & "<tr> "
	MailBody=MailBody & "<td><div align=""center""><font class=note-help>该邮件由"& SYS_WEBNAME &"系统发出，系统不接受回信，因此请勿直接回复。</font>"
	MailBody=MailBody & "</div></td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "</table>"

	MailBody=MailBody & "<table width=""100%"" border=""0"" cellspacing=""9"" cellpadding=""0"">"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td><div align=""center""><font class=""txt12"">"& SYS_WEBNAME &"版权所有(R) 2004-2005</font></div></td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "</table> "

	MailBody=MailBody & "</td></tr></table>"

	MailBody=MailBody & "</center>"
	MailBody=MailBody & "</body>"
	MailBody=MailBody & "</HTML>"







	   Dim SendBBRMail
	   SendBBRMail=True
	   if comp_check("JMAIL.SMTPMail") then
	      Call JMail(MailTo,MailTopic,MailBody)
	   elseif  comp_check("CDONTS.NewMail") then
	      Call CDonts(MailTo,MailTopic,MailBody)
	   elseif comp_check("ASPMAIL.ASPMailCtrl.1") then
	      Call AspEmail(MailTo,MailTopic,MailBody)
	   else
	      SendBBRMail=False
	   end if





	MailTo=RegEmail_B

	MailTopic="你在"& SYS_WEBNAME &"上竞拍的商品已经成功拍下！"
	   
	MailBody="<html>"
	MailBody=MailBody & "<head>"
	MailBody=MailBody & "<title>"&SYS_WEBNAME&"商品交易提醒邮件</title>"
	MailBody=MailBody & "<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"" >"
	MailBody=MailBody & "<meta name=""description"" content=""宝贝儿，拍卖，购物，商城，BBR,CNBBR,AUCTION"" >"
	MailBody=MailBody & "<meta name=""keywords"" content=""宝贝儿，拍卖，购物，商城，BBR,CNBBR,AUCTION"" >"
	MailBody=MailBody & "<style type=""text/css""> "
	MailBody=MailBody & "BODY {font-FAMILY: 宋体;MARGIN: 5px 0px 0px 0px; }"
	MailBody=MailBody & "td {font-SIZE: 14px; COLOR: #000000; font-FAMILY: 宋体}"
    	MailBody=MailBody & "INPUT {font-SIZE: 14px;padding:4 2 0 2;}"
    
	MailBody=MailBody & "A:link {COLOR: #003399}"
	MailBody=MailBody & "A:visited {COLOR: #003399}"
	MailBody=MailBody & "A:hover {COLOR: #FF6600}"
    
	MailBody=MailBody & ".title-gray     {font-size:14px;color:#ffffff;LINE-HEIGHT:150%;padding: 4px 8px 3px 8px;background:#666666;border-bottom:1px solid #333333;border-left:10px solid #ff7300;}"
	MailBody=MailBody & ".h3-prom        {font-size:14px;LINE-HEIGHT:150%;padding:6px 8px 6 8; border: 1px solid #FF9966;background:#ffffee;}"
	MailBody=MailBody & ".h2-bottom      {font-weight:bold;font-size:14px;LINE-HEIGHT:150%;padding:8px 8px 3px 26px; border-bottom:2px solid #eeeedd;}"
	MailBody=MailBody & ".form-left-top  {border-top: 1px solid #EEEEdd;font-size:14px;vertical-align:top;LINE-HEIGHT:150%;padding:6px 3px 3px 3px;width:25%;text-align:right; }"
	MailBody=MailBody & ".form-right-top {border-top: 1px solid #EEEEdd;font-size:14px;vertical-align:top;LINE-HEIGHT:150%;padding:6px 3px 3px 3px;}"
	MailBody=MailBody & ".h3-note        {font-size:14px;LINE-HEIGHT:150%;padding:6px 8px 6px 8px; border:1px solid #CCCCEE; background:#EEEEFF;}"
	MailBody=MailBody & ".txtalipay      {font-size:16px;font-FAMILY: Arial;LINE-HEIGHT:150%;padding:6px 8px 6px 8px; text-align:center;border:1px solid #FFD0A8; background:#FFFFFF;}"
	MailBody=MailBody & ".box-danger     {LINE-HEIGHT:150%; padding:6px 8px 6px 8px; text-align:center; border:1px solid #FFD0A8; background:#ffffee;}"
	MailBody=MailBody & ".note-help   	 {font-size: 12px;LINE-HEIGHT:130%;padding-left:3px;color: #999999;}"
	MailBody=MailBody & ".txt12          {font-size: 12px;LINE-HEIGHT:130%;}"
	MailBody=MailBody & ".txt14          {font-size: 14px;LINE-HEIGHT:130%;}"
	MailBody=MailBody & ".lh15           {LINE-HEIGHT:150%;}"
	MailBody=MailBody & ".hiddenText     {COLOR:#ffffff}"
	MailBody=MailBody & "</style>"
	MailBody=MailBody & "</head>"
	
	MailBody=MailBody & "<BODY bgcolor=ffffff text=#000000 leftMargin=0 topMargin=4>"
	MailBody=MailBody & "<center>"
    
	MailBody=MailBody & "<table width=""550"" border=""0"" cellspacing=""0"" cellpadding=6>"
	MailBody=MailBody & "<tr><td bgcolor=ffffff>"
    
	MailBody=MailBody & "<table width=""100%"" border=""0"" cellspacing=""1"">"
	MailBody=MailBody & "  <tr>"
	MailBody=MailBody & "    <td width=""204""><img src=""http://"& SYS_WebUrl &"/Images/BBRlogo.gif"" border=""0"" alt="""& SYS_WebName &"""></td>"
	MailBody=MailBody & "    <td width=""19"" height=""50"">&nbsp;</td>"
	MailBody=MailBody & "    <td width=""309"" align=""right""><a href=""http://"& SYS_WEBURL &""" target=""_blank""><font class=txt12>"& SYS_WEBNAME &"</font></a>"
	MailBody=MailBody & "        | <a href=""http://"& SYS_WEBURL &"/HELP.asp"" target=""_blank""><font class=txt12>帮助中心</font></a></td>"
	MailBody=MailBody & "  </tr>"
	MailBody=MailBody & "</table>"
	MailBody=MailBody & "<br>"
	MailBody=MailBody & "<table width=""550"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td class=title-gray>恭喜你，竞拍成功！请确认您的交易相关信息</td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td height=40>亲爱的"& UName_B &"，您好：</td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "</table>"

	MailBody=MailBody & "<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td valign=""top"" class=lh15>&nbsp;&nbsp;&nbsp;&nbsp;"& SYS_WEBNAME &"已经收到您的交易信息！请你主动与对方取得联系并完成交易！<br>&nbsp;&nbsp;&nbsp;&nbsp;以下是您此次交易相关信息，如果这些信息不正确的话，请删除此信。"
	MailBody=MailBody & "<br>"
	MailBody=MailBody & "<br>"

	MailBody=MailBody & "<table width=""100%"" border=""0"" cellpadding=""0"" cellspacing=""0""><tr>"
	MailBody=MailBody & "<td class=box-danger align=center>"
	MailBody=MailBody & "<a href=""Http://"& SYS_WEBURL &"/AucInfo.asp?AucID="& AucID &""" target=""_blank"">商品名称：<b>"& AucTitle &"</b></a><br>"
	MailBody=MailBody & "</td>"
	MailBody=MailBody & "<td class=box-danger align=left>"
	MailBody=MailBody & "&nbsp;&nbsp;&nbsp;&nbsp;你参与竞拍的商品已经成功拍下，请尽快登陆系统查看对方联系方式，并完成交易！谢谢你的支持！"
	MailBody=MailBody & "</td></tr></table>"

	MailBody=MailBody & "</td></tr></table>"
	MailBody=MailBody & "<table width=""550"" border=""0"" cellpadding=""0"" cellspacing=""8"" bgcolor=""#FFFFFF"">"
	MailBody=MailBody & "<tr> "
	MailBody=MailBody & "<td><div align=""center""><font class=note-help>该邮件由"& SYS_WEBNAME &"系统发出，系统不接受回信，因此请勿直接回复。</font>"
	MailBody=MailBody & "</div></td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "</table>"

	MailBody=MailBody & "<table width=""100%"" border=""0"" cellspacing=""9"" cellpadding=""0"">"
	MailBody=MailBody & "<tr>"
	MailBody=MailBody & "<td><div align=""center""><font class=""txt12"">"& SYS_WEBNAME &"版权所有(R) 2004-2005</font></div></td>"
	MailBody=MailBody & "</tr>"
	MailBody=MailBody & "</table> "

	MailBody=MailBody & "</td></tr></table>"

	MailBody=MailBody & "</center>"
	MailBody=MailBody & "</body>"
	MailBody=MailBody & "</HTML>"


	if comp_check("JMAIL.SMTPMail") then
	   Call JMail(MailTo,MailTopic,MailBody)
	end if

   end if
End if
End Function
%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -