文章克隆实现方法（完整修改版）

在网站根目录下面找到四个文件：admin_article.asp；article.asp；article_list.asp；article_view.asp 在include目录里面找到三个文件：con_article_main.asp con_article_list.asp con_article.asp，将上述文件分别复制为以faq命名的文件，即admin_faq.asp；faq.asp；faq_list.asp；faq_view.asp；con_faq_main.asp con_faq_list.asp con_faq.asp等7个文件。
注意：你的命名文件代码如faq不能超过5个英文字母！

批量查找复制后的七个文件里面的所有article和art（备注：先替换article，再替换art。替换art只需在con_faq.asp中替换就行了，仅2处）全部替换为：faq。完成后将con_faq_main.asp、 con_faq_list.asp、 con_faq.asp三个文件复制到include目录里面。

1、修改admin.asp文件
①打开admin.asp，查找这一行：sql="insert into configs(id,num_topic,num_data,num_reg,new_username,num_news,num_article,num_faq,num_down,num_product,counter,max_online,max_tim,start_tim,num_new,today_tim) " & _添加红色部分，注意标点符号，不要用中文符号。
②再查找<td width='80%'><font class=red><%response.write rs("num_product")%></font> 个商品，<font class=red><%response.write rs("num_news")%></font> 条新闻，<font class=red><%response.write rs("num_article")%></font> 篇文章，<font class=red><%response.write rs("num_faq")%></font> 篇文摘，<font class=red><%response.write rs("num_down")%></font> 个软件，<font class=red><%response.write rs("num_reg")%></font> 位用户，最新注册 <%response.write format_user_view(rs("new_username"),1,0)%></td>插入蓝色部分。

2、修改 admin_data.asp文件
①打开admin_data.asp文件，查找num_article,在后面插入num_faq, 比如：num_article,num_faq,（注意后面有逗号哟，不是中文逗号），这里一共有两处，如法炮制，插入。
②查找num_article=0这一行，在下一行插入：num_faq=0
③查找 set rs=joekoe_cms.exec("select count(id) from article where hidden=1",1)
if not rs.eof then num_article=rs(0)
rs.close这三行，在最后一行下面插入
set rs=joekoe_cms.exec("select count(id) from faq where hidden=1",1)
if not rs.eof then num_faq=rs(0)
rs.close
④接着查找这一行：sql="update configs set num_topic="&num_topic&",num_data="&num_data&",num_reg="&num_reg&",new_username='"&new_username&"',num_news="&num_news&",num_article="&num_article&",num_faq="&num_faq&",num_down="&num_down&",num_product="&num_product&",num_new="&num_new&",today_tim='"&joekoe_cms.time_type(joekoe_cms.now_time,4)&"'"插入红色部分。

3、修改user_emoney_note.asp文件
打开user_emoney_note.asp文件，找到
vurl="article_view.asp?id="&iid
这一行，在下面插入
case "faq"
vurl="faq_view.asp?id="&iid

4、修改help.asp文件
打开help.asp文件，查找
<tr><td colspan=2 height=20><script language=javascript>document.write(img_skin("m_help2"));</script><a href='user_put.asp?action=art' class=blue>发表我的文章</a></td></tr>
<tr><td></td><td class=htd>发布相关的技术文章，具体内容有：标题、类型和内容等，须管理审核。</td></tr>
<tr><td height=5></td></tr>
在这三行的最后一行下面，插入
<tr><td colspan=2 height=20><script language=javascript>document.write(img_skin("m_help2"));</script><a href='user_put.asp?action=faq' class=blue>发表我的文摘</a></td></tr>
<tr><td></td><td class=htd>发布相关的技术文摘，具体内容有：标题、类型和内容等，须管理审核。</td></tr>
<tr><td height=5></td></tr>

5、修改search.asp文件
打开search.asp文件，
①查找到case "news","article"，紧跟后面添入"faq"如：case "news","article","faq"
②找到
if sea_type="article" then sea_name="文栏"
在它的下一行插入
if sea_type="faq" then sea_name="文摘"

6、打开user_put.asp文件
打开user_put.asp文件，
①找到
<td><%response.write img_skin("m_")%><a href='?action=news'<%if action="art" or action="" then response.write " class=red"%>>发布新闻</a></td>
<td width=5></td>
这两行，在最后一行下面插入
<td><script language=javascript>document.write(img_skin("m_"));</script><a href='?action=wdwz'<%if action="faq" or action="" then response.write " class=red"%>>发表文摘</a></td>
<td width=5></td>
②找到下面几行：
case "down"
  nsort=action
  index_url="down"
  data_name="down"
  tit_fir="软件"
  if int(format_mid_num(23))=1 then
    dim_down=split(web_down,"|")
    call put_down()
    erase dim_down
  else
    call put_close("发布")
  end if

在case "down"上面插入如下代码：
case "faq"
nsort=action
index_url="faq"
data_name="faq"
tit_fir="文摘"
if int(format_mid_num(20))=1 then
call put_faq()
else
call put_close("发表")
end if
特别说明：注意上面的数字20，请先在后台“权限管理”中查看最大的数字（如果没做其他的改动，将最大的数字+1就行了）
③接着往下找到
sub put_art()这段代码，复制这段代码放在
sub put_close(tvar)
的上面，将复制后的
sub put_art()
改为
sub put_faq()

