<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% sSql="select P_ProDuctClassID,P_Forder,P_ProductName,M_Name,P_FileName,P_ProductAddTime from baikedata,Forder where p_forder=M_ID group by P_ProDuctClassID,P_Forder,P_ID,M_ID,P_ProductName,M_Name,P_FileName,P_ProductAddTime order by P_ID DESC" oRs.open sSql,oConn,1,1 if oRs.bof and oRs.eof then response.redirect("/ver3.0/news/") else page=request.querystring("Page") oRs.PageSize = 15 if Not IsEmpty(page) then if Not IsNumeric(page) then page=1 else page = cint(page) end if if page > oRs.PageCount then oRs.AbsolutePage = oRs.PageCount page=oRs.pagecount elseif page <= 0 then page=1 oRs.AbsolutePage = 1 else oRs.AbsolutePage = page end if else page=1 oRs.AbsolutePage=1 end if end if %> 精品婷婷色一区二区三区蜜桃,人妻人操,亚洲色鬼 
<nav id="ccccc"><sup id="ccccc"></sup></nav>




    • <sup id="ccccc"></sup>
    <tfoot id="ccccc"></tfoot>
    • 
亚洲第一页色,久久精品噜噜噜成人AV色欲,国产亚洲精品综合-黄色永久免费-成人AV
,人妻欧美亚洲,亚洲人妻中文字幕,狼友综合网,少妇50p,色婷婷影院 


    

    


    


    

    


    


    

    

    

    百科中心
    

    


    

    

    

    

    <%=ClassName%>百科中心
    

    

      
<%
For i = 1 to oRs.PageSize
if oRs.EOF then
Exit For
end if
Title=oRs("P_ProductName")
P_forder=oRs("P_Forder")
forder=oRs("M_Name")
if Len(Title)>35 then
NTitle=left(oRs("P_ProductName"),2)&"..."
else
NTitle=oRs("P_ProductName")
end if
d_time=split(oRs("P_ProductAddTime")," ")
dl_time=split(d_time(0),"-")
ds_time=""
for j=0 to 2
if len(dl_time(j))<2 then
ds_time=ds_time&"-0"&dl_time(j)
else
ds_time=ds_time&"-"&dl_time(j)
end if
next
ds_time=right(ds_time,10)
response.Write("
    • ·"&ds_time&"|"&NTitle&"")
if i=5 or i=10 then
response.Write("
    • ")
end if
oRs.movenext
Next
%>

    

    

    
<%if oRs.pagecount<>1 and oRs.pagecount<>0 then%>
<%if page>1 then%>
[首頁]
[上一頁]
<%if page
[下一頁]
[尾頁]
<%else%>
[下一頁] [尾頁]
<%end if%>
<%else%>
[首頁] [上一頁]
[下一頁]
[尾頁]
<%end if %>
<%else%>
[首頁] [上一頁] [下一頁] [尾頁]
<%end if%>
[頁次:<%=page%>/<%=oRs.PageCount%>]
[共<%=oRs.RecordCount%>篇 <%=oRs.PageSize%>篇/頁]
<%oRs.close()%>

    

    

    

    

    

    

    百科中心
    

    

    

      
<%call Baike_SubClass(C_ID)%>