Question

ASP输出语句在哪？

这是我的程序？
我还不太会用ASP，现在有一段代码：输出了一些图片以及分页效果
我想知道图片是通过哪些语句输出来的：代码如下：
<!-- #Include File="Include/EsmsConfig.Asp" -->
<%
Dim DigitalEsms
Set DigitalEsms = New EsmsMain
DigitalEsms.ChkSqlIn '检查SQL恶意注入

if lcase(LanguageSet)="en" then
ErrStr="Error, this channel has closed!"
else
ErrStr="对不起，该版块已设置为关闭状态！"
end if

'检查该版块是否设置开放
if lcase(ProductsOption)<>"open" then
Conn.Close
Set Conn=Nothing
response.write "<script>window.alert('"&ErrStr&"');window.location.href('"&DigitalEsms.ClientInfo("FromUrl")&"')</script>"
Set DigitalEsms=Nothing
response.end
end if

Dim TplFileUrl,TplStr,Sql,Rs,rCid,Cid

Cid=8
page=request.QueryString("page")

if trim(page)<>"" then
PageCount=cint(page)
else
PageCount=1
end if

TplStr=DigitalEsms.ReadFile("Template/"&LanguageSet&"/Products-8.Html")&""
TplStr=replace(TplStr,"{PageHead}",DigitalEsms.ReadFile("Template/"&LanguageSet&"/Head.Html")&"")
TplStr=replace(TplStr,"{PageFoot}",DigitalEsms.ReadFile("Template/"&LanguageSet&"/Foot.Html")&"")
TplStr=RepSiteInfo(TplStr)

iStr=instr(TplStr,"PageSize=")+10
TempStr=mid(TplStr,iStr,10)
PageSizeNum=cint(mid(TempStr,1,instr(TempStr,"""")-1))
if Cid="" then
csql=""
filename="Products-1.Asp"
else
csql=" where CID="&Cid
filename="Products-1.Asp?cid="&cid
end if
sql="select * from [Products]"&csql&" order by id desc;"
set rs=server.CreateObject("adodb.recordset")
rs.PageSize=PageSizeNum
rs.open sql,conn,1,1
if rs.eof and rs.bof then
else
rs.AbsolutePage=PageCount
%>
<!-- #Include File="Include/SplitPage.asp" -->
<%
end if
rs.close
set rs=nothing

TplStr=replace(TplStr,"{SplitPage}",PageStr)

if Cid="" then
if lcase(LanguageSet)="cn" then
TplStr=replace(TplStr,"{ProClassName}","其它系列")
else
TplStr=replace(TplStr,"{ProClassName}","Other series")
end if
else
sql="select * from [ProClass] where id="&Cid
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
TplStr=replace(TplStr,"{ProClassName}",rs(LanguageSet&"ClassName")&"")
rs.close
set rs=nothing
end if
TplStr=replace(TplStr,"{ProClassID}",Cid&"")
TplStr=replace(TplStr,"{page}",page)

TplStr= DigitalEsms.ProcessCustomTags(TplStr)&""

conn.close
set conn=nothing
Set DigitalEsms=Nothing

response.write TplStr
%>

第一条包含语句是系统配置！~没有什么输出语句，第二个包含语句是分页的！~也没有输出语句！~这个页面我就不懂了！~请知道的兄弟帮帮忙！~
我不胜感激！~
感谢两位的关注：不过值得一提的是：
<!-- #Include File="Include/SplitPage.asp" -->
这是一个分页功能的页面
而且只是给该页面的一个变量赋值，并没有输出
这个变量就是在现在这些语名中用到的：PageStr
而下面不断赋值的语句我看不懂了！~
我只知道最后那一条输出语句是输出分页效果的。
一条语句能既输出图片，又输出分页吗？？

Answer 1

response.write TplStr
前面不断给变量TplStr赋值，最后用这个输出