说明：复制sub put_art()这段代码，然后将复制后的这段代码重新定义函数，我们定义为sub put_faq() ，与前面的call put_faq()对应，否则前台无法发布克隆的文章！

7、修改skin.asp文件
①打开skin.asp文件，查找num_article，在后面插入：num_faq,如：num_article,num_faq,共有两处。
②找到这一段
if not application(joekoe_cms.web_cookies&"_configs_true") then
sql="select top 1 id,num_topic,num_data,num_reg,new_username,num_news,num_article,num_faq,num_down,num_product,counter,max_online,max_tim,start_tim,num_new,today_tim from configs"
set rs=joekoe_cms.exec(sql,1)
if rs.eof then
rs.close
call joekoe_cms.exec("insert into configs(id,num_topic,num_data,num_reg,new_username,num_news,num_article,num_faq,num_down,num_product,counter,max_online,max_tim,start_tim,num_new,today_tim) values(1,"&num_topic&","&num_data&","&num_reg&",'"&new_username&"',0,0,0,0,"&total_counter&","&max_online&",'"&max_tim&"','"&start_tim&"',0,'"&today_tim&"')",0)
set rs=joekoe_cms.exec(sql,1)
end if
application.lock
application(joekoe_cms.web_cookies&"_configs_true")=true
application(joekoe_cms.web_cookies&"_configs_num_topic")=rs(1)
application(joekoe_cms.web_cookies&"_configs_num_data")=rs(2)
application(joekoe_cms.web_cookies&"_configs_num_reg")=rs(3)
application(joekoe_cms.web_cookies&"_configs_new_username")=rs(4)
application(joekoe_cms.web_cookies&"_configs_num_news")=rs(5)
application(joekoe_cms.web_cookies&"_configs_num_article")=rs(6)
application(joekoe_cms.web_cookies&"_configs_num_faq")=rs(7)
application(joekoe_cms.web_cookies&"_configs_num_down")=rs(8)
application(joekoe_cms.web_cookies&"_configs_num_product")=rs(9)
application(joekoe_cms.web_cookies&"_configs_counter")=rs(10)
application(joekoe_cms.web_cookies&"_configs_max_online")=rs(11)
application(joekoe_cms.web_cookies&"_configs_max_tim")=rs(12)
application(joekoe_cms.web_cookies&"_configs_start_tim")=rs(13)
application(joekoe_cms.web_cookies&"_configs_new_num")=rs(14)
application(joekoe_cms.web_cookies&"_configs_today_tim")=rs(15)
application.unlock
rs.close

请注意红色部分，我添加了
application(joekoe_cms.web_cookies&"_configs_num_faq")=rs(7)
其中的faq就是我克隆文章的数据表，（记得重新编排顺序！），这样就不会出现大家反映的后台不能实现克隆文章的“权限管理”问题了，同时加入了克隆文章的统计。

8、修改functions.asp文件
打开include/functions.asp文件，找到
vbcrlf&"<option value='article'>文栏</option>" & _
在它的下面插入：
vbcrlf&"<option value='faq'>文摘</option>" & _

9、修改style/joekoe_functions.js文件
在最下面插入
function faq_view_return(v_emoney,v_power,v_url)
{
  if (note_emoney('浏览此文摘',v_emoney,v_power))
  { open_view(v_url,1); }
}

10、修改admin_config_edit.asp文件（2个文件均要修改，一个在根目录，一个在include文件夹里面）
找到<td>启用下载防盗：</td>
在它的上一行插入
<td>发表文摘：</td>
<td><input type=radio name=web_setup_20 value='1'<% if int(tmp1)=1 then response.write " checked" %>> 开放 <input type=radio name=web_setup_20 value='0'<% if int(tmp1)=0 then response.write " checked" %>> 关闭</td>
<td class=gray></td>
</tr>
<% tmp1=format_mid_num(20) %>
<tr>

11、修改数据库
打开joekoe_data.asp，改为joekoe_data.mdb。打开 joekoe_data.mdb，复制article表，重命名为faq；再打开configs表，右键选取“设计视图”，增加num_faq字段，注意格式必须与num_article完全一样！

12、后台管理
进入网站管理后台，添加管理菜单和网站菜单名字，具体和文栏操作一模一样。（提示：选择栏目参数为20即可）。最后生成网站菜单！

13、增加前台统计数据
打开index2.asp文件，找到
sub main_left_data()这段代码，在其中的
vbcrlf&"<tr><td height="&dim_num(6)&">"&img_skin("h_")&"文章总数：<font class=red>"&application(joekoe_cms.web_cookies&"_configs_num_article")&"</font> 篇</td></tr>" & _
下面添加
vbcrlf&"<tr><td height="&dim_num(6)&">"&img_skin("h_")&"文摘总数：<font class=red>"&application(joekoe_cms.web_cookies&"_configs_num_faq")&"</font> 篇</td></tr>" & _

14、复制小图片
这是最后一步了。
进入skin文件夹，然后再进入skin_1文件夹的small里面，在里面把h_article.gif m_article.gif label_article.gif这三个图片原封不动的复制在原地，并且全部改名为h_faq.gif、 m_faq.gif 、label_faq.gif,然后退回来分别进入skin_2和skin_3里面，进行刚才相同的工作。最后将你复制的7个文件中的“文章”字样全部替换为“文摘”。

至此克隆文章频道的工作全部结束！