新云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()