关于asp问题

Question

请问一下，下面的这个代码是什么意思
ChannelID = 0
If fso.FileExists(Server.mappath("NotInsalled.txt")) Then
    Response.Write "<li>请先运行 <a href='Install.asp'>Install.asp</a> 以进行系统安装过程！</li><br/><br/>"
    Response.Write "<li>如果你已经反复运行此程序，但仍然出现此提示，请使用FTP工具手动删除 NotInstalled.txt 文件。</li>"
    Response.End
End IfIf FileName_SiteIndex <> "Index.asp" Then
    Call CloseConn
    Response.Redirect FileName_SiteIndex
Else
    If CurrentPage > 1 Or PE_Cache.CacheIsEmpty("Site_Index") Then
        Call GetHTML_SiteIndex
        If CurrentPage = 1 Then PE_Cache.SetValue "Site_Index", strHtml
    Else
        strHtml = PE_Cache.GetValue("Site_Index")
    End If
    Response.Write strHtml
End If
Call CloseConn
%>

Answer 1

ChannelID = 0
'fso组件判断文件是否存在
'Server.mappath("NotInsalled.txt")是把相对路径转换为绝对路径
If fso.FileExists(Server.mappath("NotInsalled.txt")) Then
  '向页面输出HTML代码
  Response.Write "<li>请先运行 <a href='Install.asp'>Install.asp</a> 以进行系统安装过程！</li><br/><br/>"
  Response.Write "<li>如果你已经反复运行此程序，但仍然出现此提示，请使用FTP工具手动删除 NotInstalled.txt 文件。</li>"
  '结束输出
  Response.End
End If 'asp里面 if和end if是成对出现的
If FileName_SiteIndex <> "Index.asp" Then
  '调用CloseConn函数，可能是关闭数据库连接的
  Call CloseConn
  '页面跳转到FileName_SiteInde页
  Response.Redirect FileName_SiteIndex
Else
  If CurrentPage > 1 Or PE_Cache.CacheIsEmpty("Site_Index") Then
  Call GetHTML_SiteIndex
  If CurrentPage = 1 Then PE_Cache.SetValue "Site_Index", strHtml
  Else
  strHtml = PE_Cache.GetValue("Site_Index")
  End If
  Response.Write strHtml
End If
Call CloseConn
%>