新云2.1后台批量设置文章更新时间

只看楼主收藏回复

• 枫之精英
  

  admin_article.asp

  
  

  找到以下代码

  Response.Write "<td class=tablerow1 align=right><b>禁止评论：</b></td>"

  Response.Write "<td class=tablerow1 align=center><input type=checkbox name=selForbidEssay value='1'></td>"

  Response.Write "<td class=tablerow1><input type=radio name=ForbidEssay value='0' checked> 否&nbsp;&nbsp;<input type=radio name=ForbidEssay value='1'> 是</td>"

  Response.Write "</tr>"

  
  

  下面增加

  
  

  '更新时间

  Response.Write "<tr>"

  Response.Write "<td class=tablerow1 align=right><b>更新时间：</b></td>"

  Response.Write "<td class=tablerow1 align=center><input name=selWriteTime type=checkbox value='1'></td>"

  Response.Write "<td class=tablerow1><input name=WriteTime type=text id=WriteTime size=25 value=" & now() &"></td>"

  Response.Write "</tr>"

  
  

  找到以下代码

  If Trim(Request.Form("selSpecial")) <> "" Then strTempValue = strTempValue & "SpecialID="& CLng(Request.Form("SpecialID")) &","

  
  

  上面增加

  
  

  If Trim(Request.Form("selWriteTime")) <> "" Then strTempValue = strTempValue & "WriteTime='"& Newasp.ChkFormStr(Request.Form("WriteTime")) &"',"

  
  

  结束。

  
  

  
  

  1楼  2021/10/11 14:10:46  回复