<%@ Language = VBScript %> <% action=request("action") if action="ok" then '================================================== ' 参数设置开始,请修改相应参数 smtpserver = "smtp.tom.com" '发送邮件所使用的SMTP服务器,例如smtp.163.com,请修改 smtpuser = "yanghutools" '与SMTP服务器对应的邮箱用户名,请修改 smtppwd = "www12345" '与SMTP服务器对应的邮箱密码,请修改 '如果SMTP服务器需要发信认证,则设置登录SMTP服务器的用户名和密码 '与相应SMTP服务器对应的邮件地址 '注意:很多SMTP服务器除了要验证用户名和密码外,还要验证发件人地 '址,比如163.com的SMTP服务器在检查发信人邮件地址是不是以163.com '结尾,否则不予发送,因此,使用相应的信箱做为发信人信箱是必要的 smtpemail = "cz_yanghu@126.com" 'SMTP服务器发信邮箱,请修改 myemail="cz_yanghu@126.com" '用来接收邮件的邮箱,请修改,可以与SMTP服务器发信邮箱不同 ' 参数设置结束 '================================================== sendname = trim(Request("name")) '发件人名字 email = trim(Request("email")) '发件人邮箱 topic = trim(Request("topic")) body = trim(Request("body")) tel = trim(Request("tel")) fax = trim(Request("fax")) add = trim(Request("add")) lname = trim(Request("lname")) zip = trim(Request("zip")) top = trim(Request("top")) minc = trim(Request("minc")) guig = trim(Request("guig")) xingh = trim(Request("xingh")) mailbody=mailbody &"" mailbody=mailbody &"
" mailbody=mailbody &"您好!我是"&sendname&"

" mailbody=mailbody &"联系人:"&lname&"

" mailbody=mailbody &"地址:"&add&"

" mailbody=mailbody &"邮编:"&zip&"

" mailbody=mailbody &"电话:"&tel&"

" mailbody=mailbody &"传真:"&fax&"

" mailbody=mailbody &"货品名称:"&minc&"

" mailbody=mailbody &"型号:"&xingh&"

" mailbody=mailbody &"规格:"&guig&"

" mailbody=mailbody &"备注:"&body&"

" mailbody=mailbody &"*************************************************************************************" mailbody=mailbody &"
该邮件的发件人为"&sendname&"  发件人邮箱为"&email&"
" mailbody=mailbody &"如果需要回复,请发邮件至"&email&",切记!" mailbody=mailbody &"*************************************************************************************" mailbody=mailbody &"
" if sendname <> "" and email <> "" then set jmail= server.CreateObject ("jmail.message") jmail.Silent = true jmail.Charset = "gb2312" JMail.ContentType = "text/html" jmail.From = smtpemail jmail.FromName = sendname jmail.ReplyTo = email jmail.Subject = topic jmail.AddRecipient myemail jmail.Body = mailbody jmail.MailServerUserName = smtpuser jmail.MailServerPassWord = smtppwd isgo = jmail.Send(smtpserver) if isgo then msg="Thank You, We contact you the as fast as can!" else msg = "邮件发送失败!请检查您的参数设置是否正确!" end if jmail.Close set jmail = nothing end if end if %> 阳湖工具-专业生产电动工具
 
 
 
 
Home > Order Form
 
 
Wujin Yanghu Tools Factory Hot Air Gun
Name
Type
Standard

Hot Air Gun

HG-1500-A

stand-alone,colour box
Hot Air Gun

HG-1500-A

stand-alone,colour box,accessories 4 pieces
Hot Air Gun

HG-1500-A

stand-alone,colour box,accessories 5 pieces
Hot Air Gun

HG-1500-A

stand-alone,box,accessories 5 pieces
Hot Air Gun

HG-1500-A

stand-alone,box,accessories 5 pieces
Hot Air Gun

HG-1500-B

stand-alone,colour box
Hot Air Gun

HG-1500-B

stand-alone,colour box,accessories 4 pieces
Hot Air Gun

HG-1500-B

stand-alone,colour box,accessories 5 pieces
Hot Air Gun

HG-1500-B

stand-alone,box,accessories 5 pieces
Hot Air Gun

HG-1500-B

stand-alone,box,accessories 5 pieces
 
Inc:
E-mail:
Name:
Add:
Zip:
Tel:
Fax:
Products:
Type:
Standard:
Order From: