asp修改生成xml文件代码
因为网站幻灯片是flash读取xml里面的数据。但每次改xml文件太麻烦。我想在后台加一个页面，是一个编辑框，下面有个确认修改按钮，内容改好后直接点击按钮修改xml文件内...
因为网站幻灯片是flash读取xml里面的数据。但每次改xml文件太麻烦。我想在后台加一个页面，是一个编辑框，下面有个确认修改按钮，内容改好后直接点击按钮修改xml文件内容。这个asp页面的完整代码谁能直接给我。
xml文件
<?xml version="1.0" encoding="utf-8"?>
<root imageWidth='440' imageHeight='250'>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/01.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/02.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/03.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/04.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/05.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/06.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/07.jpg"/>
</root> 展开
xml文件
<?xml version="1.0" encoding="utf-8"?>
<root imageWidth='440' imageHeight='250'>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/01.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/02.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/03.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/04.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/05.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/06.jpg"/>
<menu url="http://127.0.0.1/asp/" frame="_blank" imageUrl="images/07.jpg"/>
</root> 展开
1个回答
展开全部
新建 makexml.asp 文件
复制以下代码，悔乱并保液前森存
<%
dim content
content=Trim(Request.Form("content"))
If request("action")="Edit" then
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
Filen=Server.MapPath("data.xml")
Set Site_Config=FSO.CreateTextFile(Filen,true, False)
Site_Config.Write content
Site_Config.Close
Set Fso = Nothing
Response.Write("<script>alert('成功生成！');this.location.href='makexml.asp';</script>")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=GB2312" />
<title>生成xml</title>
</head>
<body>
<form method="post" action="?Action=Edit">
<textarea name="content" class="textinput" style="width:800px;height:200px;"><!--#include file="data.xml"--></textarea>
<BR>
<input type="submit" name="Submit" class="submit" value="生成闹亩文件">
</form>
</body>
</html>
将上面的data.xml改成需要生成的文件名就行了。
复制以下代码，悔乱并保液前森存
<%
dim content
content=Trim(Request.Form("content"))
If request("action")="Edit" then
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
Filen=Server.MapPath("data.xml")
Set Site_Config=FSO.CreateTextFile(Filen,true, False)
Site_Config.Write content
Site_Config.Close
Set Fso = Nothing
Response.Write("<script>alert('成功生成！');this.location.href='makexml.asp';</script>")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=GB2312" />
<title>生成xml</title>
</head>
<body>
<form method="post" action="?Action=Edit">
<textarea name="content" class="textinput" style="width:800px;height:200px;"><!--#include file="data.xml"--></textarea>
<BR>
<input type="submit" name="Submit" class="submit" value="生成闹亩文件">
</form>
</body>
</html>
将上面的data.xml改成需要生成的文件名就行了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
