<% Dim UserName,Email,Phone,Fax,Note Dim sTo,sSubject,sBody UserName=Request.Form ("UserName") Email=Request.Form ("Email") Phone=Request.Form ("Phone") Fax=Request.Form ("Fax") Note=Request.Form ("Note") If Request.Form ("cmdOk")<>"" Then If UserName="" Then MsgReport "姓名不能为空！" End If If Email="" Then MsgReport "Email不能为空！" End If If not ChkEmail(Email) Then MsgReport "Email地址不合法！" End If If Phone="" Then MsgReport "电话不能为空！" End If sTo="Austrong@ifood1.com" sSubject="联系我们" sBody="客户姓名是:" & Username &"
"& "Email是："& Email & _ "
" &"电话是:" & phone & "
" & "传真是:" & fax & "
" & "留言是:" & note If SendMail(email,sTo,sSubject,sBody) Then MsgReport "您的联系信息已发送！" 'err.raise 10001,"myadvertising_3.asp","您的联系信息已发送！" else MsgReport "您的联系信息未能发送，请稍后再试！" 'err.raise 10001,"myadvertising_3.asp","您的联系信息未能发送，请稍后再试！" end if End If %> 联系我们
 
 
　联系我们
CONTACT
(注:带*号的为必填项)
　姓　　名:
 *
　电子邮件 :
 *
　联系电话: *
　传　　真:
　留　　言:
 
 
 
 
 
 
电话：电话：0755-81320345 13923868928 林生 传真：0755-22315753　　邮政编码：518024　　　E-mail: austrong@ifood1.com 　

深圳澳昌冷库有限公司
Shenzhen Austrong Cold Storage Co., Ltd.
技术支持：壹食品中国网