<% Response.ExpiresAbsolute = Now() - 1 Response.Expires = 0 Response.CacheControl = "no-cache" %> <% un = trim(request("username")) pw = trim(request("pwhidden")) saveUser = trim(request("saveUser")) cleancookies = trim(request("cleancookies")) if cleancookies = "true" then Response.Cookies("accounts") = "" end if showaccounts = trim(request.Cookies("accounts")) Response.Cookies("name") = "" dim ei dim errmsg errmsg = trim(request("errstr")) if IsEmpty(Application("em_MaxFolders")) and IsEmpty(Application("em_MaxMPOP3")) and IsEmpty(Application("em_MaxSigns")) then TimeDelaySeconds(5) dim mam set mam = server.createobject("easymail.AdminManager") mam.Load if mam.IsLoadOK = true then 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 Application("em_Enable_SignHold") = mam.Enable_SignHold Application("em_Enable_FreeSign") = mam.Enable_FreeSign Application("em_Enable_SignWithDomainUser") = mam.Enable_SignWithDomainUser Application("em_Enable_SignNumberLimit") = mam.Enable_SignNumberLimit Application("em_SignNumberLimitDays") = mam.SignNumberLimitDays Application("em_Enable_ShareFolder") = mam.Enable_ShareFolder Application("em_Enable_SignEnglishName") = mam.Enable_SignEnglishName Application("em_LogPageKSize") = mam.LogPageKSize Application("em_TestAccounts") = mam.TestAccounts Application("em_SignMode") = mam.SignMode Application("em_SignWaitDays") = mam.SignWaitDays Application("em_am_Name") = mam.am_Name Application("em_am_Accounts") = mam.am_Accounts set mam = nothing else set mam = nothing response.redirect "err.asp?errstr=" & Server.URLEncode("出错: 可能是WebEasyMail服务未启动") & "&" & getGRSN() end if end if if un <> "" and pw <> "" and Request.ServerVariables("REQUEST_METHOD") = "POST" then un = LCase(un) pw = strDecode(pw, trim(request("picnum"))) 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") = "" Session("tid") = "" Session("SecEx") = "" 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 if saveUser = "true" then Response.Cookies("accounts") = un Response.Cookies("accounts").Expires = DateAdd("y", 5, Now()) end if SecEx = trim(request("SecEx")) if SecEx = "true" then Session("SecEx") = "1" else Session("SecEx") = "0" end if dim userweb set userweb = server.createobject("easymail.UserWeb") userweb.Load Session("wem") ShowLanguage = userweb.ShowLanguage set userweb = nothing if ShowLanguage = 1 then Response.Redirect "en/welcome.asp" else Response.Redirect "welcome.asp" end if elseif checkret = 2 then set ei = nothing errmsg = "连续三次输入密码错误，请过" & pwwt & "分钟后再试。" else set ei = nothing errmsg = "错误的用户名或密码！请再次输入。" 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") = "" Session("SecEx") = "" %> 浙江天信发展科技有限公司
 

销售部经理：1 名 , 本科以上学历， 3 年以上销售管理经验，曾在 IT 、通信或 SP 公司工作，有事业心和渴望成功的强烈欲望，善于激励和培训他人，团队意识强，有代理商管理经验者优先考虑。

教育事业部经理： 1 名 , 本科以上学历， 3 年以上教育领域工作经验，有事业心和渴望成功的强烈欲望，善于激励和培训他人，能带领团队。有经营能力和财务管理能力。

销售区域经理：2 名 , 大专以上学历 , 2 年以上销售管理经验，能够承担工作压力，富于开拓精神。曾在 IT 、通信或 SP 公司工作者优先，有教育领域工作背景者优先。

教育事业部销售人员： 5 名，大专以上学历 , 1 年以上销售管理经验，必须要有项目实施经验，有较强的沟通能力，诚实、有责任心，能长期驻外。

定位事业部销售人员： 5 名，大专以上学历 , 1 年以上销售管理经验，必须要有项目实施经验，有较强的沟通能力，诚实、有责任心，能长期驻外。

市场部业务助理： 2 名 , 女，大专以上学历 , 一年以上市场管理类工作经验。具有 sp 方面工作经验者优先考虑。

车载设备安装人员：2 名 , 熟悉汽车电路，有相关的技术证书和工作经验，有安装车载 GPS 定位终端的人优先。

JSP 开发人员：2 名 , 精通 JSP 开发； 熟悉 SQLServer,oracle 等大型数据库；熟悉 Webwork 架构者优先。

VC 开发人员：2 名 , 熟悉 VC 开发、熟悉 SQL SERVER 和 Oracle 开发；熟悉 socket 网络通信编程 ；有 GIS 、 GPS 、流媒体研发相关项目经验者优先 ；有基于 BREW/Pocket PC/Smartphone 平台研发经验者优先。

工程实施：2 名 , 大专以上学历 , 网络布线相关工作一年以上 ; 通信 , 计算机 , 电子专业的优先 , 熟悉 windows 操作系统 , Cisco 路由器、交换机、接入设备 , 有数据设备组网经验的优先 . 有 NGN 、 VOIP 知识，电信增值业务工作背景优先 ; 有良好的沟通能力。

客户服务：2 名 , 大专以上学历 , 女性优先； 熟练操作计算机以及办公自动化软件 . 服从管理，有强烈的进取精神和责任感。思维灵活 . 善于与人沟通，具备电话行销的素质。

地址：杭州益乐路 223 号银江科技产业园 A 座 5 楼
联系人：陈小姐 电话： 88939707 email ： chenxiaowei@tiansign.com

 
用户名:
<% if showaccounts = "" then %> <% else %>
<%=showaccounts %> <% end if %>
密  码:
   
 
  
<% function getGRSN() dim theGRSN Randomize theGRSN = Int((9999999 * Rnd) + 1) getGRSN = "GRSN=" & CStr(theGRSN) end function function createRnd() dim retval retval = getGRSN() if Len(retval) > 4 then retval = Right(retval, 4) end if if Left(retval, 1) = "0" then retval = "5" & Right(retval, 3) end if createRnd = retval end function function strDecode(sd_Data, sd_bassnum) dim sd_vChar dim sd_NewData dim sd_TempChar sd_vChar = 1 do if sd_vChar > Len(sd_Data) then exit do end if sd_TempChar = CLng(Mid(sd_Data, sd_vChar, 5)) sd_TempChar = ChrW(65535 + sd_bassnum - sd_TempChar) sd_NewData = sd_NewData & sd_TempChar sd_vChar = sd_vChar + 5 loop strDecode = sd_NewData end function function TimeDelaySeconds(DelaySeconds) SecCount = 0 Sec2 = 0 while SecCount < DelaySeconds + 1 Sec1 = Second(Time()) if Sec1 <> Sec2 then Sec2 = Second(Time()) SecCount = SecCount + 1 end if wend end function %>