江南英文版女声:文章调用

<%
sql="select top 5 A.ArticleID,A.ClassID,L.LayoutID,L.LayoutFileName,A.Title,A.Key,A.Author,A.CopyFrom,A.UpdateTime,A.Editor,A.TitleFontColor,A.TitleFontType,"
sql=sql & "A.Hits,A.OnTop,A.Hot,A.Elite,A.Passed,A.IncludePic,A.Stars,A.PaginationType,A.ReadLevel,A.ReadPoint,A.DefaultPicUrl from Article A"
sql=sql & " inner join Layout L on A.LayoutID=L.LayoutID where A.Deleted=False and A.Passed=True and A.ClassID in (" & arrClassID & ") order by A.ArticleID desc"
rsArticle.open sql,conn,1,1
if rsArticle.bof and rsArticle.eof then
response.write "<li>没有任何文章</li>"
else
call ArticleContent(30,false,false,false,2,false,false)
end if
rsArticle.close
%>

这显示了两栏的，怎么删掉另一栏啊。
我把该asp复制到其他页，但显示不了。然后
也把
<!--#include file="Inc/syscode_article.asp"-->
<%
'请勿改动下面这三行代码
const ChannelID=2
Const ShowRunTime="Yes"
MaxPerPage=15
strFileName="Article_Class.asp?ClassID=" & ClassID & "&SpecialID=" & SpecialID
Set rsArticle= Server.CreateObject("ADODB.Recordset")
Set rsPic= Server.CreateObject("ADODB.Recordset")
%>
都分别 头尾的复制，没内容显示。但本来的页怎么会显示，缺少什么？

<%
set rsArticle=nothing
set rsPic=nothing
call CloseConn()
%>

<% call showArticle (30)%>
这是显示的数据库全部文章的链接，30为最多显示标题，其他调用可以调用多少个ID，也就是多少条新闻，加个(n,30) n为数字，显示多少条。但用这代码<% call showArticle (30)%>却不行了。

<% call showArticle (30)%>
<% call ShowHot(3,40) %>