账号通
    

账号  

密码  

93867

查看

186

回复
主题:我也提供一个随机效果 [收藏主题] 本贴被认定为精华 转到:  
tonk 当前离线

68

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:1024 分
登录次数:55 次
注册时间:2008/1/19
最后登录:2009/3/18
tonk 发表于:2009/1/13 2:20:00   | 显示全部帖子 查看该作者主题 楼主 
科汛智能建站系统

看到有个朋友提供了三步随机的方法受到启发

 

只需要改两个文件

 

Include\Label\GetArticleList.asp

 

文件

找到


  .Write "                 <input name=""ArticleProperty"" onclick=""SetStatus(this);"" type=""radio""

id=""ArticleProperty"" value=""3"""
  If ArticleProperty = 3 Then .Write (" Checked")
    .Write ">头条"

 

 

在后面加上

 


  .Write "                 <input name=""ArticleProperty"" onclick=""SetStatus(this);"" type=""radio""

id=""ArticleProperty"" value=""4"""
  If ArticleProperty = 4 Then .Write (" Checked")
    .Write ">随机"

 

 

 

 

 

然后

KS_Cls\Kesion.Label.FunctionCls.asp

 

文件

找到


       Case "3":A_PStr = " And Strip=1"

 

 

在后面加上

 

 

以下内容只有回复后才可以浏览,请先登录!

 

 

就可以啦

是不是更简单一点

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
tonk 当前离线

68

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:1024 分
登录次数:55 次
注册时间:2008/1/19
最后登录:2009/3/18
tonk 发表于:2009/1/13 2:35:00   | 显示全部帖子 查看该作者主题 沙发 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.07813秒 powered by KesionCMS 9.0