ASP编程：另外一种显示文章体系的思绪-1
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.显示 如今良多人用Access数据库完成文章显示体系,因为Access数据库自己的缺点,用一个字段寄存文章内容,我觉得关于会见量大,文章数量多的网站,很轻易发生毛病,此举是极不明智的,经由实践对照,笔者得出另外一种完成文章体系的办法,那就是采
用Access+文本文件 的形式.个中Access数据库用来存每篇文章的普通信息,而文本文件用来寄存详细文章内容.详细完成方
法完成以下:
先用Access创立一个数据库wzozg,外面只要一个表ozg,寄存文章普通信息,字段以下:
字段名 类型 寄义
wid 主动编号 文章id号
wsubject 文本 文章题目
wname 文本 寄存文章内容的文本文件名
wcount 数字 文章会见次数
wdate 工夫 文章到场工夫
wauth 文本 文章作者
wsource 文本 文章来历
'个中wid与wname独一对应,如wid=10,则wname="wz-10.asp",若wid=n,则wname="wz-n.asp"
以下是文章添加,删除,和完成文章题目列表显示,每篇文章详细内容显示的关头代码段:
1.文章添加
1)wzadd.html
<form method="post" action="add.asp">
<p>文章题目:<input name="isubject" size="45" maxlength="30"></p>
<p>文章作者:<input name="iauth" size="45" maxlength="30"></p>
<p>文章来历:<input name="isource" size="45" maxlength="30"></p>
<p>文章内容:</p>
<textarea cols="80" name="icontent" rows="16"wrap="VIRTUAL"></textarea></p>
<p><input type="submit" value="完 成" name="submit">
<input type="reset" value="重 写" name="reset"></p>
</form>
2)add.asp
<%sj=now() '前往体系工夫
isubject= Request.Form("isubject")
icontent = Request.Form("icontent")
iauth= Request.Form("iauth")
isource = Request.Form("isource")
dim xwzlr()
n=0
for i = 1 to len(icontent)
zh =mid(icontent,i,1)
xzh=server.htmlencode(zh) '使字符不撑持html语法
redim preserve xwzlr(n)
xwzlr(n)=lrtemp '使add.html中表单form中textarea一行一行分离存在数组中
if asc(xzh)=10 then
n=n+1
lrtemp=""
redim preserve xwzlr(n)
end if
lrtemp = lrtemp + zh
next
'毗连数据库
set dbconn=server.createobject("adodb.connection")
conpath="DBQ=" &server.mappath("wzozg.mdb")
dbconn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & conpath
'新增文章
iozg="wz-"
sql="INSERT INTO ozg(wsubject,wname,wcount,wdate,wauth,wsource) Values
('"&isubject&"','"&iozg&"',0,'"&sj&"','"&iauth&"','"&isource&"')"
dbconn.Execute(sql)
sql="update ozg set wname='wz-'&cstr(wid)&'.asp' " '若文章id=n (n=0,1,2,...),则使 寄存文章内容的文本文件
名为 "wz-n.asp",即id号与文本文件名独一对应
dbconn.Execute(sql)
sql="select wcontent from ozg "
set rs=server.createobject("adodb.recordset")
rs.open sql,dbconn,3,1
rs.movelast
iozg=rs("wcontent") '获得文本文件名"wz-n.asp"
rs.close
dbconn.Close
thisfile = server.mappath(iozg)
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set outfile = fs.CreateTextFile(thisfile) '创建文本文件"wz-n.asp" (n=0,1,2,...)
for i=0 to n step 1
outfile.WriteLine xwzlr(i) '把数组中的文章内容逐行写入文本文件"wz-n.asp"中
next
outfile.close
set fs=nothing
%>
---------------------------------------------------
writen by aspboy and powered by http://easp.126.com
</p>缺点:安全性不是太差了，还行，只要你充分利用系统自带的工具;唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。 它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的? 代码的可重用性差：由于是面向结构的编程方式，并且混合html，所以可能页面原型修改一点，整个程序都需要修改，更别提代码重用了。 跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组 从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了 Session:这个存储跟客户端会话过程的数据，默认20分钟失效 交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。 Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 接下来就不能纸上谈兵了，最好的方法其实是实践。实践，只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好，因为你还没有熟练的能力去综合各种技术，这样只能使你自己越来越迷糊。 虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。 那么，ASP.Net有哪些改进呢？ 最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。 它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。
页:
[1]