新云吧+ 关注 关注: 帖子:22

  

新云2.1系统后台批量更新软件更新时间

  • 枫之精英

    打开 admin/admin_soft.asp

    查找
    Case "批量删除":Call batdel

    在 Case "批量删除":Call batdel 上面添加一行 Case "更新时间":Call upSoftdata

    查找
    <option value="批量删除">批量删除</option>


    在 <option value="批量删除">批量删除</option> 上面添加一行 <option value="更新时间">更新时间 </option>

    查找
    Private Sub isCommend()
    Newasp.Execute ("update NC_SoftList set isBest=1 where SoftID in (" & selSoftID & 
    ")")
    Response.redirect (Request.ServerVariables("HTTP_REFERER"))
    End Sub


    在上面添加
    Private Sub upSoftdata()
    Newasp.Execute ("update NC_SoftList set SoftTime=Now() where SoftID in (" & selSoftID & ")")
    Response.redirect (Request.ServerVariables("HTTP_REFERER"))
    End Sub


    保存文件。这样,在后台只要全选软件,然后选择“管理选项”里的“更新时间”,执行操作,就可以更 
    新所选软件为服务器的最新时间了。记住,是服务器的时间。如果想更新为你电脑的时间,则把上述语句 
    中的SoftTime=Now()改为SoftTime=getdate()

    1楼  2021/10/11 13:26:35  回复

  发表回复

    发帖