xml问题

可以使用asp生成xml，但xml里不能写asp代码
把下面的代码存为asp文件
<%
  '设置响应类型
  Response.ContentType="text/xml"
  '设置字符编码
  Response.CharSet="gb2312"
%>
<?xml version="1.0" encoding="GB2312"?>
<TestXml>
   <%
             Dim i
             For i=0 To 100
                    With Response
                           .Write "<Item>xml生成测试"&CStr(i)&"</item>"
                   End With
            Next
  %>
</TextXml>