好心人帮下忙，asp操作xml出错了，帮我看下，万分感激
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link rel="stylesheet" type="text/css" href="style/1.css" />
<title>多用户留言系统</title>
<%
'读取XML文件，提取里面的内容
dim xml '声明一个变量
set xml =server.CreateObject("MicroSoft.XMLDom")
xml.load(server.mappath("vip.xml")) '载入这个XML文件
'创建节点取得里面的内容
set username = xml.documentElement.SelectSingleNode("//username") '提取姓名对象
set face = xml.documentElement.SelectSingleNode("//face") '提取头像对象
set email = xml.documentElement.SelectSingleNode("//email") '提取邮件对象
set url = xml.documentElement.SelectSingleNode("//url") '提取个网对象
'通过这些对象取出里面的值
vusername = username.text
vface = face.text
vemail = email.text
vurl = url.text
set username = nothing '销毁
set face = nothing '销毁
set email = nothing '销毁
set url = nothing '销毁
set oXMLRoot = nothing '销毁
set oXML = nothing '销毁
%>
</head>
<body>
<!--#include file="header.asp"-->
<div id="sidebar">
<h1>新进会员:<%=vusername%></h1>
<div>
<dl>
<dt><img src="<%=vface%>" alt="新近会员" /></dt>
<dd>给他送花 | 写短信</dd>
<dd>加为好友 | 写留言</dd>
<dd>我的邮件:<%=vemail%></dd>
<dd>我的网站:<%=vurl%></dd>
</dl>
</div>
</div>
<div id="content">
<h1>文章列表</h1>
<div></div>
</div>
<!--#include file="footer.asp" -->
</body>
</html>
