home *** CD-ROM | disk | FTP | other *** search
/ 221.214.14.186 / 221.214.14.186.tar / 221.214.14.186 / wh / qim / Ft_inc_indexsoft.asp < prev    next >
Text File  |  2006-06-01  |  7KB  |  153 lines
  1. <%
  2. '==================================
  3. '=╬─ ╝■ ├√ú║Ft_inc_indexsoft.asp
  4. '=╩╩╙├░µ▒╛ú║FeitecCMS AC V1.3 Free
  5. '=╣ª    ─▄ú║╫╩╘┤╧┬╘╪í¬í¬╩╫╥│╖╓└α╡≈╙├
  6. '=╫≈    ╒▀ú║╙Ω│╟[From to FeitecStudio]
  7. '=╚╒    ╞┌ú║2006-3-2 21:14
  8. '=╣ª─▄╠φ╝╙ú║2006-2-25ú¼╖╓└α╬¬╡Ñ╩²╩▒╫╘╢»╡≈╙├╚╚├┼╧┬╘╪[Design By └Σ╖τ]
  9. '=░µ    ╚¿ú║http://www.feitec.com/
  10. '=╝╝╩⌡╠╓┬█ú║6602510íó14040543ú¿╨┬╩╓╚║ú⌐
  11. '==================================
  12. %>
  13. <!--#include file="Ft_config.asp"-->
  14. <!--#include file="Ft_conn.asp"-->
  15. <%
  16. webstyle=split(checksql("═°╒╛╜τ├µ╖τ╕±",web_style,1,20),"@@@")
  17. if request.Cookies(webname)("Skin") = empty then
  18.     Skin = checksql("╖τ╕±ID",webstyle(1),0,2)
  19. else
  20.     Skin = checksql("╖τ╕±ID",request.Cookies(webname)("Skin"),0,2)
  21. end if
  22. sql="select mb_main from Ft_mb_style where mb_id="& Skin
  23. set rs=Server.CreateObject("adodb.recordset")
  24. rs.open sql,conn,1,1
  25. mb_main=replace(replace(rs(0),"<iframe>","<iframe>"),"</iframe>","</iframe>")
  26. rs.close
  27. signimgpath=split(mb_main,"|||@@@|||")(6) '╨í═╝▒Ω╡╪╓╖
  28. if request.querystring("tlen")="" then
  29.     titlelen=20
  30. else
  31.     titlelen=checksql("╚φ╝■▒Ω╠Γ│ñ╢╚",request.querystring("tlen"),0,2)
  32. end if
  33. '╚í│÷╖╓└α
  34. sql="select cat_id,cat_name from Ft_soft_cat"
  35. set rs = server.createobject("adodb.recordset")
  36. rs.open sql,conn,1,1
  37. if not rs.eof then
  38. rs.movefirst
  39. totalcat=rs.recordcount
  40. if totalcat mod 2<>0 then
  41.     Redim x(cint(totalcat+1)),y(cint(totalcat+1))
  42.     x(totalcat+1)=0
  43.     y(totalcat+1)="╚╚├┼╧┬╘╪"
  44.     k=int(totalcat/2)+1
  45. else
  46.     Redim x(cint(totalcat)),y(cint(totalcat))
  47.     k=int(totalcat/2)
  48. end if
  49.     dim i
  50.     for i=1 to totalcat
  51.         x(i)=rs(0)
  52.         y(i)=rs(1)
  53.         rs.movenext
  54.     next
  55. else
  56. %>
  57. document.write('<table class="tableborder" cellspacing="1" cellpadding="4" align="center" style="width:100%"><tr class="tablebody"><td align="center" height="150" class="disable_font">╚φ╝■╧╡═│╘▌╬▐╖╓└α</td></tr></table>');
  58. <%
  59. end if
  60. rs.close
  61. for j=1 to k '╧╘╩╛╢α╔┘╨╨
  62. %>
  63. document.write('<table class="tableborder" cellspacing="0" cellpadding="0" align="center" style="width:100%">');
  64. document.write('<tr class="tablebody">');
  65.     <%for i=1+(j-1)*2 to j*2%>
  66. document.write('<td valign="top" width="50%">');
  67.         <%if x(i)<>"" then%>
  68. document.write('<table cellspacing="1" cellpadding="2" align="center" <%if i mod 2<>0 then%> style="width:100%;border:1px solid #cccccc;" <%else%> style="width:100%;border-right:1px solid #cccccc;border-top:1px solid #cccccc;border-bottom:1px solid #cccccc;border-left:1px solid #ffffff;"<%end if%>>');
  69. document.write('<tr class="tablebody">');
  70. document.write('<th style="text-align:left"> ::: <a href="download.asp<%if x(i)<>0 then%>?cat_id=<%=x(i)%><%end if%>"><%=y(i)%></a> :::</th></tr>');
  71.             <%
  72.             if x(i)=0 then  '╚╚├┼╚φ╝■
  73.             sql="select top "&indexsoft&" soft_date,soft_title,soft_id,soft_dcount,soft_good,istop,user_view from Ft_soft order by istop=1,soft_dcount desc,soft_id desc"
  74.             else
  75.             sql="select top "&indexsoft&" soft_date,soft_title,soft_id,soft_dcount,soft_good,istop,user_view from Ft_soft where cat_id="&x(i)&" order by istop=1,soft_id desc"
  76.             end if
  77.             set rs = server.createobject("adodb.recordset")
  78.             rs.open sql,conn,1,1
  79.             if not rs.eof then
  80.             do while not rs.eof
  81.             'replaceText(str)╙├╙┌ALTú¼╚Ñ╡⌠HTML┤·┬δ
  82.             'soft_title╙├╙┌╧╘╩╛▒Ω╠Γú¼soft_alt╙├╙┌╧╘╩╛ALT
  83.             softtitle=rs(1)
  84.             istop=rs(5)
  85.             softgood=rs(4)
  86.             softid=rs(2)
  87.             softcount=rs(3)
  88.             softdate=rs(0)
  89.             userview=rs(6)
  90.             if instr(softtitle,"<font color")<>0 then
  91.                 Arr_title=split(softtitle,">")
  92.                 soft_alt=replaceText(softtitle)
  93.                 if len(soft_alt)>cint(titlelen) then '╙├╙┌╧╘╩╛╚φ╝■▒Ω╠Γ
  94.                     newtitle=Arr_title(0)+">"+left(soft_alt,cint(titlelen))+"í¡</font>"
  95.                 else
  96.                     newtitle=softtitle
  97.                 end if
  98.             else
  99.                 if len(softtitle)>cint(titlelen) then
  100.                     soft_alt=softtitle
  101.                     newtitle=left(softtitle,cint(titlelen))+"í¡"
  102.                 else
  103.                     soft_alt=softtitle
  104.                     newtitle=softtitle
  105.                 end if
  106.             end if
  107.             %>
  108.             document.write('    <tr class="tablebody">');
  109.             document.write('        <td height="25"> <%if userview=2 then%><img src="<%=signimgpath%>/vipview.gif" border="0" alt="VIP╗ß╘▒╚φ╝■"><%elseif userview=1 then%><img src="<%=signimgpath%>/userview.gif" border="0" alt="╞╒═¿╗ß╘▒╚φ╝■"><%elseif istop=1 then%><img src="<%=signimgpath%>/topbiao.gif" border="0" alt="╩╫╥│╓├╢Ñ╚φ╝■"><%elseif istop=1 then%><img src="<%=signimgpath%>/topbiao.gif" border="0" alt="╩╫╥│╓├╢Ñ╚φ╝■"><%elseif softgood=0 then%><img src="<%=signimgpath%>/normalbiao.gif" alt="╞╒═¿╚φ╝■"><%elseif softgood=1 then%><img src="<%=signimgpath%>/tuijianbiao.gif" alt="═╞╝÷╚φ╝■"><%elseif softgood=2 then%><img src="<%=signimgpath%>/jinhuabiao.gif" alt="╛½╗¬╚φ╝■"><%else%><img src="<%=signimgpath%>/normalbiao.gif" alt="╞╒═¿╚φ╝■"><%end if%> ');
  110.             document.write('        <a href="showsoft.asp?id=<%=softid%>"  target="_blank" title="╚φ╝■├√│╞ú║<%=soft_alt%> ╖ó▓╝╩▒╝Σú║<%=softdate%> ╗╢╙¡│╠╢╚ú║╥╤╛¡▒╗╧┬╘╪<%=softcount%>┤╬"><%=newtitle%></a><%if DateDiff("d",softdate,now())<1 then%> <img src="<%=signimgpath%>/new.gif" alt="╥╗╠∞╓«─┌╡─╨┬╠φ╚φ╝■" border="0"><%end if %></td>');
  111.             document.write('    </tr>');
  112.             document.write('    <tr class="tablebody">');
  113.             document.write('        <td height="1" background="<%=signimgpath%>/dotlineh.gif"></td>');
  114.             document.write('    </tr>');
  115.             <%
  116.             rs.movenext
  117.             loop
  118.             else%>
  119. document.write('<tr class="tablebody"><td class="disable_font" height="25">íñ ┤╦╖╓└α╓╨╘▌╬▐─┌╚▌</td></tr>');
  120.             <%end if
  121.             rs.close%>
  122. document.write('</table>');
  123. document.write('<table cellspacing="0" cellpadding="0"    align="center" style="width:100%;border:0">');
  124. document.write('<tr class="tablebody">');
  125. document.write('<td height="8"></td>');
  126. document.write('</tr>');
  127. document.write('</table>');
  128.         <%else%>
  129. document.write('<table class="right_table" cellspacing="0" cellpadding="1"    align="center" <%if i mod 2<>0 then %>style="width:100%;" <%else%>style="width:100%;border-left:1px solid #ffffff;"<%end if%>>');
  130. document.write('<tr class="tablebody">');
  131. document.write('<td class="left_title" colspan="2"><%=titlepic%><span class="fontshadow" >╘▌╬▐╖╓└α</span></td>');
  132. document.write('</tr>');
  133. document.write('<tr class="tablebody"><td class="disable_font">íñ ╟δ╧╚╠φ╝╙╖╓└α</td></tr>');
  134. document.write('</table>');
  135.         <%end if%>
  136. document.write('</td>');
  137.     <%next%>
  138. document.write('</tr>');
  139. document.write('</table>');
  140. <%
  141. next
  142. set rs=nothing
  143. CloseDatabase
  144. function replaceText(str)
  145.     dim regEx
  146.     set regEx=New RegExp
  147.     regEx.Pattern="<[^>]*>"
  148.     regEx.Ignorecase=True
  149.     regEx.Global=True
  150.     replaceText=regEx.Replace(str,"")
  151. end function
  152. %>
  153.