K9 通用版 博客版 主题版 地方门户版 企业版 |   企业(ASP) 分类 使用 分享 疑问 模板 建议 帮助 错误 其他
+新建主题 [Ajax]
填写帐号密码即可完成注册
+新建话题 最新回复排序 最新主题排序 精华帖子

列表页只调用推荐的文章, 分页可用

1Next >

iitding 发表于：10-09-04 15:25 [添加收藏] 楼主 [回复] #Top#
iitding 人气：582 积分：1 金币：18324
最佳新人 灌水狂人
列表页只调用推荐的文章, 分页可用

*****************************************************

  1. type=list 时用 
  2.  
  3.     2 list01= head头条 commend推荐 up置顶 是否（部分显示）
  4.     3 {king:article type="list" list01="commend"   
  5.  
  6. number="1"}

*****************************************************
在
public sub createlist(l1)
找到

  1. set rs=conn.execute("select "&sql&" from  
  2.  
  3. kingarticle where artshow=1 and listid="&datalist(0,j)&" or  
  4.  
  5. listids like '%,"&datalist(0,j)&",%' order by artup  
  6.  
  7. desc,artorder "&jsorder&",artid "&jsorder&";")

替换为

  1. '修改list-up,list-commend,list-head 
  2. dim list01 
  3. list01=king.getlabel(tmphtmlist,"list01") 
  4. if lcase(list01)="head" then list01="and arthead=1" 
  5. if lcase(list01)="commend" then list01="and artcommend=1" 
  6. if lcase(list01)="up" then list01="and artup=1" 
  7.  
  8.                 set rs=conn.execute("select "&sql&" from  
  9.  
  10. kingarticle where artshow=1 "&list01&" and  
  11.  
  12. listid="&datalist(0,j)&" or listids like '%,"&datalist 
  13.  
  14. (0,j)&",%' order by  artup desc,artorder "&jsorder&",  
  15.  
  16. artid "&jsorder&";")
Ta最近还发表过 [使用] CHM怎么没有内容 (17-04-23) [疑问] 谁有“Sp2包附带的新demo模板”分享下 (16-07-27) [疑问] 请教下三级循环怎么写? (16-07-27) [其他] Kingcms很给力，昨天上的网站，百度今天就ok了 (16-05-03) [其他] 看看女朋友咋样，群友鉴定！！！ (16-04-27)
随机阅读 [模板] 地方门户新模板会员中心及微信平台功能（试鲜版） (15-11-15) [疑问] 如何让最先添加文章的排在前面 (13-08-16) [疑问] 怎样将正常日期格式转换成 时间戳 呢 (12-04-26) [疑问] 为什么调不出新闻分页？？ (12-01-12) [疑问] 如何生成网站地图？ (11-11-08)
snoopyfansxr 发表于：11-01-10 21:41 沙发 [回复] #Top#
snoopyfansxr 人气：30 积分：199 金币：585
这个我收藏了 用得到

1Next >

发表回复

帐号 匿名发布 审核后可见 [加载完整在线编辑器]
内容
验证码
KingCMS 内容管理系统

关于我们 联系我们 广告报价 付款方式 站点导航

Copyright © 2004-2015 Focuznet All rights reserved.

粤ICP备08008106号