<% MDBpath="admin/" set rs_type=server.CreateObject("ADODB.RecordSet") set rs=server.CreateObject("ADODB.RecordSet") if request("cd")="" and request("k")="" then MaxPerPage=30 '###每页显示条数 sePAGE="no" else MaxPerPage=10 '###每页显示条数 end if if request("pl")<>"" then pl=request("pl") else pl="date" end if skN=request("k") skP="更新日期" if request("pl")="hits" then skP="下载次数" elseif request("pl")="hot" then skP="软件评价" end if if request("cd")<>"" then skN=request("cd") skCD=" and cd='"&request("cd")&"'" end if %> 平刷王时时彩计划软件|搜索结果 - 洪越源代码(www.txrku.com.cn)
源代码首页源码分类源码排行源码更新洪越资讯 源码发布  分站待续
洪越源代码
洪越源代码ASP源代码 CGI源代码 PHP源代码 JSP源代码 其它源代码 常用工具 服务器类 书籍教程 网页模板 网站素材 字体下载
 您的位置:首页 >> 查找结果 >> 关键字:<%=skN%> [尽量不要带版本号] ">更多关于"<%=skN%>"的搜索 
<% i=0 sql="select top 10 cxn,cxv,id,tid from down where date>Now()-7 order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"" else do while not rs.eof response.write"" i=i+1 if i>=10 then exit do rs.movenext loop end if rs.close %>
    本周下载排行
·还没有软件
·洪越源代码"&left(rs("cxn")&""&rs("cxv"),17)&"
<% i=0 sql="select top 10 cxn,cxv,id,tid from down order by hits desc" rs.open sql,conn,1,1 if rs.eof then response.write"" else do while not rs.eof response.write"" i=i+1 if i>=10 then exit do rs.movenext loop end if rs.close %>
    总下载排行榜
·还没有软件
·"&left(rs("cxn")&""&rs("cxv"),17)&"
<%if request("k")="" and request("pl")="" and request("cd")="" then%> <%else set rs_list=server.CreateObject("ADODB.RecordSet") set rs_type=server.CreateObject("ADODB.RecordSet") set rs=server.CreateObject("ADODB.RecordSet") KN=split(request("k")," ") for i = 0 to ubound(KN) KNN=KNN&" or cxn like '%"&KN(i)&"%' or cxv like '%"&KN(i)&"%' " next %><% sql="select * from down where (cxn like '%"&request("k")&"%'"&KNN&")"&skCD&" order by "&pl&" desc" rs.open sql,conn,1,1 if rs.eof then %> <%else if sePAGE<>"no" then '###排行方式时只显示指定数目 rs.pagesize=MaxPerPage '得到每页数 mpage=rs.pagecount '得到总页数 allshu=rs.recordcount if request("page")<>"" then if cint(request("page"))<1 or cint(request("page"))>mpage then currentPage=1 else currentPage=cint(request("page")) end if else currentPage=1 end if rs.move (currentPage-1)*MaxPerPage end if '###排行方式时只显示指定数目 do while not rs.eof%> <%'''软件 softname=rs("cxn")&""&rs("cxv") if request("k")<>"" then for i = 0 to ubound(KN) softname=replace(softname,""&KN(i)&"",""&KN(i)&"") next end if%> <% di=di+1 if di>=MaxPerPage then exit do rs.movenext loop end if rs.close set rs=nothing conn.close set conn=nothing end if %>
软件名称 &pl=date&k=<%=request("k")%>" title="按更新时间重新排列软件">更新时间 &pl=hot&k=<%=request("k")%>" title="按软件等级重新排列软件">源码等级 &pl=hits&k=<%=request("k")%>" title="按下载次数值重新排列软件">下载次数 文件大小
关键词不能为空!
·.htm"><%=softname%> <%if rs("show")="1" then response.write""%> <%=year(rs("date"))&"-"&month(rs("date"))&"-"&day(rs("date"))%> <%for i=1 to rs("hot")%><%next%> <%=rs("hits")%> <%=rs("size")%>
   <%if rs("body")<>"" then%><% tempstr=replace(rs("body"),"
","") tempstr=replace(tempstr,"

","") tempstr=replace(tempstr,"","") tempstr=replace(tempstr,"<","") tempstr=replace(tempstr," ","") tempstr=replace(tempstr," ","") tempstr=replace(tempstr," ","") body=left(tempstr,100) if request("k")<>"" and request("kt")<>"软件名称" and request("type")<>"cd" then for i = 0 to ubound(KN) body=replace(body,""&KN(i)&"",""&KN(i)&"") next end if%><%=body%>...<%else%>很不错,自己看看吧!<%end if%>

源码类别:<% set rs_type=server.CreateObject("ADODB.RecordSet") rs_type.open "select * from downtype where id="&rs("tid"),conn,1,1 if not rs_type.EOF then response.write ""&rs_type("Tname")&"" else response.write "类别错误" end if rs_type.close %><%if rs("system")<>"" then%>  运行环境:<%=rs("system")%><%end if%><%if rs("sq")<>"" then%>  授权方式:<%=rs("sq")%>版<%end if%>
<%if allshu>0 and skPAGE<>"no" then%>
&pl=<%=request("pl")%>&k=<%=request("k")%>">
 共找到<%=allshu%>条 当前第<%=currentPage%>/<%=mpage%>页 每页<%=MaxPerPage%> <% pageno=currentPage %><%if cint(pageno)>1 then%>&pl=<%=request("pl")%>&k=<%=request("k")%>" title="最前页"><%end if%>9 <%if cint(pageno)>1 then%>&pl=<%=request("pl")%>&k=<%=request("k")%>&page=<%=pageno-1%>" title="上一页"><%end if%>7<% pp=cint(pageno)-5 if pp<1 then pp=1 end if for pno=pp to mpage if len(pno)=1 then end if p=p+1 if pno*1=cint(pageno)*1 then %> [<%=pno%>]<%else%> &pl=<%=request("pl")%>&k=<%=request("k")%>&page=<%=pno%>">[<%=pno%>]<%end if%><% if p>=7 then exit for next%> <%if cint(pageno)< mpage then%>&pl=<%=request("pl")%>&k=<%=request("k")%>&page=<%=pageno+1%>" title="下一页"><%end if%>8 <%if cint(pageno)< mpage then%>&pl=<%=request("pl")%>&k=<%=request("k")%>&page=<%=mpage%>" title="最后页"><%end if%>:
转到第页  
<%end if%>
中文版权所有:洪越源代码,网站维护:moon,联系QQ:53329827
三分彩主要玩法计划 北京赛车pk10群 hao号外彩票 天津快乐十分qq群 百家乐防盗门
重庆时时彩计划_人工版 青海省快三开奖走势图 新疆18选7连线走势图 山东群英会走势图最新计划 福建体彩网11选5计划?云南体育彩票11选5计划?安徽11选5开奖结果计划?11选5胆拖