新云2.1让后台文章软件管理变黄条

只看楼主收藏回复

• 枫之精英
  

  admin_article.asp

  
  

  找到Dim Action,

  Dim Action,MouseStyle

  
  

  找到If CInt(ChannelID) = 0 Then ChannelID = 1

  在前面增加一条

  MouseStyle = " bgcolor=""#D4DEF9"" onmouseover=""this.style.backgroundColor='#FFFF00';this.style.color='red'"" onmouseout=""this.style.backgroundColor='';this.style.color=''"""

  
  

  找到Function Admin_Article_list(ArticleID,ChannelID,ClassID,title,ColorMode,FontMode,BriefTopic,isTop,WriteTime,UserName,isBest,isAccept,ClassName,strClass)

  
  

  下面的

  Response.Write " <tr> "

  修改为

  Response.Write " <tr "

  Response.Write MouseStyle

  Response.Write ">"

  
  

  然后将本FUNCTION段里的所有 "& strClass &"消除

  -----------------------------

  Function Admin_Soft_list

   " & strClass & "

  
  

  
  

  1楼  2021/10/11 13:36:41  回复