首页 > 网站 > 建站经验 > 正文

在文章管理列表直接生成HTML静态页面!(精)

2019-11-02 17:00:24
字体:
来源:转载
供稿:网友
这个效果希望大家用得着

此主题相关图片如下:

一步搞定:修改admin/admin_article.asp

将1062行的      复制代码 代码如下:

 .Write ("<td align=""center""> <a href='?DisplayMode="&DisplayMode&"&Page=" & Page & "&Action=Edit&" &SearchParam&"&ID=" & KS_RS_Obj(15) & "' onclick='parent.frames[""BottomFrame""].location.href=""Split.asp?OpStr=编辑文章&ButtonSymbol=AddArticle&FolderID=" & ID & "&DisplayMode=" & DisplayMode & """;'>修改</a> | <a href=""?Action=DelInfo&DisplayMode=" & DisplayMode & "&Page=" & Page & "&" & SearchParam & "&NewsID=" & KS_RS_Obj(1) & """ onclick=""return (confirm('确定删除该文章吗?'))"">删除</a></td>") 

替换成下列代码:

复制代码 代码如下:

if KSCMS.GetChannelConfig(1,"FsoHtmlTF")=1 then 

        .Write ("<td align=""center""> <a href='?DisplayMode="&DisplayMode&"&Page=" & Page & "&Action=Edit&" &SearchParam&"&ID=" & KS_RS_Obj(15) & "' onclick='parent.frames[""BottomFrame""].location.href=""Split.asp?OpStr=编辑文章&ButtonSymbol=AddArticle&FolderID=" & ID & "&DisplayMode=" & DisplayMode & """;'>修改</a> | <a href=""?Action=DelInfo&DisplayMode=" & DisplayMode & "&Page=" & Page & "&" & SearchParam & "&NewsID=" & KS_RS_Obj(1) & """ onclick=""return (confirm('确定删除该文章吗?'))"">删除</a>| <a href=""Include/RefreshHtmlSave.Asp?ChannelID=1&Types=Content&RefreshFlag=ID&ArticleID=" & KS_RS_Obj(1) &""" onclick=""return (confirm('确定将该文章生成静态文件吗?'))"">生成</a></td>") 

       else 

       .Write ("<td align=""center""> <a href='?DisplayMode="&DisplayMode&"&Page=" & Page & "&Action=Edit&" &SearchParam&"&ID=" & KS_RS_Obj(15) & "' onclick='parent.frames[""BottomFrame""].location.href=""Split.asp?OpStr=编辑文章&ButtonSymbol=AddArticle&FolderID=" & ID & "&DisplayMode=" & DisplayMode & """;'>修改</a> | <a href=""?Action=DelInfo&DisplayMode=" & DisplayMode & "&Page=" & Page & "&" & SearchParam & "&NewsID=" & KS_RS_Obj(1) & """ onclick=""return (confirm('确定删除该文章吗?'))"">删除</a></td>") 

       end if 

另外需修改列表栏目的宽度,在980行,改成下列代码应该可以了 
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表