用asp.net和xml做的新闻更新系统(3)

asp.net|xml

最后,大家来看一下最负责的一个页面,这个页面的作用就是用来建立新的xml数据。
manage.aspx </P><P><%@ Import Namespace="System.Xml.Xsl" %>
<%@ Import Namespace="System.Xml" %>
<%@ Assembly Name="System.Xml" %>
<%@ Import Namespace="System.IO" %>
<%@ Page Language="C#" Debug="true" codepage="936"%>
<%@ Import Namespace="System"%> </P><P><HTML>
<HEAD>
<script language="C#" runat="server"> </P><P>public void Button1_Click(object sender, System.EventArgs e)
{
//判断文件是否存在
if(File.Exists(Server.MapPath(TextBox1.Text +".xml")))
{
Response.Write("文件名已经存在,请重选文件名。");
Response.End() ; </P><P>}
else
{ </P><P>XmlNode currNode;
XmlDocument xmldoc = new XmlDocument();
xmldoc.Load(Server.MapPath("contents.xml")); </P><P>string InsStr="<topic><title>"+TextBox2.Text+"</title><href>main.aspx?name="+TextBox1.Text+"</href></topic>";
XmlDocumentFragment docFrag = xmldoc.CreateDocumentFragment();
docFrag.InnerXml = InsStr; </P><P>currNode = xmldoc.DocumentElement;
currNode.InsertAfter(docFrag, currNode.LastChild);
//save the output to a file
xmldoc.Save (Server.MapPath("contents.xml")); </P><P>//把TextBox5中的文件换成符合xml格式的内容。
string xmlfile =TextBox5.Text.Replace("&","&");
xmlfile = xmlfile.Replace("<","<");
xmlfile = xmlfile.Replace(">",">");
xmlfile = xmlfile.Replace( @"""""",""");
xmlfile = xmlfile.Replace("'","'");
xmlfile = xmlfile.Replace ("\n","</paragraph><paragraph>");
//把数据写入新建的xml文件中去。
XmlDocument doc = new XmlDocument();
doc.LoadXml ("<?xml version='1.0' encoding='GB2312'?><document><title>"+TextBox2.Text +"</title><abstract>"+TextBox4.Text +"</abstract><author>"+TextBox3.Text +"</author><content><paragraph>"+xmlfile+"</paragraph></content></document>");
doc.Save (Server.MapPath(TextBox1.Text +".xml"));
Response.Write("You hava input the article!");
TextBox1.Text="";
TextBox2.Text="";
TextBox3.Text="";
TextBox4.Text="";
TextBox5.Text=""; </P><P>} </P><P></P><P>
//向目录文件中写数据 </P><P>}
public void Button2_Click(object sender, System.EventArgs e)
{}
</script>
<meta content="Internet Explorer 5.0" name=vs_targetSchema>
<meta content="Microsoft Visual Studio 7.0" name=GENERATOR>
<meta content=C# name=CODE_LANGUAGE>
</HEAD>
<body MS_POSITIONING="GridLayout">
<form runat="server">
<FONT face=宋体>
<asp:label id=Label1 style="Z-INDEX: 100; LEFT: 230px; POSITION: absolute; TOP: 27px" runat="server" Height="28px" Width="156px">
asp酷技术资讯网网站内容发布系统
</asp:label>
<asp:label id=Label2 style="Z-INDEX: 101; LEFT: 110px; POSITION: absolute; TOP: 68px" runat="server" Height="25px" Width="65px">
文件名:
</asp:label>
<asp:textbox id=TextBox1 style="Z-INDEX: 102; LEFT: 255px; POSITION: absolute; TOP: 64px" runat="server" Height="33px" Width="178px" >
</asp:textbox>
<asp:label id=Label3 style="Z-INDEX: 103; LEFT: 108px; POSITION: absolute; TOP: 126px" runat="server" Height="36px" Width="86px">
文章名称:
</asp:label>
<asp:textbox id=TextBox2 style="Z-INDEX: 104; LEFT: 256px; POSITION: absolute; TOP: 114px" runat="server" Height="37px" Width="177px">
</asp:textbox>
<asp:label id=Label4 style="Z-INDEX: 105; LEFT: 114px; POSITION: absolute; TOP: 183px" runat="server" Height="31px" Width="89px">
作者:
</asp:label>
<asp:textbox id=TextBox3 style="Z-INDEX: 106; LEFT: 256px; POSITION: absolute; TOP: 183px" runat="server" Height="36px" Width="179px">
</asp:textbox>
<asp:label id=Label5 style="Z-INDEX: 107; LEFT: 114px; POSITION: absolute; TOP: 241px" runat="server" Height="51px" Width="81px">
摘要:
</asp:label>
<asp:textbox id=TextBox4 style="Z-INDEX: 108; LEFT: 256px; POSITION: absolute; TOP: 245px" runat="server" Height="36px" Width="179px">
</asp:textbox>
<asp:label id=Label6 style="Z-INDEX: 109; LEFT: 116px; POSITION: absolute; TOP: 315px" runat="server" Height="36px" Width="78px">
内容:
</asp:label>
<asp:textbox id=TextBox5 style="Z-INDEX: 110; LEFT: 259px; POSITION: absolute; TOP: 303px" runat="server" Height="95px" Width="252px" textmode="MultiLine">
</asp:textbox>
</FONT> </P><P><INPUT id=Button2 style="Z-INDEX: 113; LEFT: 343px; WIDTH: 40px; POSITION: absolute; TOP: 430px; HEIGHT: 24px" type=button value=重置 name=Button2 runat="server" OnServerClick="Button2_Click" DESIGNTIMEDRAGDROP="59">
<br>
<br>
<div id=mess runat=server>
</div>
<br>
<input type="button" value="提交" OnServerClick="Button1_Click" runat="server" ID="Button1" NAME="Button1" style="Z-INDEX: 112; LEFT: 268px; POSITION: absolute; TOP: 430px">
</form>
</body>
</HTML>
此程序在.net beta2 build 9148下测试通过。(完)

时间: 2024-12-17 19:29:06

用asp.net和xml做的新闻更新系统(3)的相关文章

用asp.net和xml做的新闻更新系统

asp.net|xml 读了很多关于.net的文章,也看了许多关于xml的资料,我已经深深的被他们的魅力所吸引.在网上的论坛中,大家对于.net的讨论更加火热一些,而我们的同事从微软回来后告诉我,其实xml是一个比.net更好的东西.包括其中的xslt,其未来要远远比.net要好.   其实争论谁好谁坏本身是没有多大意思的,因为.net本身已经和xml紧密的结合在一起了.这里我就用xml代替数据,写一个新闻发布系统,希望能够起到抛砖引玉的作用,使更多的人能够了解这些最新的技术.   下面介绍这几

用asp.net和xml做的新闻更新系统(1)

asp.net|xml 读了很多关于.net的文章,也看了许多关于xml的资料,我已经深深的被他们的魅力所吸引.在网上的论坛中,大家对于.net的讨论更加火热一些,而我们的同事从微软回来后告诉我,其实xml是一个比.net更好的东西.包括其中的xslt,其未来要远远比.net要好. 其实争论谁好谁坏本身是没有多大意思的,因为.net本身已经和xml紧密的结合在一起了.这里我就用xml代替数据,写一个新闻发布系统,希望能够起到抛砖引玉的作用,使更多的人能够了解这些最新的技术. 下面介绍这几个文件.

用asp.net和xml做的新闻更新系统(2)

asp.net|xml 下面给大家看新闻列表显示的页面. news.aspx <%@ Import Namespace="System"%> <%@ Page Language="C#" Debug="true" codepage="936"%> <%@ Import Namespace="System.IO" %> <%@ Assembly Name="

用ASP.NET和XML做的新闻系统

asp.net|xml|新闻系统 这里我就用xml代替数据,写一个新闻发布系统,希望能够起到抛砖引玉的作用,使更多的人能够了解这些最新的技术.下面介绍这几个文件. contents.xml <?xml version="1.0" encoding="GB2312"?> <topiclist type="AspCool News"> <topic> <title>aspcool news!</t

用ASP.NET和XML做新闻系统

asp.net|xml|新闻系统 这里我就用xml代替数据,写一个新闻发布系统,希望能够起到抛砖引玉的作用,使更多的人能够了解这些最新的技术.下面介绍这几个文件. contents.xml <?xml version="1.0" encoding="GB2312"?> <topiclist type="AspCool News"> <topic> <title>aspcool news!</t

新闻更新系统(1)

作者:米仙圣人   功能:根据数据库中的内容自动更新新闻,   方法:从数据库News中自动读去新闻内容,数据库名称News.mdb      <!--#include file="conn.asp"-->   1:以下是conn.asp中的内容,作用是打开数据库.   <%   'on error resume next   Dim conn   'Dim Rs   Dim DBpath   set conn= server.createobject("A

新闻更新系统(3)

制作更新文件      作者:米仙圣人       更新文件是新闻维护者在本地写的一个程序,你可以采用多种工具来写,在这里作者是采用Delphi写的一个程序.在这里就不多做阐述.    更新文件的特点,是六个字段,每个字段中间用chr(255)分开了,供新闻自动更新时作为字段之间的标记.    对数据库稍加说明:   News_Issue 期号   News_ClassID 版面编号   News_Class 版面名称   News_Title 文章名称   News_Date 日期   New

新闻更新系统(2)

作者:米仙圣人   功能:在滚动文本框中添加一定的文本格式,来自动的更新数据库.   方法:数据库名称News.mdb      1:AddNews.asp.   Dim DBStr   DBStr=""   DBStr=Request.Form("tNewsIndex")   AddRecord(DBStr)   DBStr=Request.Form("tNewsIndex")是用来读取滚动文本框中的数据,调用DataModal.asp中的AD

asp.net-用asp。net+acces做一个仓库管理系统

问题描述 用asp.net+acces做一个仓库管理系统 10C 有一个登陆,再有一个连接数据库access 有添加删除 查询功能就行944027604·qqcom 解决方案 http://download.csdn.net/detail/yf634227739/2012634http://download.csdn.net/detail/xuhui19850808/329914http://wenku.baidu.com/link?url=G6XZBq4xPkGIbiWWCaMIS2UAkFv