[求助]asp程序向xml文件添加节点不成功
下面这个就是起添加节点作用的add.asp文件,表单提交以后一点反应都没有,没有页面跳转也没有被对应的xml文件加节点,我看不出错在哪里,向大家寻求帮助。
select case request("action")
case "add"
dim xmldoc,flag,filename
filename=server.mappath("mysites.xml")
set xmldoc=createobject("Microsoft.xmldom")
xmldoc.async=false
flag=smldoc.load(filename)
if flag then
dim element,e12
set element=smldoc.createelement("site")
set el2=xmldoc.createelement("topic")
el2.text=request.form("topic")
element.appendchild el2
set el2=xmldoc.createelement("name")
el2.text=request.form("name")
element.appendchild el2
set el2=xmldoc.createelement("url")
el2.text=request.form("url")
element.appendchild el2
xmldoc.documentelement.appendchild element
xmldoc.save filename
response.redirect"index1.asp"
end if
end select
%>
function valid()
{
var name=document.addform.name.value;
var url=document.addform.url.value;
var topic=document.addform.topic.value;
if (name==""||url==""||topic=="")
{
alert("请输入站点信息!")
return false
}
}
addadd new record | |
Topic: | |
name: | |
url: | |
这就是那个需要添加节点的xml文件:
新闻
sina
http://www.sina.com
体育
nease
http://www.163.com
add.asp文件中要跳转到的页面index1.asp文件是以列表形式显示所有节点信息的一个程序。