教你自动给最近三天内的文章加new图标 [复制链接]

搞定了，谢谢“kanghaoran”。参见：http://ysx.jsit.edu.cn

哎哟  不错哦

第7步看不明白，能否讲详细一点？

看23楼的，就能明白了

我按23楼的步骤2中的“默认模块标志选择隐藏”进行设置，不出现new图标，我改为“显示”后出现了new图标，并且首页中也没有出现这个自定义的模块。

这个是不是在没有购买的系统上无法实现啊

虽然还没弄明白，但谢谢您的经验分享

通过参考13跟23楼的 设置，我也作出new图标了，谢谢两位大牛啊！

谢谢楼主，楼主是强人，是牛人，还是好人

提示 now 是不内置函数

谢谢楼主！该贴是我在本论坛看到的最有技术含量的帖子。
楼主是大强人，大牛人，大好人。
再次感谢kanghaoran楼主的无私奉献！
http://www.zylq.co.cc/

下面总结一下楼主的梯子：（详见13楼）
1、登陆后台，在表单模型管理中新建一自定义表单，随便什么名字都可以，字段建不建立无所谓，建立这个空表单的目的只是因为系统默认建立自定义模型必须要调用表单，实际上这个表单不起什么作用；
2、在表单模型管理中新建一自定义模型（这个步骤还不会？到富士康去报道吧）
3、在自定义模型管理中点击模型设置，在相应出现的对话框中点击模块模型（导航模型也可以，随便哪个模型无所谓，我用模块模型只是为了教程方便。）
4、复制以下代码到数据列表区：
<% @ Import  NameSpace="PageAdmin"%>
<% @ Import  NameSpace="System.Data"%>
<% @ Import  NameSpace="System.Data.OleDb"%>
<% Response.Buffer=true; %>

<%      
        Conn myconn ;
        OleDbConnection myOleDb ;
        OleDbCommand comm;
        string conPath,sql;

              myconn=new Conn();
        conPath=myconn.Constr();

        myOleDb=new OleDbConnection(conPath);
        myOleDb.Open();

        sql="UPDATE [information] SET  [title_style] ='' where [title_style] NOT LIKE '%color:%' or  [title_style] is null";
        comm=new OleDbCommand(sql,myOleDb);
        comm.ExecuteNonQuery();

        sql="UPDATE [information] SET  [title_style] = 'background:url(/images/new/new.gif) no-repeat 100% 0px ; padding: 1px 33px 0px 0px;' WHERE [title_style] NOT LIKE '%color:%' AND [thedate] BETWEEN DateAdd('d', -3, NOW()) AND NOW()";//不要忘记了替换为你自己的new图标位置，至于new图标保留几天，改-3这个数字吧.
        comm=new OleDbCommand(sql,myOleDb);
        comm.ExecuteNonQuery();

        myconn=null;
        comm=null;
        myOleDb.Close();
        myOleDb=null;
%>
5、保存此自定义模型。
6、在首页中新建一模块，类型为自定义模型，在自定义模型设置中调用刚才建立的自定义模型。
7、设置一个自义样式,在外层容器样式中输入"display:none";并调用自定义样式用于刚才建立的模块,以达到隐藏此模块的目的(但不等同于真正的隐藏，只是看到不而已，否则程序无法运行.)
8、重新进入主页，如无效果，多刷新几次。你成功了吗？如果你还不成功，也许你的代码输入有误，请仔细检查你的代码。成功后不要忘记来报到。
http://www.zylq.co.cc/

如何让导航栏的文章列表不显示“new”图标呢？
解决步骤如下：（详见33楼）
1、用记事本打开lanmu\navigation_article.aspx这个文件。
2、找到：<li class="nav_list_style_1"  style="<%=Nav_list_style%>" title=" <%#DataBinder.Eval(Container.DataItem,"title").ToString().Replace("\"",""")%> ">
    <a href="<%#GetUrl(DataBinder.Eval(Container.DataItem,"lanmu1id").ToString(),DataBinder.Eval(Container.DataItem,"lanmu3id").ToString(),DataBinder.Eval(Container.DataItem,"id").ToString(),DataBinder.Eval(Container.DataItem,"url").ToString())%>" class="nav_list_title"  target="<%=Target%>" style="<%#DataBinder.Eval(Container.DataItem,"title_style")%>"><%#Get_title_num(DataBinder.Eval(Container.DataItem,"title").ToString(),true)%></a><span class="nav_list_date" style="display:<%=Date_Show%>"> [<%#DataBinder.Eval(Container.DataItem,"thedate","{0:MM-dd}")%>]</span>
    </li>这个节点。
3、将其中的红色部分删除，注意一定要删对，否则会出现错误。
4、保存退出，再刷新网页即可。
你的问题解决了吗？如果你还不成功，也许你的代码输入有误，请仔细检查你的代码。成功后不要忘记来报到。
http://www.zylq.co.cc/

根据楼主的发的access的数据灵感  我终于弄好了SQL（2005测试完好）版本的
数据参数是：

<% @ Import  NameSpace="PageAdmin"%>
<% @ Import  NameSpace="System.Data"%>
<% @ Import  NameSpace="System.Data.OleDb"%>
<% Response.Buffer=true; %>

<%      
        Conn myconn ;
        OleDbConnection myOleDb ;
        OleDbCommand comm;
        string conPath,sql;

              myconn=new Conn();
        conPath=myconn.Constr();

        myOleDb=new OleDbConnection(conPath);
        myOleDb.Open();

        sql="UPDATE [information] SET  [title_style] ='' where [title_style] NOT LIKE '%color:%' or  [title_style] is null";
        comm=new OleDbCommand(sql,myOleDb);
        comm.ExecuteNonQuery();

        sql="UPDATE [information] SET  [title_style] = 'background:url(/images/new.gif) no-repeat 100% 0px ; padding: 1px 33px 0px 0px;' WHERE [title_style] NOT LIKE '%color:%' AND [thedate] BETWEEN DateAdd(d, -7, getdate()) AND getdate()";//替换new图标位置，new图标保留几天，改-7这个数字
        comm=new OleDbCommand(sql,myOleDb);
        comm.ExecuteNonQuery();

        myconn=null;
        comm=null;
        myOleDb.Close();
        myOleDb=null;
%>

无效!

你是不会操作还是？

好文章，测试后效果很好，感谢kanghaoran 提供这么好的代码