毕业感慨

2008-5-31 寒川 点滴心情

    本来毕业是没什么感慨的,不就是毕业么?不就是要和一起生活过四年的同学分离么?有什么好感慨的。但是想到即将到达一个陌生的地方,回想一下大学里同学给过我的帮助,确实应该感慨一下。
   上学期的时候就见学长们分分告别,依依不舍的情节还在脑海中出现,就象昨天发生一样。如今我们也面临这么一天了。食堂外的小路上买各种各样书籍的离校学生形成了一条亮丽的风景线。
    毕业了没什么,在今后的人生中这样的分分离离必定还有很多。在这人海芒芒之中,即使走得再远,只要偶尔能想起曾经一起的朋友也是一种Happy.

标签: 心情 随笔 札记

评论(1) 浏览(7184)

用ASP+XML编写留言本

2008-5-30 寒川 网页编程

一、读者指引
 
读者指引帮助你掌握本文的梗概。以免你看了大半才明白这编文章不适合你,给你造成视觉污染。
 
如果你正在用ASP+XML写一些程序,或者你正在学XML那就值得一看。
 
阅读本文须具备的知识,对ASP有基本的了解,对XML和DOM有基本了解,如果你不了解那么你通过学习本文基本上能够撑握ASP+XML和DOM的应用,并能根据本文范写出自已更高级的ASP+XML程序。
 
二、基本思想
 
本文思想是基于用ASP和DOM来读取和存储XML数据,并利用XML数据来存储留言信息,达到同用数据库存储数据的功能。
 
三、XML留言本的优势
 
或许你会问用ASP+TXT文本也可以达到不用数据库实上留言的功能,不错确实能够做到,而且网上也有很多这样的留言本免费下载,但这里我要讲一下ASP+XML的优越性。
 
1、XML+ASP比ASP+TXT速度要快。可能你也发现当TXT文件很少时速度出奇的快,但是随着留言信息的增加TXT文本变大,速度却又是出奇的慢这就是ASP+TXT的弱点。当然我不能说ASP+XML就一定是出奇的快,但是比起ASP+TXT来说是快了许多,当然随着留言信息的增加XML文本增大速度也下降很快,但是比起TXT来说就还是好了许多(这一点可以从WAS测试证明读者可以自行测试),当然ASP+XML比不上数据库,因为数据库对查询做了特别的优化,而XML只是纯文本,在ASP建立对像是要把XML数据全部读入内存中,如果数据量大的话可想而知速度会慢下来。那你也许会问那我什么时候用关系数据库存储数据,又什么时候用XML存储数据呢?我这里也顺便提一下,就是当数据比较复杂无规率时用XML数据比较合适,还有就是你打算这些数据要在不同的操作系统上读取运用时那就是XML大显身手的时候了。如果你是普通的数据那么不到关键时刻或不支持数据库的空间时还是不要用XML文件来存储数据为好。
2、XML数据的易读取性,TXT文本是比较难操作的,我们必须一行一行的读取判断,而且很多功能无法实上,只能编制比较简单的留言本,而XML数据则不同了,利用DOM可以轻易的访问每一个节点,而不是TXT那些烦人的Readline() Witeline()了,我们可以随意的加入删除更新某一个我们感兴趣的节点,利用ASP或者JS或者数据岛都可以轻松实上这一点,当然我这里为发考虑兼容性,用了ASP来读取XML数据,而没有用数据岛来读取节点数据(因为只有IE5以上版本才支持数据岛技术)而用ASP来实上就不存在这些问了因为客户得到的是HTML文件。
 
3、XML数据夸操作系统性,只要我们把这些数据存储为XML那么这些数据就能被应何基它语言或系统所识别,而不用做应何改动。TXT显然不具备这些性能。例如我们在网上的留言信息可以直接被被转换成wap格式在手机上显示。
 
四、建立存储留言信息的XML文件(List.xml)
我们这里不打算使用DTD,因为我们这是我们自已编制并测试通过的XML数据,所以不需要DTD来验证(如果你对此感兴趣当然可以加一个这不影响程序的运行)。现在我们来看看建立一个留言本的基本要素
 
0、留言ID号--定义为<id>
 
1、用户名我们--定义为<username>
 
2、来自那里们--定义为<fromwhere>
 
3、留言时间定--义为<Posttime>
 
4、用户主页定--义为<homepage>
 
5、用户的信箱--定义为<email>
 
6、留言内容定--义为<text>
 
当然以上不是必须的读者可以自行命名并加减相关标签,把它们组合起来就得到List.xml的文件了
 
<?xml version="1.0" encoding="gb2312"?>
  <site>
   <NewList>
   <list>
   <id>1</id>
   <username>苛子</username>
   <fromwhere>中国广州</fromwhere>
   <Posttime>01-4-23 18:26:56</Posttime>
   <homepage>http://page2000.xiloo.com</homepage>
   <email>lucaihui@cmmail.com</email>
   <text>这是我的第一个XML文件</text>
   </list>
   </NewList>
