/ltd/ccs/ccs_gz/ccs_gscxy_bmldcx_main.asp

http://github.com/zhaowe/bc · ASP · 631 lines · 489 code · 105 blank · 37 comment · 33 complexity · 1810ef7731557d36e8a4db94f1d98428 MD5 · raw file 

    

  1. <%@ Language=VBScript %>

    2. 

  2. 

    3. 

  3. <% 

    4. 

  4.  

    5. 

  5. if trim(session("UID"))<>"" then

    6. 

  6.  dim objD

    7. 

  7.   set ObjD=server.CreateObject ("Com_UserManage.ClsUserManage")

    8. 

  8.        VerifyOk_gsld=objD.VerifyUserFunction (session("UID"),"ccs_gscxy")

    9. 

  9.        VerifyOk_gsfz=objD.VerifyUserFunction (session("UID"),"ccs_gsfzcx")

    10. 

  10.     'if VerifyOk_gsld=false then

    11. 

  11.       'session("errorNo")="000002"

    12. 

  12.       'Response.Redirect "../../sorry/sorry.asp"

    13. 

  13.     'else

    14. 

  14.     '   bm=Request.QueryString ("bm") 

    15. 

  15.     'end if   

    16. 

  16. else

    17. 

  17.    session("errorNo")="000001"

    18. 

  18.    Response.Redirect "../sorry/sorry.asp"

    19. 

  19. end if 

    20. 

  20.  

    21. 

  21.   'dep=Request.QueryString ("dep")

    22. 

  22. 

    23. 

  23. 

    24. 

  24. 

    25. 

  25. 

    26. 

  26.    Set objConn = Server.CreateObject("ADODB.Connection")

    27. 

  27.    objConn.Open Application("OledbStr") 

    28. 

  28.       

    29. 

  29.    Set objRst=server.CreateObject ("ADODB.Recordset")

    30. 

  30.    objRst.LockType=3

    31. 

  31.    objRst.CursorType=3

    32. 

  32.    set objRst.activeConnection=objConn

    33. 

  33.    

    34. 

  34.   Set objRst1=server.CreateObject ("ADODB.Recordset")

    35. 

  35.   objRst1.LockType=3

    36. 

  36.   objRst1.CursorType=3

    37. 

  37.   set objRst1.activeConnection=objConn

    38. 

  38.   

    39. 

  39.    Set objRst2=server.CreateObject ("ADODB.Recordset")

    40. 

  40.   objRst2.LockType=3

    41. 

  41.   objRst2.CursorType=3

    42. 

  42.   set objRst2.activeConnection=objConn

    43. 

  43. 

    44. 

  44.    

    45. 

  45. 

    46. 

  46. 

    47. 

  47. 

    48. 

  48.    emid=trim(session("emid"))

    49. 

  49.    loginid=trim(session("loginid"))

    50. 

  50. 

    51. 

  51.    sql="SELECT loginid,name,a.companyid,companyname FROM logininfo as a,companylocale as b "

    52. 

  52.    sql=sql+" where a.companyid=b.companyid and loginid='"& trim(session("loginid")) &"'"   

    53. 

  53.    objrst.open sql

    54. 

  54.    

    55. 

  55.    if objrst.eof and objrst.bof then

    56. 

  56.      Response.Write "Êý¾Ý±í³ö´í£¬µÇ¼ÈËÕÒ²»µ½²¿ÃÅ"

    57. 

  57.    else

    58. 

  58.      depart=trim(objrst("companyname"))

    59. 

  59.    end if

    60. 

  60.    objrst.Close 

    61. 

  61.    

    62. 

  62.    bm=trim(Request.QueryString ("bm"))      

    63. 

  63.     

    64. 

  64.     'if VerifyOk_gsld=true and bm<>"" then

    65. 

  65.        session("dep")=bm

    66. 

  66.    ' else

    67. 

  67.       ' bm=depart

    68. 

  68.       ' session("dep")=depart

    69. 

  69.    ' end if

    70. 

  70.    

    71. 

  71.    'if bm="¹«Ë¾Áìµ¼" then 

    72. 

  72.     '  bm=Request.QueryString ("bm")

    73. 

  73.    'else

    74. 

  74.    '   session("dep")=bm

    75. 

  75.    'end if      

    76. 

  76.   

    77. 

  77.    'bm="ÐÅÏ¢¹¤³Ì²¿"

    78. 

  78.    

    79. 

  79.     bm=session("dep")

    80. 

  80.    

    81. 

  81.    

    82. 

  82.   

    83. 

  83.   

    84. 

  84.   

    85. 

  85.   'year1=year(date)

    86. 

  86.   'date1=cdate(year1 & "-" & "1" & "-"&"1")

    87. 

  87.   'date2=cdate(year1 & "-" & "3" & "-"&"1")

    88. 

  88.   'date3=cdate(year1 & "-" & "6" & "-"&"1")

    89. 

  89.   'date4=cdate(year1 & "-" & "9" & "-"&"1")

    90. 

  90.   'date5=cdate(year1 & "-" & "12" & "-"&"1")

    91. 

  91.   'riqi=cdate(year1 & "-" & "1" & "-"&"1")

    92. 

  92.   'riqi1=cdate(year1 & "-" & "12" & "-"&"1")

    93. 

  93.   

    94. 

  94.   'km=Request.QueryString ("km")

    95. 

  95.   'session("km")=km

    96. 

  96. 

    97. 

  97.   lb=Request.QueryString ("month")

    98. 

  98.   'Response.Write lb

    99. 

  99.   syear=trim(Request.QueryString ("syear"))

    100. 

  100.   

    101. 

  101.   if syear="" then syear=year(date)

    102. 

  102.   

    103. 

  103.   %>

    104. 

  104. <html>

    105. 

  105. <head>

    106. 

  106. <title>Ô¤Ëã¹ÜÀíϵͳ--<%=bm%></title>

    107. 

  107. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">

    108. 

  108. 

    109. 

  109. <style type="text/css">

    110. 

  110. .px10 {  font-size: 10px; line-height: 150%}

    111. 

  111. .px12 {  font-size: 12px; line-height: 150%}

    112. 

  112. .px14 {  font-size: 14px; line-height: 150%}

    113. 

  113. .px16 {  font-size: 16px; line-height: 150%}

    114. 

  114. .px18 {  font-size: 18px; line-height: 150%}

    115. 

  115. .px24 {  font-size: 24px; line-height: 150%}

    116. 

  116. .px36 {  font-size: 36px; line-height: 150%}

    117. 

  117. .px48 {  font-size: 48px; line-height: 150%}

    118. 

  118. .px72 {  font-size: 72px; line-height: 150%}

    119. 

  119. body {  font-size: 12px; line-height: 150%}

    120. 

  120. p {  font-size: 12px; line-height: 150%}

    121. 

  121. td {  font-size: 9px; line-height: 150%}

    122. 

  122. input {  font-size: 12px; line-height: 150%}

    123. 

  123. select {  font-size: 12px; line-height: 150%}

    124. 

  124. .content4{FONT-SIZE:10PT; LINE-HEIGHT:9PT;}

    125. 

  125. .contentindex{font-family: "ËÎÌå";FONT-SIZE:9pt; LINE-HEIGHT:11pt;}

    126. 

  126. .enter {COLOR: #FFAF02; FONT-FAMILY: "ËÎÌå", "Arial", "Times New Roman"; FONT-SIZE: 11pt; TEXT-DECORATION: none ;font-weight: bold}

    127. 

  127. .head1{FONT-SIZE:11pt; LINE-HEIGHT:18pt; font-weight: bold; }

    128. 

  128. .head2{FONT-SIZE:10pt; LINE-HEIGHT:14pt; font-weight: bold; }

    129. 

  129. .contentsmall{FONT-SIZE:9pt; LINE-HEIGHT:12pt;}

    130. 

  130. .nav{FONT-SIZE:9pt; LINE-HEIGHT:10pt; color: #999999}

    131. 

  131. .content{FONT-SIZE:10pt; LINE-HEIGHT:14pt;color: #000000:#000000}

    132. 

  132. .news{FONT-SIZE:10pt; LINE-HEIGHT:14pt; color; color: #000000:#000000}

    133. 

  133. .contentbig{FONT-SIZE:11pt; LINE-HEIGHT:14pt;}

    134. 

  134. .info{  font-size: 9pt; line-height: 9pt;  color: #FFFFFF}

    135. 

  135. .footer{  font-size: 9pt; line-height: 12pt; font-weight: normal}

    136. 

  136. .search {  font-size: 10pt; line-height: 14pt; color: #ffffff; background-color: #75AEE3}

    137. 

  137. .whitehead {  font-size: 12pt; line-height: 15pt; color: #FFFFFF}

    138. 

  138. .whitecontent {  font-size: 10pt; line-height: 14pt; color: #ffffff}

    139. 

  139. .bgcolor {  background-color: #006797}

    140. 

  140. .leftline {  background-color: #FD7D04}

    141. 

  141. a:active {  color: #000000;; text-decoration: none}

    142. 

  142. a:visited {  color: #000000; font-weight: normal;; text-decoration: none}

    143. 

  143. a:link {  color: #000000; font-weight: normal; ; text-decoration: none}

    144. 

  144. a.homepage:link {  color: #000000; font-weight: normal;}

    145. 

  145. a.homepage:visited {  color: #000000; font-weight: normal;}

    146. 

  146. a.homepage:active {  color: #000000; font-weight: normal;}

    147. 

  147. a.homepage:hover {  color: #000000; font-weight: normal;}

    148. 

  148. </style>

    149. 

  149. <script language="JavaScript">

    150. 

  150. <!--

    151. 

  151. function MM_preloadimagess() { //v3.0

    152. 

  152.   var d=document; if(d.imagess){ if(!d.MM_p) d.MM_p=new Array();

    153. 

  153.     var i,j=d.MM_p.length,a=MM_preloadimagess.arguments; for(i=0; i<a.length; i++)

    154. 

  154.     if (a[i].indexOf("#")!=0){ d.MM_p[j]=new images; d.MM_p[j++].src=a[i];}}

    155. 

  155. }

    156. 

  156. 

    157. 

  157. function MM_swapImgRestore() { //v3.0

    158. 

  158.   var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;

    159. 

  159. }

    160. 

  160. 

    161. 

  161. function MM_findObj(n, d) { //v4.01

    162. 

  162.   var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {

    163. 

  163.     d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}

    164. 

  164.   if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];

    165. 

  165.   for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);

    166. 

  166.   if(!x && d.getElementById) x=d.getElementById(n); return x;

    167. 

  167. }

    168. 

  168. 

    169. 

  169. function MM_swapimages() { //v3.0

    170. 

  170.   var i,j=0,x,a=MM_swapimages.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)

    171. 

  171.    if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}

    172. 

  172. }

    173. 

  173. 

    174. 

  174. function year1_onchange() {

    175. 

  175.   //sbm=selbm.value ;

    176. 

  176.   sbm='<%=bm%>';

    177. 

  177.   syear=year1.value ;

    178. 

  178.   surl='ccs_gscxy_bmldcx_main.asp?syear='+syear+'&bm='+sbm;

    179. 

  179.   window.document.location.href(surl);

    180. 

  180. }

    181. 

  181. 

    182. 

  182. 

    183. 

  183. 

    184. 

  184. function selbm_onchange() {

    185. 

  185.   sbm=selbm.value ;

    186. 

  186.   syear=year1.value ;

    187. 

  187.   if (sbm=="ËùÓв¿ÃÅ")

    188. 

  188.      surl='ccs_gsldcx_main.asp?syear='+syear

    189. 

  189.   else   

    190. 

  190.      surl='ccs_gscxy_bmldcx_main.asp?syear='+syear+'&bm='+sbm;

    191. 

  191.   window.document.location.href(surl);

    192. 

  192. }

    193. 

  193. 

    194. 

  194. 

    195. 

  195. //-->

    196. 

  196. </script>

    197. 

  197. 

    198. 

  198. </head>

    199. 

  199. 

    200. 

  200. <body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" text="#000000" link="#3333FF" >

    201. 

  201. <table width="100%" border="0" cellspacing="0" cellpadding="0">

    202. 

  202.   <tr>

    203. 

  203.     <td background="images/obj_hed1.gif">

    204. 

  204.       <table border="0" cellspacing="0" cellpadding="0" width="800">

    205. 

  205.         <tr>

    206. 

  206.           <td width="10"><img src="images/spacer.gif" width="10" height="35"></td>

    207. 

  207.           <td width="171"><img src="images/obj_maintitle.gif" width="171" height="30" border="0"></td>

    208. 

  208.           <td width="10"><img src="images/spacer.gif" width="10" height="35"></td>

    209. 

  209.           <td width="605"> 

    210. 

  210.             <table border="0" cellspacing="0" cellpadding="3" name="menubutton">

    211. 

  211.               <tr>

    212. 

  212.                 <td>&nbsp;</td>

    213. 

  213.                  <td>&nbsp;</td>

    214. 

  214.                 <td>&nbsp;</td>

    215. 

  215.                  <td>&nbsp;</td>                 

    216. 

  216.                  <td><a href="ccs_gscxy_main.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapimages('images1','','images/bmcx.gif',1)"><img src="images/bmcx_1.gif" width="100" height="20" border="0" name="images1"></a></td>

    217. 

  217.                  <td>&nbsp;</td>

    218. 

  218.                  <td>&nbsp;</td>

    219. 

  219.                  <td>&nbsp;</td>

    220. 

  220.                  <td><a href="ccs_gscxy_index.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapimages('images4','','images/fycx.gif',1)"><img src="images/fycx_1.gif" width="100" height="20" border="0" name="images4"></a></td>

    221. 

  221.                  <td>&nbsp;</td>

    222. 

  222.                  <td>&nbsp;</td>

    223. 

  223.                  <td>&nbsp;</td>

    224. 

  224.                  <td><a href="ccs_gscxy_mxcx.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapimages('images4','','images/flcx_cf.jpg',1)"><img src="images/flcx_cf.jpg" width="100" height="20" border="0" name="images4"></a></td>

    225. 

  225.               </tr>

    226. 

  226.             </table>

    227. 

  227.           </td>

    228. 

  228.         </tr>

    229. 

  229.       </table>

    230. 

  230.     </td>

    231. 

  231.   </tr>

    232. 

  232.   <tr>

    233. 

  233.     <td bgcolor="#FF6600"><img src="images/spacer.gif" width="10" height="2"></td>

    234. 

  234.   </tr>

    235. 

  235. </table>

    236. 

  236. <table border="0" cellspacing="0" cellpadding="0" width="700">

    237. 

  237.   <tr> 

    238. 

  238.     <td width="140"><img src="images/obj_hed2_left.jpg" width="140" height="98"></td>

    239. 

  239.     <td width="30"><img src="images/obj_hed2_center2.jpg" width="30" height="98"></td>

    240. 

  240.     <td width="470" valign="top" background="images/obj_hed2_right.jpg"> 

    241. 

  241.       <table width="300" border="0" cellspacing="0" cellpadding="0" background>

    242. 

  242.         <tr>

    243. 

  243.           <td><img src="images/spacer.gif" width="330" height="5"></td>

    244. 

  244.           <td><img src="images/spacer.gif" width="130" height="5"></td>

    245. 

  245.         </tr>

    246. 

  246.         <tr>

    247. 

  247.           <td valign="top">

    248. 

  248.             <table border="0" cellspacing="0" cellpadding="0" name="banner">

    249. 

  249.               <tr> 

    250. 

  250.                 <td colspan="2"><img src="images/spacer.gif" width="10" height="24"></td>

    251. 

  251.               </tr>

    252. 

  252.               <tr> 

    253. 

  253.                 <td><img src="images/ba1_point.gif" width="35" height="39"></td>

    254. 

  254.                 <td><img src="images/lizztp1.gif" width="205" height="39"></td>

    255. 

  255.               </tr>

    256. 

  256.             </table>

    257. 

  257.           </td>

    258. 

  258.           <td align="right">

    259. 

  259.             <table border="0" cellspacing="0" cellpadding="0">

    260. 

  260.               <tr>

    261. 

  261.                 <td><img src="images/spacer.gif" width="20" height="53"></td>

    262. 

  262.               </tr>

    263. 

  263.               <tr>

    264. 

  264.                 <td><a href><img src="images/lizztp5.gif" width="138" height="28" border="0"></a></td>

    265. 

  265.               </tr>

    266. 

  266.             </table>

    267. 

  267.           </td>

    268. 

  268.         </tr>

    269. 

  269.       </table>

    270. 

  270.       

    271. 

  271.     </td>

    272. 

  272.     <td width="470" valign="top"><img src="images/obj_hed2_right-.jpg" width="60" height="73"> 

    273. 

  273.     </td>

    274. 

  274.   </tr>

    275. 

  275. </table>

    276. 

  276. <table width="740" border="0" cellspacing="0" cellpadding="0" height="90%">

    277. 

  277.   <tr>

    278. 

  278.     <td bgcolor="#000033" width="140" valign="top"> 

    279. 

  279.       <table border="0" cellspacing="0" cellpadding="0">

    280. 

  280.         <tr> 

    281. 

  281.           <td background="images/obj_left.jpg"> 

    282. 

  282.             <table border="0" cellspacing="0" cellpadding="0">

    283. 

  283.               <tr> 

    284. 

  284.                 <td><img src="images/spacer.gif" width="140" height="45"></td>

    285. 

  285.               </tr>

    286. 

  286.             </table>

    287. 

  287.           </td>

    288. 

  288.         </tr>

    289. 

  289.       </table>

    290. 

  290.       <table border="0" cellspacing="5" cellpadding="0" width="140">

    291. 

  291.         <tr> 

    292. 

  292.           <td> 

    293. 

  293.             <hr width="130">

    294. 

  294.           </td>

    295. 

  295.         </tr>

    296. 

  296.       

    297. 

  297.         <tr> 

    298. 

  298.           <td> 

    299. 

  299.             <table width="130" border="0" cellspacing="0" cellpadding="1">

    300. 

  300.                   <%objrst.Source ="select distinct sx=fkmcode,kem=fkmshuom,depar from cwys_km where depar='"& bm &"' and nian='"& syear &"' order by sx" 

    301. 

  301.                   'objrst.Source ="select distinct kem,sx from shenzhencwys_dep where dep='"& session("dep") &"' order by sx" 

    302. 

  302.                    'Response.Write "select distinct sx=fkmcode,kem=fkmshuom,depar from cwys_km where depar='"& bm &"' and nian='"& syear &"' order by sx" 

    303. 

  303.                     objrst.Open 

    304. 

  304.                     if objrst.EOF and objrst.BOF then

    305. 

  305.                     else

    306. 

  306.                       objrst.MoveFirst

    307. 

  307.                       k=objrst("kem") 

    308. 

  308.                     

    309. 

  309.                                          

    310. 

  310.                       while not objrst.EOF %>

    311. 

  311.                      <tr> 

    312. 

  312.                      <td width="6" valign="top"><img src="images/a.gif" WIDTH="28" HEIGHT="28"></td>                     

    313. 

  313.                      <td width="116"><a href="ccs_gscxy_bmldcx_index.asp?syear=<%=syear%>&bm=<%=bm%>&km=<%=objrst("kem")%>"><font class="px14" color="#FFFFFF"><%=objrst("kem")%></font></a></td>

    314. 

  314.                      </tr>

    315. 

  315.                      <%objrst.MoveNext %> 

    316. 

  316.                        <% wend 

    317. 

  317.                      end if  

    318. 

  318.                        %>

    319. 

  319.                        <%objrst.Close%>

    320. 

  320.                                 

    321. 

  321.             

    322. 

  322.             </table>

    323. 

  323.           </td>

    324. 

  324.         </tr>

    325. 

  325.         <tr> 

    326. 

  326.           <td> 

    327. 

  327.             <hr width="130">

    328. 

  328.           </td>

    329. 

  329.         </tr>

    330. 

  330.        

    331. 

  331.          <tr>

    332. 

  332.   

    333. 

  333.     <td align=center><a href="ccs_gscxy_bmldcx_main.asp?syear=<%=year(date)%>&bm=<% =bm%>"><font class="px14" color="#FFFFFF">¸÷Ïîͳ¼Æ</font></a></td>

    334. 

  334.     

    335. 

  335.   </tr>   

    336. 

  336.       </table>

    337. 

  337.     </td>

    338. 

  338.     <td width="5"><img src="images/spacer.gif" width="10" height="5"></td>

    339. 

  339.     <td width="595" valign="top"> 

    340. 

  340.    

    341. 

  341.     <table align="center" style="BORDER-RIGHT: #4983a0 1px solid; BORDER-TOP: #4983a0 1px solid; BORDER-LEFT: #4983a0 1px solid; BORDER-BOTTOM: #4983a0 1px solid" height="20" cellSpacing="0" cellPadding="0" width="775"  border="0">

    342. 

  342.   <tbody>

    343. 

  343.   

    344. 

  344.   

    345. 

  345.   <%

    346. 

  346.    sql_ze="ze=a.niandu,"

    347. 

  347.    sql_fy=""

    348. 

  348.    cxsj=cstr(syear)+"È«Äê"

    349. 

  349.    

    350. 

  350.    select case  cstr(lb)

    351. 

  351.      case "1":

    352. 

  352.            sql_ze="ze=a.jan,"

    353. 

  353.            sql_fy=" and month(mnytime)=1 "

    354. 

  354.            cxsj="Ò»Ô·Ý"

    355. 

  355.      case "2":

    356. 

  356.            sql_ze="ze=a.feb,"

    357. 

  357.            sql_fy=" and month(mnytime)=2 "

    358. 

  358.            cxsj="¶þÔ·Ý"

    359. 

  359.      case "3":

    360. 

  360.            sql_ze="ze=a.mar,"

    361. 

  361.            sql_fy=" and month(mnytime)=3 "

    362. 

  362.            cxsj="ÈýÔ·Ý"

    363. 

  363.      case "4":

    364. 

  364.            sql_ze="ze=a.apr,"

    365. 

  365.            sql_fy=" and month(mnytime)=4 "

    366. 

  366.            cxsj="ËÄÔ·Ý"

    367. 

  367.      case "5":

    368. 

  368.            sql_ze="ze=a.may,"

    369. 

  369.            sql_fy=" and month(mnytime)=5 "

    370. 

  370.            cxsj="ÎåÔ·Ý"

    371. 

  371.      case "6":

    372. 

  372.            sql_ze="ze=a.jun,"

    373. 

  373.            sql_fy=" and month(mnytime)=6 "

    374. 

  374.            cxsj="ÁùÔ·Ý"

    375. 

  375.      case "7":

    376. 

  376.            sql_ze="ze=a.jul,"

    377. 

  377.            sql_fy=" and month(mnytime)=7 "

    378. 

  378.            cxsj="ÆßÔ·Ý"

    379. 

  379.      case "8":

    380. 

  380.            sql_ze="ze=a.aug,"

    381. 

  381.            sql_fy=" and month(mnytime)=8 "

    382. 

  382.            cxsj="°ËÔ·Ý"

    383. 

  383.      case "9":

    384. 

  384.            sql_ze="ze=a.sep,"

    385. 

  385.            sql_fy=" and month(mnytime)=9 "

    386. 

  386.            cxsj="¾ÅÔ·Ý"

    387. 

  387.      case "10":

    388. 

  388.            sql_ze="ze=a.oct,"

    389. 

  389.            sql_fy=" and month(mnytime)=10 "

    390. 

  390.            cxsj="ʮԷÝ"

    391. 

  391.      case "11":

    392. 

  392.            sql_ze="ze=a.nov,"

    393. 

  393.            sql_fy=" and month(mnytime)=11 "

    394. 

  394.            cxsj="ʮһÔ·Ý"

    395. 

  395.      case "12":

    396. 

  396.            sql_ze="ze=a.dece,"

    397. 

  397.            sql_fy=" and month(mnytime)=12 "

    398. 

  398.            cxsj="Ê®¶þÔ·Ý"

    399. 

  399.            

    400. 

  400.      case "jd1":

    401. 

  401.            sql_ze="ze=a.jan+a.feb+a.mar,"

    402. 

  402.            sql_fy=" and (month(mnytime)>=1 and month(mnytime)<=3 ) "

    403. 

  403.            cxsj="½ØÖ¹Ò»¼¾¶È"

    404. 

  404.      case "jd2":

    405. 

  405.            sql_ze="ze=a.jan+a.feb+a.mar+a.apr+a.may+a.jun,"

    406. 

  406.            sql_fy=" and (month(mnytime)>=1 and month(mnytime)<=6 ) "

    407. 

  407.            cxsj="½ØÖ¹¶þ¼¾¶È"

    408. 

  408.      case "jd3":

    409. 

  409.            sql_ze="ze=a.jan+a.feb+a.mar+a.apr+a.may+a.jun+a.jul+a.aug+a.sep,"

    410. 

  410.            sql_fy=" and (month(mnytime)>=1 and month(mnytime)<=9 ) "

    411. 

  411.            cxsj="½ØÖ¹Èý¼¾¶È"

    412. 

  412.      case "jd4":

    413. 

  413.            sql_ze="ze=a.jan+a.feb+a.mar+a.apr+a.may+a.jun+a.jul+a.aug+a.sep+a.oct+a.nov+a.dece,"

    414. 

  414.            sql_fy=" and (month(mnytime)>=1 and month(mnytime)<=12 ) "

    415. 

  415.            cxsj="½ØÖ¹Ëļ¾¶È"

    416. 

  416.      case "È«Äê":

    417. 

  417.            sql_ze="ze=a.niandu,"

    418. 

  418.            sql_fy=""

    419. 

  419.            cxsj=cstr(syear)+"È«Äê"      

    420. 

  420.      

    421. 

  421.    end select 

    422. 

  422.    

    423. 

  423.   

    424. 

  424.   %>

    425. 

  425.       

    426. 

  426.    <tr>

    427. 

  427.     <td align="right" >&nbsp;</td></tr>

    428. 

  428.    <tr>

    429. 

  429.     <td align="center" ><font class="px12" color="black">ÄúÄ¿Ç°½øÈëµÄÊÇ<font color=red><font color=blue><%=bm%></font><%=cxsj%></font>¸÷¿ÆÄ¿Ô¤ËãÍê³ÉÇé¿öÒ³Ãæ</td></tr>

    430. 

  430.     <tr>

    431. 

  431.     <td align="right" >&nbsp;</td></tr>

    432. 

  432.      <tr>

    433. 

  433.     <td align="right" >

    434. 

  434.     

    435. 

  435.     <table>

    436. 

  436.     

    437. 

  437.       <tr><td>

    438. 

  438.       

    439. 

  439. <% if VerifyOk_gsld=true then %>

    440. 

  440.       <font class="px12" color="red">ÇëÑ¡Ôñ²¿ÃÅ</font>&nbsp;          

    441. 

  441.      

    442. 

  442.       <select name="selbm"  LANGUAGE=javascript onchange="return selbm_onchange()"> 

    443. 

  443.       <option selected value="<%=bm%>"><%=bm%></option>

    444. 

  444.       <option value="ËùÓв¿ÃÅ">ËùÓв¿ÃÅ</option>

    445. 

  445.       <% 

    446. 

  446.         'sql="select distinct depart=companyname from companylocale order by companyname"

    447. 

  447.         sql="select distinct depart=companyname from cwysglbm where ysxs='1' order by companyname"

    448. 

  448.         objrst.Source =sql

    449. 

  449.         objrst.Open 

    450. 

  450.         while not objrst.EOF 

    451. 

  451.        

    452. 

  452.        %>

    453. 

  453.         

    454. 

  454.         <option value="<%=trim(objrst("depart"))%>"><%=trim(objrst("depart"))%></option>

    455. 

  455.       <%objrst.MoveNext 

    456. 

  456.         wend 

    457. 

  457.         objrst.Close 

    458. 

  458.          %>  

    459. 

  459.         </select>

    460. 

  460. <% end if  %>        

    461. 

  461. 

    462. 

  462. <% if VerifyOk_gsfz=true then %>

    463. 

  463.       <font class="px12" color="red">ÇëÑ¡Ôñ²¿ÃÅ</font>&nbsp;          

    464. 

  464.      

    465. 

  465.       <select name="selbm"  LANGUAGE=javascript onchange="return selbm_onchange()"> 

    466. 

  466.       <option selected value="<%=bm%>"><%=bm%></option>

    467. 

  467.       <option value="ËùÓв¿ÃÅ">ËùÓв¿ÃÅ</option>

    468. 

  468.       <% 

    469. 

  469.         'sql="select distinct depart=companyname from companylocale order by companyname"

    470. 

  470.         'sql="select distinct depart=companyname from cwysglbm where ysxs='1' order by companyname"

    471. 

  471.         sql="select distinct depart=companyname from cwysglbm where ysxs='1' and ysfgld='"& emid &"' order by companyname"

    472. 

  472.         objrst.Source =sql

    473. 

  473.         objrst.Open 

    474. 

  474.         while not objrst.EOF 

    475. 

  475.        

    476. 

  476.        %>

    477. 

  477.         

    478. 

  478.         <option value="<%=trim(objrst("depart"))%>"><%=trim(objrst("depart"))%></option>

    479. 

  479.       <%objrst.MoveNext 

    480. 

  480.         wend 

    481. 

  481.         objrst.Close 

    482. 

  482.          %>  

    483. 

  483.         </select>

    484. 

  484. <% end if  %> 

    485. 

  485.       

    486. 

  486.       &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

    487. 

  487.       &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

    488. 

  488.       &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

    489. 

  489.       &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

    490. 

  490.       

    491. 

  491.       &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;

    492. 

  492.       

    493. 

  493.       

    494. 

  494.       

    495. 

  495.       <font class="px12" color="red"> ÇëÑ¡Ôñ²ÆÎñÔ¤ËãÄê·Ý</font>&nbsp;

    496. 

  496.       <select name="year1" style="HEIGHT: 22px; WIDTH: 57px"  LANGUAGE=javascript onchange="return year1_onchange()"> 

    497. 

  497.         <option selected value="<%=syear%>"><%=syear%></option>

    498. 

  498.         <option value="<%=year(date)-1%>"><%=year(date)-1%></option>

    499. 

  499.         <option value="<%=year(date)%>"><%=year(date)%></option>

    500. 

  500.         <option value="<%=year(date)+1%>"><%=year(date)+1%></option>

    501. 

  501.         </select>

    502. 

  502.       <font color="#ff0000"></font>

    503. 

  503.     

    504. 

  504.       </td>

    505. 

  505.           

    506. 

  506.           </tr>    

    507. 

  507.     </table>

    508. 

  508.     </td></tr>

    509. 

  509.    </tbody></table>

    510. 

  510.    

    511. 

  511.    

    512. 

  512.    <%

    513. 

  513.    

    514. 

  514.   

    515. 

  515.    

    516. 

  516.    

    517. 

  517.    

    518. 

  518.    

    519. 

  519.    

    520. 

  520.    sql="select ys_year,fkmshuom,ze,je=sum(je),bl=sum(je)/ze from " 

    521. 

  521.    sql=sql+"( " 

    522. 

  522.    sql=sql+"select a.*,je=isnull(b.price,0) from  " 

    523. 

  523.    sql=sql+"( " 

    524. 

  524.    sql=sql+"select a.depar,a.ys_year,a.fkmcode,"

    525. 

  525.    'sql=sql+"a.niandu,"

    526. 

  526.    sql=sql+sql_ze

    527. 

  527.    sql=sql+"b.fkmshuom from cwys_ed as a,cwys_km as b  " 

    528. 

  528.    sql=sql+"where a.depar='"& bm &"' and a.ys_year='"& syear &"' and a.fkmcode=b.fkmcode and a.ys_year=b.nian and a.depar=b.depar" 

    529. 

  529.    sql=sql+") as a " 

    530. 

  530.    sql=sql+"left join cwys_infoin b on a.depar=b.mnydepm and a.fkmcode=b.mnykmcode and a.ys_year=b.mnyyear and ifhandin='ÊÇ' and cz<>'ɾ³ý'  "

    531. 

  531.    sql=sql+sql_fy 

    532. 

  532.    sql=sql+") as c " 

    533. 

  533.    sql=sql+"group by ys_year,fkmshuom,fkmshuom,ze " 

    534. 

  534. 

    535. 

  535.    'Response.Write sql

    536. 

  536.    sql_sort=" order by fkmshuom "

    537. 

  537.    sql_lb="select * from ( "+sql+" ) as taball "+sql_sort   

    538. 

  538.    

    539. 

  539.    objrst.Source = sql_lb

    540. 

  540.    'Response.Write sql

    541. 

  541.    objRst.Open 

    542. 

  542.    if objrst.EOF and objrst.BOF   then %>    

    543. 

  543.      <P> 

    544. 

  544.      <P align=center><font class="px12" color="black"><FONT color=crimson><STRONG><%=syear%>ÄêÎÞ¿ÆÄ¿Ô¤ËãÊý¾Ý

    545. 

  545.    <%else%>

    546. 

  546.    

    547. 

  547. <table align="center"  cellSpacing="0" cellPadding="0" width="777" border="0">

    548. 

  548.   <tbody>

    549. 

  549.   <tr>

    550. 

  550.     <td colSpan="2" height="3"></td></tr>

    551. 

  551.   <tr>

    552. 

  552.     <td vAlign="top" width="73%">

    553. 

  553.       <table style="BORDER-RIGHT: #4983a0 1px solid; BORDER-TOP: #4983a0 1px solid; BORDER-LEFT: #4983a0 1px solid; BORDER-BOTTOM: #4983a0 1px solid" height="100%" cellSpacing="0" cellPadding="0" width="100%" border="0">

    554. 

  554.         <tbody>

    555. 

  555.         <tr>

    556. 

  556.           <td style="PADDING-LEFT: 10px; PADDING-TOP: 2px" bgColor="#4983a0" height="20"><font style="COLOR: #ffffff; FONT-FAMILY: Webdings">4</font><font color="#ffffff"><b></b></font> <font color=white><a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=1"><font class="px12" color=white>1ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=2"><font class="px12" color=white>2ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=3"><font class="px12" color=white>3ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=4"><font class="px12" color=white>4ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=5"><font class="px12" color=white>5ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=6"><font class="px12" color=white>6ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=7"><font class="px12" color=white>7ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=8"><font class="px12" color=white>8ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=9"><font class="px12" color=white>9ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=10"><font class="px12" color=white>10ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=11"><font class="px12" color=white>11ÔÂ</a> <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=12"><font class="px12" color=white>12ÔÂ   </a>

    557. 

  557.           <a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=jd1"><font class="px12" color=white>   µÚÒ»¼¾È   </a><a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=jd2"><font class="px12" color=white>µÚ¶þ¼¾È   </a><a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=jd3"><font class="px12" color=white>µÚÈý¼¾È   </a><a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>&month=jd4"><font class="px12" color=white>µÚËļ¾È   </a></font><a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<%=bm%>"><font class="px12" color=white>È«Äê   </a></font></td></tr>

    558. 

  558.         <tr>

    559. 

  559.           <td vAlign="top">

    560. 

  560.             <table cellSpacing="1" cellPadding="0" width="100%">

    561. 

  561.               <tbody>

    562. 

  562.                <tr bgColor="#7dadc4" height="20">

    563. 

  563.                 <td align="middle"  ><font class="px12" color="black">ÕÊĿʱ¼ä</td>                                

    564. 

  564.                 <td align="middle"  ><font class="px12" color="black">·ÑÓÿÆÄ¿</td>                                

    565. 

  565.                 <td align="middle"  ><font class="px12" color="black">Ö¸±ê</td>

    566. 

  566.                 <td align="middle"  ><font class="px12" color="black">Íê³ÉÇé¿ö</td>

    567. 

  567.                 <td align="middle"  ><font class="px12" color="black">Ê£ÓàÇé¿ö</td>

    568. 

  568.                 <td align="middle"  ><font class="px12" color="black">Íê³ÉÂÊ</td>                

    569. 

  569.                 </tr>

    570. 

  570.                 <%

    571. 

  571.                 

    572. 

  572.                 while not objrst.EOF 

    573. 

  573.                  cbys="#ecf7fd"

    574. 

  574.                  if objrst("bl")>1 and not isnumeric(lb)  then cbys="#ef867a"

    575. 

  575.                  

    576. 

  576.                 %> 

    577. 

  577.                 <tr bgColor="<%=cbys%>" height="20">                

    578. 

  578.                 <td align="middle" ><font class="px12" color="black"><%=cxsj%></td>

    579. 

  579.                 <td align="middle" ><font class="px12" color="black"><a href="ccs_gscxy_bmldcx_index.asp?syear=<%=syear%>&bm=<%=bm%>&km=<%=trim(objrst("fkmshuom"))%>&smonth=<%=lb%>"><%=objrst("fkmshuom")%></A></td>

    580. 

  580.                 <td align="middle" ><font class="px12" color="black"><%=objrst("ze")%></td>

    581. 

  581.                 <td align="middle" ><font class="px12" color="black"><%=objrst("je")%></td>

    582. 

  582.                 <td align="middle" ><font class="px12" color="black"><%=objrst("ze")-objrst("je")%></td>

    583. 

  583.                 <td align="middle" ><font class="px12" color="black"><%=formatpercent(objrst("bl"),2,-1)%></td>                                                                                                                                

    584. 

  584.                 

    585. 

  585.                 </tr>

    586. 

  586.                 <%

    587. 

  587.                 objrst.MoveNext 

    588. 

  588.                 wend%> 

    589. 

  589.                 <%objrst.Close %>

    590. 

  590.              

    591. 

  591.      <%

    592. 

  592.    sql_hj="select ze=sum(ze),je=isnull(sum(je),0),bl=isnull(sum(je)/sum(ze),0) from ( "  

    593. 

  593.    sql_hj=sql_hj+sql

    594. 

  594.    sql_hj=sql_hj+" ) as sy "

    595. 

  595.    

    596. 

  596.    objrst.Source =sql_hj

    597. 

  597.    objrst.Open    

    598. 

  598.      %>        

    599. 

  599.                

    600. 

  600.                 <tr bgColor="#ecf7fd" height="20">

    601. 

  601.                 <td align="middle" ><font class="px12" color="blue"><%=cxsj%>ºÏ¼Æ</td>

    602. 

  602.                 <td align="middle" ><font class="px12" color="blue"><a href="ccs_gscxy_bmldcx_main.asp?syear=<%=syear%>&bm=<% =bm%>">ËùÓпÆÄ¿</A></td>

    603. 

  603.                 <td align="middle" ><font class="px12" color="blue"><%=objrst("ze")%></td>

    604. 

  604.                 <td align="middle" ><font class="px12" color="blue"><%=objrst("je")%></td>

    605. 

  605.                 <td align="middle" ><font class="px12" color="black"><%=objrst("ze")-objrst("je")%></td>

    606. 

  606.                 <td align="middle" ><font class="px12" color="blue"><%=formatpercent(objrst("bl"),2,-1)%></td>                                                                                                                                

    607. 

  607.                 

    608. 

  608.                 </tr>     

    609. 

  609.            <%objrst.Close %>     

    610. 

  610.                 

    611. 

  611.              

    612. 

  612.              </tbody></table></td></tr></tbody></table>

    613. 

  613.        

    614. 

  614.              

    615. 

  615.             

    616. 

  616. <%end if%>    

    617. 

  617.   

    618. 

  618.  

    619. 

  619.    <br>

    620. 

  620.     

    621. 

  621.       <table border="0" cellspacing="0" cellpadding="0" align="center">

    622. 

  622.         <tr>

    623. 

  623.           <td><font class="px12">Copyright 2006, ÖйúÄÏ·½º½¿ÕÉîÛÚ¹«Ë¾ÐÅÏ¢¹¤³Ì²¿</font></td>

    624. 

  624.         </tr>

    625. 

  625.       </table>

    626. 

  626.       <p>¡¡</p>

    627. 

  627.     </td>

    628. 

  628.   </tr>

    629. 

  629. </table>

    630. 

  630. </body>

    631. 

  631. </html>
    632.