<& '--------版權說明------------------ 'SQL通用防注入程序 V3.0 '2.0強化版,對代碼做了一點優化,加入自動封注入者Ip的功能!^_^ '3.0版,加入后臺登陸查看注入記錄功能,方便網站管理員查看非法記錄,以及刪除以前的記錄,是否對入侵者Ip解除封鎖! '火狐技術聯盟 Neeao URL:http://www.wrsky.com 'Neeao站點:http://www.neeao.com 'Mail:neeaocn@Gamil.com '--------數據庫連接部分-------------- dim dbkillSql,killSqlconn,connkillSql dbkillSql="../web#data#hxj#hyxr#mdb#hyjnh/Sql#In.mdb" 'On Error Resume Next Set killSqlconn = Server.CreateObject("ADODB.Connection") connkillSql="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbkillSql) killSqlconn.Open connkillSql If Err Then err.Clear Set killSqlconn = Nothing Response.Write "數據庫連接出錯,請檢查連接字串。" Response.End End If '--------定義部份------------------ Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh,Fy_db,Fy_dbstr,Kill_IP,WriteSql '自定義需要過濾的字串,用 "|" 分隔 Fy_In = "'|;|and|(|)|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare" Kill_IP=True WriteSql=True '---------------------------------- Fy_Inf = split(Fy_In,"|") '--------POST部份------------------ If Request.Form<>"" Then For Each Fy_Post In Request.Form For Fy_Xh=0 To Ubound(Fy_Inf) If Instr(LCase(Request.Form(Fy_Post)),Fy_Inf(Fy_Xh))<>0 Then If WriteSql=True Then killSqlconn.Execute("insert into SqlIn(Sqlin_IP,SqlIn_Web,SqlIn_FS,SqlIn_CS,SqlIn_SJ) values('"&Request.ServerVariables("REMOTE_ADDR")&"','"&Request.ServerVariables("URL")&"','POST','"&Fy_Post&"','"&replace(Request.Form(Fy_Post),"'","''")&"')") killSqlconn.close Set killSqlconn = Nothing End If Response.Write "" Response.Write "非法操作!系統做了如下記錄↓
" Response.Write "操作IP:"&Request.ServerVariables("REMOTE_ADDR")&"
" Response.Write "操作時間:"&Now&"
" Response.Write "操作頁面:"&Request.ServerVariables("URL")&"
" Response.Write "提交方式:POST
" Response.Write "提交參數:"&Fy_Post&"
" Response.Write "提交數據:"&Request.Form(Fy_Post) Response.End End If Next Next End If '---------------------------------- '--------GET部份------------------- If Request.QueryString<>"" Then For Each Fy_Get In Request.QueryString For Fy_Xh=0 To Ubound(Fy_Inf) If Instr(LCase(Request.QueryString(Fy_Get)),Fy_Inf(Fy_Xh))<>0 Then If WriteSql=True Then killSqlconn.Execute("insert into SqlIn(Sqlin_IP,SqlIn_Web,SqlIn_FS,SqlIn_CS,SqlIn_SJ) values('"&Request.ServerVariables("REMOTE_ADDR")&"','"&Request.ServerVariables("URL")&"','GET','"&Fy_Get&"','"&replace(Request.QueryString(Fy_Get),"'","''")&"')") killSqlconn.close Set killSqlconn = Nothing End If Response.Write "" Response.Write "非法操作!我們的系統已經做了如下記錄↓
" Response.Write "操作IP:"&Request.ServerVariables("REMOTE_ADDR")&"
" Response.Write "操作時間:"&Now&"
" Response.Write "操作頁面:"&Request.ServerVariables("URL")&"
" Response.Write "提交方式:GET
" Response.Write "提交參數:"&Fy_Get&"
" Response.Write "提交數據:"&Request.QueryString(Fy_Get) Response.Write "

請馬上離開,謝謝!" Response.End End If Next Next End If If Kill_IP=True Then Dim Sqlin_IP,rsKill_IP,Kill_IPsql Sqlin_IP=Request.ServerVariables("REMOTE_ADDR") Kill_IPsql="select Sqlin_IP from SqlIn where Sqlin_IP='"&Sqlin_IP&"'" Set rsKill_IP=killSqlconn.execute(Kill_IPsql) If Not(rsKill_IP.eof or rsKill_IP.bof) Then Response.write "" Response.End End If rsKill_IP.close End If &> 河源天裕電子塑膠有限公司
<u id="i46xe"></u>

  • <i id="i46xe"><bdo id="i46xe"></bdo></i><u id="i46xe"></u>

    <font id="i46xe"></font>

    <u id="i46xe"></u>
    1.   ·中文簡體·繁體中文·ENGLISH
       
      招聘中心
       
        首頁   薪資福利

      公司為保證各項制度順利實施,達到獎優罰劣的目的,特制定了相關獎懲管理標準。該標準適用于公司全體員工,由公司辦公室行政管理科負責。從業人員之獎勵,分為嘉獎、記功、獎金及升遷、晉級四種。公司根據不同的具體情況給予員工應有的嘉獎、記功、記大功、升遷或加薪,具體獎勵標準被寫入公司07版管理制度匯編中。
      公司在保證員工基本福利和激勵體系的同時,也通過組織員工體育比賽,旅游,野外拓展項目等活動豐富員工的生活,幫助員工提升團隊凝聚力和向心力,為員工個人的全面發展打下良好的基礎。
      社會保險:
      簽訂勞動合同的員工一律參加養老、醫療、工傷、生育、失業等五項保險。
      規定假期:
      法定例假日,包括元旦、勞動節、國慶節、春節,除此之外,還有婚假、產假、公假、喪假、建房假和相關帶薪假等。
      福利待遇:
      我們在報酬待遇上,堅定不移向優秀員工傾斜。
      工資分配實行基于能力主義的職能工資制;獎金的分配與部門和個人的績效改進掛鉤;其他相關等福利的分配,依據員工工作態度的考評結果;醫療保險按貢獻大小,對高級管理和資深專業員工與一般員工實行差別待遇,高級管理和資深專業人員除享受醫療保險外,還享受醫療保健等健康待遇。但是,我們不會犧牲公司的長期利益去滿足員工短期利益分配的最大化,公司保證在經濟景氣時期與事業發展良好階段,員工的人均年收入高于區域行業相應的最高水平。
      職業發展:
      每個員工通過努力工作,以及在工作中增長的才干,都可能獲得職務或任職資格的晉升。與此相對應,保留職務上的公平競爭機制,堅決推行能上能下的干部制度。公司人才成長規律,依據客觀公正的考評結果,讓最有責任心的人擔任重要的崗位。我們不拘泥于資歷與級別,按公司組織目標與事業機會的要求,依據制度性程序,對有突出才干和突出貢獻者實施破格晉升。但是,我們提倡循序漸進。

       
      Copyright © 2016 www.sbgamehacker-apk.com All Rights Reserved. 河源天裕電子塑膠有限公司 版權所有
      地址:河源市高新技術開發區興工大道東面科七路南 電話:0762-2203101 傳真:0762-2203100
      網站備案:粵ICP備11067044號 技術支持:新銳網絡-河源網站建設
      欧美99_国产高清无码视频_免费v片_黄色网站十八禁
      <u id="i46xe"></u>

    2. <i id="i46xe"><bdo id="i46xe"></bdo></i><u id="i46xe"></u>

      <font id="i46xe"></font>

      <u id="i46xe"></u>