Category

Development Platform
Home > SourceCode/Document > Internet-Socket-Network > WEB(ASP,PHP,...) > View Code
Search.asp
Package: qiyeguanli.rar　[view]
Upload User: ahxunteng
Upload Date: 2022-05-16
Package Size: 1606k
Code Size: 3k
Category:

WEB(ASP,PHP,...)

Development Platform:

VBScript

Search.asp：Code Content
  1. <%@ LANGUAGE=VBScript CodePage=936%>
  2. <%option explicit%>
  3. <%Response.Buffer=True%>
  4. <!--#include file="Include/System.asp"-->
  5. <!--#include file="../Inc/ubbcode.asp"-->
  6. <!--#include file="Include/SysProduct.asp"-->
  7. <!--#include file="Include/StrLeft.asp"-->
  9. <%
  10. ShowSmallClassType=ShowSmallClassType_Search
  11. MaxPerPage=MaxPerPage_Search
  12. strFileName="Search.asp?Field=" & strField & "&Keyword=" & keyword & "&BigClassName=" & BigClassName & "&SmallClassName=" & SmallClassName 
  13. %>
  14. <!--#include file="Include/Head.asp" -->
  15. <TABLE cellPadding=0 cellSpacing=0 class='Middle_Title'>
  16. <TR> 
  17. <TD vAlign=top class='M_Left_Td'> 
  18. <table cellpadding="0" cellspacing="0" align="center" class='M_Left_Title'>
  19. <tr>
  20. <td valign="top">
  21. <% Call Left_Product() %>
  22. </td>
  23. </tr>
  24. </table> 
  25. </TD>
  26. <%if strSkins <= 200 and strSkins >= 1 then%>
  27. <TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
  28. <%
  29. elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
  30. %>
  31. <%end if%>
  32. <TD vAlign=top> 
  33. <TABLE cellPadding=0 cellSpacing=0 align='center' class='M_Center_Title'>
  34. <% Call Style_Adcolumn() '广告栏 %>
  36. <!-- 产品搜索 -->
  37. <TR>
  38. <TD>
  39. <TABLE cellSpacing=0 cellPadding=0  align='center' class='MC_Pt_Title'>
  40. <TR>
  41. <TD class='MC_Pt_TD1'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
  42. <TD class='MC_Pt_TD2'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
  43. <TD class='MC_Pt_TD3'><SPAN class=Glow>
  44. <% call ShowSearchTerm() %>
  45. &nbsp;</SPAN></TD>
  46. <TD class='MC_Pt_TD4'><div align="right">
  47. <% call SearchResultTotal() %>
  48. &nbsp;</div></TD>
  49. <TD class='MC_Pt_TD5'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
  50. </TR>
  51. </TABLE>
  52. </TD>
  53. </TR>
  54. <TR> 
  55. <TD>
  56. <TABLE cellSpacing=0 cellPadding=0  align='center' class='MC_PrNr_Title'>
  57. <tr> 
  58. <td valign=top style="line-height: 150%">
  59. <% call ShowSearchResult() %>
  60. </td>
  61. </tr>
  62. </table>
  63. </TD>
  64. </TR>
  65. <!-- 产品搜索 END -->
  66. <TR> 
  67. <TD> 
  68. <TABLE cellSpacing=0 cellPadding=0  align='center' class='MC_bottom_title'>
  69. <tr> 
  70. <td>
  71. <%
  72. if totalput>0 then
  73. call showpage(strFileName,totalput,MaxPerPage,false,true,"个产品")
  74. end if
  75. %>
  76. </td>
  77. </tr>
  78. <tr><td class='MC_bottom_Td2'></td></tr>
  79. </table>
  80. </TD>
  81. </TR>
  82. <TR><TD height=10><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
  83. </TABLE>
  84. </TD>
  85. <%if strSkins <= 200 and strSkins >= 1 then%>
  86. </TR>
  87. </TABLE>
  88. <!--#include file="Include/Foot.asp" -->
  89. <%
  90. elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
  91. %>
  92. <TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
  94. <TD vAlign=top background="../Skin/201/line-mid-glay.gif" width="6"><img border="0" 
  95. src="../Skin/201/line-shadow-glay-mid.gif" width="6" height="146"></TD>
  96. <TD vAlign=top class='Mr_TitlePt'><% Call Right_Download() %></TD>
  97. </TR>
  98. </TABLE>
  99. <!--#include file="Include/Foot4.asp" -->
  100. <%end if%>