jiuoo.asp

秘密网源代码 传闻拉了 100W风投

<!-- #include file="Setup.asp" -->
<!--#include file="WoLib/Function.asp"-->
<!--#include file="WoLib/Cls_Class.asp"-->
<%
	Dim Default
	set Default = New Cls_Default
	Src_Child	= Request("Src_Child")	'二级类别
	Src_Tags	= Request("Tags")		'标签
	S_Havving 	= Request("S_Havving")	'搜索条件
	page 		= Request("page")		'分页
	order_by	= Request("order_by")	'排序
	tags_name   = Request("tags_name")	'标签
	tags_ID     = Request("tags_ID")	'标签ID
	if Src_Child = "" or Src_Child = "-1" then
		Src_Child = -1
	end if
	if Order_By = "" or isNull(Order_By) or isNumeric(Order_By)=false then		
		Order_By = "1"
	end if	
	if page = "" then
		page = 1
	end if	
	if isNumeric(Src_Child)=false or isNumeric(page)=false then
		Response.Redirect("jiuoo.asp")	'防注入
	end if
	if tags_ID<>"" and isnumeric(tags_ID)=false  then
	Response.Redirect("jiuoo.asp")	'防注入
	end if
%>
<%
HtmlTop
%>
<script type="text/javascript" src="js/ajax.js"></script>
<script type="text/javascript" src="js/common.js"></script>
<table width="900"  border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="640" valign="top"><table width="99%"  border="0" cellspacing="1" cellpadding="0"  id=CommonListArea>
      <tr id=CommonListTitle>
        <td>&nbsp;&nbsp;在一眨眼的功夫里，窝友发现了......</td>
      </tr>
      <tr id=CommonListCell>
        <td>
          <table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
            <tr class="postbg1">
              <td height="35">
			 <% Call Default.Get_OrderBy()%>
			  </td>
            </tr>
          </table>
		    <%Call  Default.Get_MainContent("jiuoo.asp")%>
          </td>
      </tr>
    </table></td>
    <td valign="top"><table width="99%"  border="0" cellspacing="1" cellpadding="0"  id=CommonListArea>
      <tr id=CommonListTitle1>
        <td>&nbsp;&nbsp;Dig搜索</td>
      </tr>
      <tr id=CommonListCell>
        <td>
		<%Call Default.Get_Search()%>
	  	<div align="center"><%=Wodig.Get_SrcRecordCount()%>
				</td>
	  </tr>
    </table>
	<table width="80%" height="8"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td></td>
        </tr>
      </table>
      <table width="99%"  border="0" cellspacing="1" cellpadding="0"  id=CommonListArea>
        <tr id=CommonListTitle2>
          <td>&nbsp;&nbsp;系统Tags...</td>
        </tr>
        <tr id=CommonListCell>
          <td><%Call Default.Get_SysTags%></td>
        </tr>
      </table>
	  <table width="80%" height="8"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td></td>
        </tr>
      </table>
	  <table width="99%"  border="0" cellspacing="1" cellpadding="0"  id=CommonListArea>
        <tr id=CommonListTitle2>
          <td>&nbsp;&nbsp;自定义Tags...</td>
        </tr>
        <tr id=CommonListCell>
          <td><%Call Default.Get_UserTags%>
		  <div align="right"><a href="tags.asp">更多Tags>></a>&nbsp;&nbsp;</div></td>
        </tr>
      </table>
	  <table width="80%" height="8"  border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td></td>
        </tr>
      </table>
      <table width="98%"  border="0" align="center" cellpadding="0" cellspacing="1"  id=CommonListArea>
        <tr id=CommonListTitle2>
          <td>&nbsp;&nbsp;窝友点评...</td>
        </tr>
        <tr id=CommonListCell>
          <td>
		  <%Call Default.Get_Revert%>
          </td>
        </tr>
      </table>	  
	  </td>
  </tr>
</table>
<%
HtmlBottom
%>