<%
If Lcase(XML.FileName)<>Lcase("Index.asp") Then
XML.WriteRow XML.ImgA("Images/home.gif","Index.asp","ÍøÕ¾Ê×Ò³") 
End If
XML.WriteOut XML.Div(,,"b")
XML.WriteTo  "<p>" & "&copy; 2009 " & Replace(XML.SiteWapUrl,"http://","") 
If Lcase(XML.FileName)="index.asp" Then XML.WriteRow ICPNumber  'ICP±¸°¸ºÅ¡£
XML.WriteOut XML.Img("Images/PostTime.gif") & " " & Time() & "</p>"
XML.XhtmlFooter
Set XML=Nothing
Set WAP=Nothing
%>

