由于 没有上传附件的权限，看不了效果图，只能看代码了。admin/system/ks.class.asp
大概1131行后面增加如下代码
- .echo " | <a href=""javascript:txtEditClass('" & ID & "');"">文本编辑"& MyFolderName&"</a>"
大概147行后面增加如下代码
- <!--文本编辑栏目页-->function txtEditClass(FolderID){ location.href='KS.Class.asp?Page=<%=CurrentPage%>&channelid=<%=request("channelid")%>&a=<%=request("a")%>&Action=Edit&Go=Class&FolderID='+FolderID+'&oids='+oids+'&txt=1'; $(parent.document).find('#BottomFrame')[0].src='Post.Asp?OpStr='+escape("<font color=red>文本编辑<%=MyFolderName%></font>")+'&ButtonSymbol=GoSave&Go=Class&FolderID='+FolderID;}
ks_cls/kesion.classcls.asp
大概362行替换成如下代码
- .Write " <div>单页内容：<font>(使用标签{$GetClassIntro}在模板里调用)</font></div>" & vbCrLf If KS.ChkClng(KS.G("txt"))=1 Then .Write "<textarea id=""ClassContent"" name=""ClassContent"" cols=""120"" rows=""20"">"&ClassContent&"</textarea>" Else Response.Write EchoEditor("ClassContent",ClassContent,"NewsTool","96%","350px") End If
当前位置：
支持(0) | 
反对(0)
顶端 
底部
![电子邮件:[ 22866665@163.com ]](http://bbs.kesion.com/club/images/email.gif){kind=small}
q1763633868 发表于：2015/6/21 9:20:57 | 只看该作者 查看该作者主题
沙发 
