Category

Development Platform
Home > SourceCode/Document > Internet-Socket-Network > WEB(ASP,PHP,...) > View Code
Sale.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

Sale.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/eshopcode.asp"-->
  6. <!--#include file="Include/SysCoSaJo.asp"-->
  7. <!--#include file="Include/StrLeft.asp"-->
  9. <!--#include file="Include/Head.asp" -->
  10. <TABLE cellPadding=0 cellSpacing=0 class='Middle_Title'>
  11. <TR>
  12. <%if strSkins <= 200 and strSkins >= 1 then%>
  13. <%
  14. elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
  15. %>
  16. <TD vAlign=top class='M_Left_Td'> 
  17. <table cellpadding="0" cellspacing="0" align="center" class='M_Left_Title'>
  18. <tr>
  19. <td valign="top">
  20. <% Call Left_Sale() %>
  21. </td>
  22. </tr>
  23. </table> 
  24. </TD>
  25. <%end if%>
  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. <%
  45. dim Action
  46. Action=trim(request("Action"))
  47. if Action="Sale" then
  48. Response.write "国内市场"
  49. elseif Action="Salea" then
  50. Response.write "国际市场"
  51. end if
  52. %>
  53. &nbsp;</SPAN></TD>
  54. <TD class='MC_Pt_TD4'><div align="right">
  55. &nbsp;</div></TD>
  56. <TD class='MC_Pt_TD5'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
  57. </TR>
  58. </TABLE>
  59. </TD>
  60. </TR>
  61. <TR> 
  62. <TD>
  63. <TABLE cellSpacing=0 cellPadding=0 align='center' class='MC_HSJNr_Title'>
  64. <tr> 
  65. <td valign=top style="line-height: 150%">
  66. <%if Action="Sale" then%>
  67. <%=CSJ_Sale%>
  68. <%elseif Action="Salea" then%>
  69. <%=CSJ_Salea%>
  70. <%end if%>
  71. </td>
  72. </tr>
  73. </table>
  74. </TD>
  75. </TR>
  76. <!-- 国内市场 END -->
  77. <TR> 
  78. <TD> 
  79. <TABLE cellSpacing=0 cellPadding=0 align='center' class='MC_bottom_title'>
  80. <tr> 
  81. <td>
  82. </td>
  83. </tr>
  84. <tr><td class='MC_bottom_Td2'></td></tr>
  85. </table>
  86. </TD>
  87. </TR>
  88. <TR> 
  89. <TD height=10><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
  90. </TR>
  91. </TABLE> 
  92. </TD>
  93. <%if strSkins <= 200 and strSkins >= 1 then%>
  94. <TD vAlign=top class='M_Left_Td'> 
  95. <table cellpadding="0" cellspacing="0" align="center" class='M_Left_Title'>
  96. <tr>
  97. <td valign="top">
  98. <% Call Left_Sale() %>
  99. </td>
  100. </tr>
  101. </table> 
  102. </TD>
  104. </TR>
  105. </TABLE>
  106. <!--#include file="Include/Foot.asp" -->
  107. <%
  108. elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
  109. %>
  110. <TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
  111. <TD vAlign=top background="../Skin/201/line-mid-glay.gif" width="6"><img border="0" 
  112. src="../Skin/201/line-shadow-glay-mid.gif" width="6" height="146"></TD>
  113. <TD vAlign=top class='Mr_TitlePt'><% Call Right_Download() %></TD>
  114. </TR>
  115. </TABLE>
  116. <!--#include file="Include/Foot4.asp" -->
  117. <%end if%>