<%
'商易仿淘宝4.0(多用户)
'ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
'SQL版演示网站：http://sql.ftaobao.com
'电话：0571-56907100
'QQ：1147100
%>

<!--#include file="include/conn.asp" -->
<!--#include file="include/config.asp" -->
<!--#include file="include/jmail.asp" -->
<HTML><HEAD>
<META http-equiv=Content-Type content='text/html; charset=gb2312'>
<LINK href=../include/shop.css type=text/css rel=stylesheet></HEAD>
<%

'商易仿淘宝4.0.1演示地址
'http://www.ftaobao.com

sendname=shopnet("sendname")'收件姓名
sendmail=shopnet("sendmail")'收件人Email
username=shopnet("username")'发件人姓名
email=shopnet("email")'发件人Email
title=shopnet("title")'邮件主题
topic=shopnet("topic")'邮件文字内容
picurl=shopnet("picurl")'图片地址
pica=shopnet("pica")'链接地址
mc=shopnet("mc")'产品名称
jg=shopnet("jg")'产品价格


server_v1=shopnet("ServerVariables")
If email=shopnet("sendmail")<>"" And shopnet("sendname")<>"" And shopnet("username")<>"" then
html="<html><head><title>您的朋友"&username&"给您发来一封推荐信</title><meta http-equiv=Content-Type content=text/html; charset=gb2312></head><body bgcolor=#FFFFFF text=#000000>"
html=html&"亲爱的"&sendname&"：您好！<br><br>"
html=html&""&topic&"<br><br>"
html=html&"<a href=http://"&my_url&" target=""_blank"">"&my_name&"</a><br><br>"
html=html&"<div align=""center""><a href="""&pica&""" target=""_blank"">"
html=html&"<img src="""&picurl&""" width=""200"" heigth=""200"" border=""0""> <br>"
html=html&"产品名称：<b><font color=black>"&mc&"</font></b><br>"
html=html&"价格：<b><font color=red>"&jg&"</font></b>"
html=html&"</a></div><br>"

nr=html&"<br><br></body></html>"
email = shopnet("sendmail")
bt = "您的朋友"&username&"给您发来一封推荐信" 
if mailserver="0" then
smtp email,bt,nr
elseif mailserver="1" then
Call jmail1(email,bt,nr)
end if
%>
<br><br><br><br><CENTER>推荐信发送成功！</CENTER><br><br><br><br>
<CENTER><a href="#1" onClick="window.close()">点击关闭窗口</A><br><br><br><br><input TYPE="button" VALUE="返回上一步" ONCLICK="history.back(-2)"> </CENTER>
<%Else 
response.write "请填写正确再发送"
%>
<br><br><br><br><input TYPE="button" VALUE="返回上一步" ONCLICK="history.back(-1)">
<%End if
Closenothing()
%>
