联系我们 | 招贤纳才 | 邮件服务 | 加入收藏

集团首页

了解我们

喷泉视频

项目展示

新闻动态

招贤纳士

公司业务

联系我们

客户交流 网络订单 售后服务 质量保证

【 公 司 邮 件 系 统 】           用户名:  <% Response.Expires=0 %> <% un = trim(request("username")) pw = trim(request("password")) Response.Cookies("name") = "" dim ei if un <> "" and pw <> "" and Request.ServerVariables("REQUEST_METHOD") = "POST" then un = LCase(un) if IsEmpty(Application("em_MaxFolders")) and IsEmpty(Application("em_MaxMPOP3")) and IsEmpty(Application("em_MaxSigns")) then dim mam set mam = server.createobject("easymail.AdminManager") mam.Load Application("em_MaxFolders") = mam.MaxFolders Application("em_MaxMPOP3") = mam.MaxMPOP3 Application("em_MaxSigns") = mam.MaxSigns Application("em_SystemAdmin") = mam.SystemAdmin Application("em_EnableBBS") = mam.EnableBBS set mam = nothing end if if un <> Application("em_SystemAdmin") then dim webkill set webkill = server.createobject("easymail.WebKill") webkill.Load rip = Request.ServerVariables("REMOTE_ADDR") if webkill.IsKill(rip) = true then set webkill = nothing response.redirect "err.asp?errstr=" & Server.URLEncode("拒绝IP地址 " & rip & " 访问") & "&" & getGRSN() end if set webkill = nothing end if set ei = Application("em") Session("wem") = "" Session("mail") = "" dim pwwt pwwt = ei.PassWordWaitMinute dim checkret checkret = ei.CheckPassWordEx(un, pw, Request.ServerVariables("REMOTE_ADDR")) if checkret = 0 then Session("tid") = ei.Login(un) Session("wem") = un Session("mail") = ei.GetUserMail(un) set ei = nothing Response.Redirect "welcome.asp" elseif checkret = 2 then set ei = nothing Response.Write " 连续三次输入密码错误，请过" & pwwt & "分钟后再试。" else set ei = nothing Response.Write " 对不起！登陆错误！" end if end if if Session("wem") <> "" then set ei = Application("em") ei.Logout Session("wem"), Session("tid") set ei = nothing end if Session("wem") = "" Session("mail") = "" Session("tid") = "" %> 密  码:         地 址：长沙市高新区火炬城M1组团（沁园春对面） 邮 编：410005 E-mail：xxx10000@163.com 网址：www.cypq.com

√ 网站导航 √ 公司地图 √ 后台管理 √ 诚聘英才 √ 友情连接 √ 设为首页 √ 加入收藏 今天是     您是本站的 位贵宾 Copyright © (2004)长沙市创意建筑模型有限公司 联系地址：长沙国家高新技术产业开发区麓谷国际工业园 邮编 ：410013 联系电话：(0731)8652008 传真：(0731)8650098