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

1Next >

iitding	发表于：10-09-04 15:25 [取消收藏] [添加收藏] 楼主 [回复] #Top#
人气：582 积分：1 金币：18324	列表页只调用推荐的文章, 分页可用 *************************************************** type=list 时用 2 list01= head头条 commend推荐 up置顶是否（部分显示） 3 {king:article type="list" list01="commend" number="1"} ************************************************* 在 public sub createlist(l1) 找到 set rs=conn.execute("select "&sql&" from kingarticle where artshow=1 and listid="&datalist(0,j)&" or listids like '%,"&datalist(0,j)&",%' order by artup desc,artorder "&jsorder&",artid "&jsorder&";") 替换为 '修改list-up,list-commend,list-head dim list01 list01=king.getlabel(tmphtmlist,"list01") if lcase(list01)="head" then list01="and arthead=1" if lcase(list01)="commend" then list01="and artcommend=1" if lcase(list01)="up" then list01="and artup=1" set rs=conn.execute("select "&sql&" from kingarticle where artshow=1 "&list01&" and listid="&datalist(0,j)&" or listids like '%,"&datalist (0,j)&",%' order by artup desc,artorder "&jsorder&", artid "&jsorder&";") Ta最近还发表过** [使用] CHM怎么没有内容 (17-04-23) [疑问] 谁有“Sp2包附带的新demo模板”分享下 (16-07-27) [疑问] 请教下三级循环怎么写? (16-07-27) [其他] Kingcms很给力，昨天上的网站，百度今天就ok了 (16-05-03) [其他] 看看女朋友咋样，群友鉴定！！！ (16-04-27) 随机阅读 [分享] 25个时尚杰出的登录表单设计 (23-03-10) [使用] 品牌店铺后台修改参数数据加载中....... 没反应 (11-10-26) [使用] kingcms 修改标签,怎么改。。 (11-10-18) [分享] kingcms常用标签 (11-08-16) [疑问] 5.1列表页正文内容如何去掉多出来的<p> </p> (11-05-11)

iitding

发表于：10-09-04 15:25 [取消收藏] [添加收藏] 楼主 [回复] #Top#

人气：582 积分：1 金币：18324

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

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

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

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

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

替换为

'修改list-up,list-commend,list-head
dim list01
list01=king.getlabel(tmphtmlist,"list01")
if lcase(list01)="head" then list01="and arthead=1"
if lcase(list01)="commend" then list01="and artcommend=1"
if lcase(list01)="up" then list01="and artup=1"
set rs=conn.execute("select "&sql&" from
kingarticle where artshow=1 "&list01&" and
listid="&datalist(0,j)&" or listids like '%,"&datalist
(0,j)&",%' order by artup desc,artorder "&jsorder&",
artid "&jsorder&";")

Ta最近还发表过 [使用] CHM怎么没有内容 (17-04-23) [疑问] 谁有“Sp2包附带的新demo模板”分享下 (16-07-27) [疑问] 请教下三级循环怎么写? (16-07-27) [其他] Kingcms很给力，昨天上的网站，百度今天就ok了 (16-05-03) [其他] 看看女朋友咋样，群友鉴定！！！ (16-04-27)

随机阅读 [分享] 25个时尚杰出的登录表单设计 (23-03-10) [使用] 品牌店铺后台修改参数数据加载中....... 没反应 (11-10-26) [使用] kingcms 修改标签,怎么改。。 (11-10-18) [分享] kingcms常用标签 (11-08-16) [疑问] 5.1列表页正文内容如何去掉多出来的<p> </p> (11-05-11)

snoopyfansxr	发表于：11-01-10 21:41 沙发 [回复] #Top#
人气：30 积分：199 金币：585	这个我收藏了用得到

1Next >

发表回复

帐号	匿名发布审核后可见 [加载完整在线编辑器]
内容
验证码	计算题太难?换个简单点的.

我已认真阅读服务条款，并遵守具体协议内容

KingCMS 内容管理系统

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

广州唯众网络科技有限公司粤ICP备08008106号