</site>
五、建立显示XML数据的ASP文件(index.asp)
 
这个文件要实现的功能就是读取并显示XML数据,首先创建一个XML对像然后把XML读入内存中,利用DOM分离出我们所要的数据。
程序代码
<%
  strSourceFile = Server.MapPath("/") &"\List.xml"
  '获取XML文件的路径这里根据你的虚拟目录不同而不同
  Set objXML = Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
  '以自由线程创建一个XML对像
  objXML.load(strSourceFile)'把XML文件读入内存
  Set objRootsite = objXML.documentElement.selectSingleNode("NewList")
  '选取NewList节点
  %>
  <html>
  <head>
  <title>留言本</title>
  <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  <style type="text/css">
  <!--
  td { font-family: "宋体"; font-size: 9pt; text-decoration: none}
  a { font-family: "宋体"; font-size: 9pt; color: #0066CC; text-decoration: none}
  a:hover { color: #FF6600; text-decoration: underline}
  -->
  </style>
  </head><body bgcolor="#0099CC" text="#000000">
  <table width="80%" border="0" cellspacing="1" cellpadding="4" align="center" bgcolor="#CCCCCC">
  <tr bgcolor="#000000">
  <td colspan="2"><font color="#FFFFFF">留言溥 <a href="PostNew.asp"><font color=#FFFFFF>写新留言</font></a></font></td>
  </tr>
  <%
  PageSize =10'假设每页显示10条留言
  AllNodesNum =objRootsite.childNodes.length-1
  '获取子节点数据(因为是从节点数从0开始的所最大子节点数要减1)
  PageNum=AllNodesNum\PageSize+1'算出总页数
  PageNo=request.querystring("PageNo")
  if PageNo="" then'如果是每一次获得页面则定位到每一页显示最新的留言
  PageNo=PageNum
  end if
  StarNodes=PageNo*PageSize-1'获得起始节点
  EndNodes=(PageNo-1)*PageSize'获得结束节点
  if EndNodes<0 then
  EndNodes=0
  end if
  if StarNodes>AllNodesNum then'判断起始节点数是否超过总的节点数
  EndNodes=EndNodes-(StarNodes-AllNodesNum)
  '如果超过则结束节点要减去(StarNodes-AllNodesNum)的差值否则下标会超界出错
  StarNodes=AllNodesNum
  end if
  if EndNodes<0 then
  EndNodes=0
  end if
  while StarNodes>=EndNodes
  '从结束节点到超始节点之间读取节点数据
  username = objRootsite.childNodes.item(StarNodes).childNodes.item(1).text
  '获得用户名
  fromwhere = objRootsite.childNodes.item(StarNodes).childNodes.item(2).text
  '获得用户来自那里
  Posttime = objRootsite.childNodes.item(StarNodes).childNodes.item(3).text
  '获得留言时间
  homepage = objRootsite.childNodes.item(StarNodes).childNodes.item(4).text
  '获得用户主页
  email = objRootsite.childNodes.item(StarNodes).childNodes.item(5).text
  '获得用户Eamil
  text = objRootsite.childNodes.item(StarNodes).childNodes.item(6).text
  '获昨留言内容
 
  '*****************************************************************************
  '这里使作了XML的DOM来读取数据,显然objRootsite对像所对应的节点为<NewList>
  'objRootsite.childNodes.item(StarNodes)所对应的节点就是<list>节点因为不至一个<list>节点所以用了item()来识别当前节点数据,随着StarNodes的递减<list>节点根着往上移一个个读取<list>节点数据。
  'objRootsite.childNodes.item(StarNodes).childNodes.item(1).text所对应的节点为具体的每个节点的文本值,这里(1)所对应的就是username用户名(因为<list>节点的子节点才是我们真正所要的)
  '******************************************************************************
 
  text = replace(text,chr(13),"<br>")
  '替代回车
  text = replace(text,chr(32)," ")
  '替代空格
  %>
  <tr bgcolor="#F0F0F0">
  <td width="21%" height="94" valign="top">姓 名:<%=username%><br>
  来 自:<%=fromwhere%><br>
  </td>
  <td width="79%" height="94" valign="top"> | <a href="<%=homepage%>" target=_blank title="<%=username%>的主页">主页</a>
  | | <a href="mailto:<%=email%>" title="给<%=username%>写信">信箱</a> | |<font color="#CC6633">
  留言时间:<%=Posttime%> </font>|
  <hr>
  <%=text%> </td>
  </tr>
  <tr bgcolor="#FFFFFF" align="right">
  <td colspan="2"> </td>
  </tr>
  <%
  StarNodes=StarNodes-1
  wend
  set objXML=nothing
  %>
  <tr bgcolor="#FFFFFF" align="right">
  <td colspan="2"> 共有<<%=PageNum%>>页
  <%
  if cint(PageNo)<>PageNum then'分页
  response.write "<a href='index.asp?PageNo="&(PageNo+1)&"'>上一页</a>"
  end if
  if cint(PageNo)<>1 then
  response.write "<a href='index.asp?PageNo="&(PageNo-1)&"'>下一页</a> "
  end if
  %>
  </td>
  </tr>
  </table>
  </body>
  </html>

五、建立显示XML数据的ASP文件(index.asp)
 
这个文件要实现的功能就是读取并显示XML数据,首先创建一个XML对像然后把XML读入内存中,利用DOM分离出我们所要的数据。
 
六、建立写新留言程序(PostNew.asp)
 
这个文件要实现的功能就是写入新的XML节点,首先创建一个XML对像然后把XML读入内存中,利用appendChild()方法加入我们生成的XML节点。
程序代码
<%
  username=request.form("username")
  if username<>"" then
  fromwhere =request.form("fromwhere")
  homepage =request.form("homepage")
  email =request.form("email")
  text =request.form("text")
  text =replace(text,"<","<")
  Posttime =now()
  strSourceFile = Server.MapPath("/") &"\List.xml"
  '获取XML文件的路径这里根据你的虚拟目录不同而不同
  Set objXML = Server.CreateObject("Microsoft.XMLDOM")
  '创建XML对像
  objXML.load(strSourceFile)
  '把XML文件读入内存中
  Set objRootlist = objXML.documentElement.selectSingleNode("NewList")
  '选取<NewList>节点
  if objRootlist.hasChildNodes then
  '判断<NewList>是否有子节点(因为如果是每一次<NewList>是没有子节点的,
  ’ 如果不加判断在第一次运得时就会报错
  id = objRootlist.lastchild.firstchild.text+1
  '这里获得将要插入子节点的ID号,其ID号为<NewList>的最后一个子节点(lastchild)的第一个子节点(firstchild)的ID号加1(这里我们按照关系型数据库的ID号来递增)
  else
  '如是没有字子节点则是第一次留言ID号设为1
  id=1
  end if
  brstr=chr(13)&chr(10)&chr(9)
  '为了插入XML文件中的节点换行空格排列整齐
  ’(当然你也可以不用这样只是为了XML数据好看而以)
  XMLnode=brstr&"<list>"&brstr &_
  "<id>"&id&"</id>"&brstr &_
  "<username>"&username&"</username>"&brstr &_
  "<fromwhere>"&fromwhere&"</fromwhere>"&brstr &_
  "<Posttime>"&Posttime&"</Posttime>"&brstr &_
  "<homepage>"&homepage&"</homepage>"&brstr &_
  "<email>"&email&"</email>"&brstr &_
  "<text>"&text&"</text>"&brstr &_
  "</list>"&chr(13)
  '根据得到的数据建立XML片段
  set objXML2=Server.CreateObject("Microsoft.XMLDOM")
  '建立一个新XML对像
  objXML2.loadXML(XMLnode)
  '把XML版片段读入内存中
  set rootNewNode=objXML2.documentElement
  '获得objXML2的根节点
  objRootlist.appendChild(rootNewNode)
  '把XML片段插入到List.xml中
  objXML.save(strSourceFile)
  '存储lsit.xml文件(因为不存储List.xml只在内存中更新了)
  set objXML=nothing
  set objXML2=nothing
  response.write "谢谢您的留言"
  response.end
 
  end if
  %>
  <html>
  <head>
  <title>Untitled Document</title>
  <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  <style type="text/css">
  <!--
  td { font-size: 9pt}
  -->
  </style>
  </head>
  <body bgcolor="#0099CC" text="#000000">
  <table width="80%" border="0" cellspacing="1" cellpadding="4" align="center" bgcolor="#FFFFFF">
  <form action="PostNew.asp" method="post" name="form1">
  <tr bgcolor="#000000">
  <td colspan="2"><font color="#FFFFFF">新留言</font></td>
  </tr>
  <tr bgcolor="#EFEFEF">
  <td width="19%" align="right">姓 名:</td>
  <td width="81%">
  <input type="text" name="username">
  ** </td>
  </tr>
  <tr bgcolor="#EFEFEF">
  <td width="19%" align="right">来 自:</td>
  <td width="81%">
  <input type="text" name="fromwhere" value="中国">
  </td>
  </tr>
  <tr bgcolor="#EFEFEF">
  <td width="19%" align="right">主 页:</td>
  <td width="81%">
  <input type="text" name="homepage" value="http://">
  </td>
  </tr>
  <tr bgcolor="#EFEFEF">
  <td width="19%" align="right">Email:</td>
  <td width="81%">
  <input type="text" name="email">
  </td>
  </tr>
  <tr bgcolor="#EFEFEF">
  <td width="19%" align="right" valign="top">内 容:</td>
  <td width="81%">
  <textarea name="text" cols="60" rows="10"></textarea>
  </td>
  </tr>
  <tr bgcolor="#EFEFEF">
  <td width="19%" align="right"> </td>
  <td width="81%">
  <input type="submit" name="Submit" value="提交">
  <input type="reset" name="Submit2" value="重填">
  </td>
  </tr>
  </form>
  </table>
  </body>
  </html>

 

标签: 脚本 编程 asp xml

评论(0) 浏览(10768)

最近比较忙。。。

2008-5-23 寒川 点滴心情

     眼看快毕业了,最近特别的忙,都很少上来看看了。昨前天忙了几天整的,今天才有喘气的机会。准备忙完了建一个内容望站。在忙毕业论文的同时也在构思。在CMS的选择上确实花了很大工夫,但是还是不能确定要用什么CMS。本来觉得JTBC比较不错,但是它的望站布局全是talbe格式的,这种早都不流行了,而且对搜索引擎一点都不友好,随便打开一个也面都是上十个talbe,有的更多。但是说实在的,JTBC真的是个不错的CMS,小巧但是丰富,适合二次开发。我认为唯一的缺点就刚才说的,全篇的table让我心理很不舒服。本来想将里面的table换成div+css,但是难度确实有点大。而且现在没那个精力去弄。或许以后空了可以尝试一下。动易的系统过于庞大,让我有点望而生畏,不利于二次开发。新云这一后起之秀也不错。原先使用过。不过总的来说不及JTBC来得安逸。

标签: 心情 无聊 随笔 札记

评论(0) 浏览(11037)

毕业论文:生物柴油的合成

2008-5-23 寒川 点滴心情

    今天中午的时候老胡把我们叫到一起就毕业论文的写作问题开了一个简短的会。简短的会议带来的却是重大的变动。首先是我的字数都不够。他要求的是出绪论外,其他部分不得少于8,000个汉字。当我统计了我的之后,大感意外,离要求还差三、四千呢。而且论文中很多的要求也没达到。这下可又有一阵子得忙了。

标签: 心情 无聊 随笔 札记

评论(0) 浏览(6741)

地震,你还要不要我们活啊?

2008-5-17 寒川 点滴心情

   无情的地震,你TMD已经结束了上万人大生命,如今还不满意吗?还要来威胁我们?就刚刚你再次到来,死神的你就那么想制我们于死地么?我告诉你,我们不怕你,我们团结起来的力量是无穷的.有本事别拿山崩地裂来吓我们!瞧你那萎缩的样,还搞突然袭击,你以为我们人类就怕了你么?你错了.我们龙的传人不是那么的软弱.我们要与你战斗到底.
    今天晚上,我们为被你夺走的我们的同胞默哀,我静静地躺在床上,你似乎咆哮了,于是我们的宿舍害怕得颤抖了一下,但我要告诉你,地震,我们并不怕你.因为我们将更加团结,要与你奋战到底.

标签: 心情 无聊 随笔 札记

评论(1) 浏览(5907)

慈善,是以捐款少来体现的吗?

2008-5-15 寒川 点滴心情

八月十二日,四川省汶川县发生七点八级地震,伤亡人数现在增加,不幸遇难的都要快两万人了。
  面对如此天灾,社会各界分分捐钱出力,奋力营救灾区难民。然而,网上很多网友把名人捐钱的多少作为慈善的标志。这很让人气奋。比如某名星捐了几万元,而网友觉得以他的身份人气应该要捐得还要多一些,于是各大BBS,QQ群中网友分分抗议,BS并抵诽该名星。我不知道该怎么说这样做的人,但是我想说的是善款不应该区分多少。不论人家捐得或多或少,都应该值得我们尊敬,而不是诽谤。更不能用钱的多少来衡量慈善的大小。

标签: 心情 无聊 社会 随笔 札记

评论(0) 浏览(7147)

地震,人心惶惶。

2008-5-13 寒川 点滴心情

真的太恐怖了.似乎象生与死的别离.从来都没有过如此的恐慌.瞬间工夫全栋楼就炸开了,我翻爬起身就往外冲.人太怕死了,原来我也这么怕死的.真的好怕,怕在见不到我爱的人了.
  今天下午那场地震发生在四川汶川县,强度达7.8级,比唐山大地震都厉害.震荡波传到自贡都那么强烈.在五楼桌上上的显视器都晃动得十分厉害.据同学说图书管六楼天花板都砸他旁边.
  地震太厉害了.好害怕啊!!

标签: 心情 随笔 札记

评论(0) 浏览(5759)

Powered by emlog 蜀ICP备12030225号

川公网安备 51042102000001号

sitemap