钢构,网架结构,彩钢

    产品快速导航   购物车
主    页   公司简介 产品介绍 新闻动态 客户服务 人力资源 联系我们 EnglishVersion
<%@ Language=VBScript%> <% Response.Buffer=true Response.Expires=0 %> <% set cn = Server.CreateObject("ADODB.Connection") cn.Open(mycnstr) set rs = Server.CreateObject("ADODB.Recordset") set rs2 = Server.CreateObject("ADODB.Recordset") sqltext="select * from syswork where code='101'" rs.Open sqltext,cn,1,1 if not rs.EOF then co_address=trim(rs("address")) co_phone=trim(rs("phone")) co_email=trim(rs("email")) co_fax=trim(rs("fax")) co_linkman=trim(rs("linkman")) co_zip=trim(rs("zip")) end if rs.close mymenu="contact" flag=Request.QueryString("flag") if Request.ServerVariables("REQUEST_METHOD")="POST" then topic=Request.Form("topic") email=Request.Form("email") myname=Request.Form("myname") corpname=Request.Form("corpname") address=Request.Form("address") phone=Request.Form("phone") fax=Request.Form("fax") content=Request.Form("content") mailstr="姓名:" + myname + chr(10) + chr(13) mailstr=mailstr + "单位:" + corpname + chr(10) + chr(13) mailstr=mailstr + "电话:" + phone + chr(10) + chr(13) mailstr=mailstr + "地址:" + address + chr(10) + chr(13) mailstr=mailstr + "传真:" + fax + chr(10) + chr(13) mailstr=mailstr + "内容:" + content + chr(10) + chr(13) Set msg = Server.CreateObject("JMail.Message") msg.silent = true msg.Logging = true msg.Charset = "gb2312" msg.MailServerUserName = "online-email@163.com" '输入smtp服务器验证登陆名 msg.MailServerPassword = "email123" '输入smtp服务器验证密码 (用户Email帐号对应的密码) msg.From = "online-email@163.com" msg.FromName = myname '发件人姓名 msg.AddRecipient co_email '收件人Email msg.AddRecipientBCC "napoleon@ibw.com.cn" '密件传送' msg.Subject = "萌山钢构网站留言" '信件主题 msg.Body = "主题:"+topic++chr(10)+chr(13)+mailstr '正文 msg.Send ("smtp.163.com") 'smtp服务器地址(企业邮局地址) set msg = nothing rs.Open "contact",cn,3,3 rs.AddNew rs("title")=topic rs("email")=email rs("myname")=myname rs("corpname")=corpname rs("phone")=phone rs("fax")=fax rs("content")=content rs("address")=address rs("creadate")=now() rs("sysemail")=co_email rs.Update rs.Close Response.Redirect("contact.asp?flag=1") end if %>
 
 
 

<%if flag="1" then%>

<%else%>
<%end if%>

网站地图

 钢结构首 页  
 公司简介  产品介绍  新闻动态  客户服务
 人力资源  联系我们  英文版  
 公司简介  
● 董事长致辞 ● 公司简介 ● 组织架构
● 企业文化 ● 业务范围 ● 公司荣誉
 产品介绍  
● 门式钢架结构 ● 塔架钢结构 ● 钢屋架结构
● 平板网架结构 ● 弧型网架结构 ● 曲面网架结构
● 网壳钢结构 ● 复合彩钢板 ● 单层彩钢板
● 钢结构生产设备 ● 钢结构设计软件 ● 钢结构案例
 新闻动态  
 客户服务  
● 服务理念 ● 真情服务  
 人力资源  
● 人才理念 ● 应聘向导 ● 招聘岗位
 联系我们  
 其 他  
● 企业邮局 ● 业务信箱 ● 经理信箱 ● 英文版
● 网站地图 12 ● 友情链接23 ● 了解钢结构 ● 钢结构制度
● H型钢 ● C型钢 ● Z型钢  

E-mail:msgg@msgg.com.cn Tel:0537-6869988 013355146988 Fax:0537-6868687

版权所有 山东萌山钢构工程有限公司