仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 361|回复: 7
打印 上一主题 下一主题

[学习教程] ASP教程之ASP网页开辟过程当中的几个小技能

[复制链接]
简单生活 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:21:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
ASP最大的缺点在于网络的安全性和可靠性,企业将经营数据放在开放的平台上,最大的担忧就是如何保证这些数据不被其他人破坏。历程|技能|网页  择要:本文先容了用ASP举行网页计划过程当中的几个小技能,包含旧事栏的创立和主动更新,和通告栏的创立、利用和保护。指了然办理此类成绩的大抵办法。
  Abstract:WeintroduceseveraltrickswhenusingActiveServerPagestodesignhomepages.Theseincludethecreationandautomaticupdatingofnewscolumns,aswellasthecreation,utilizationandmaintenanceofbulletins.Thegeneralsolutionstotheseproblemsarepointedout.
  关头词:ASP、旧事栏、通告栏
  ASP是Microsoft公司推出的一种用以代替通用网关接口的手艺,英文全称ActiveServerPages。它是一个Web服务器真个运转情况。ASP自己包括了VBScript和javascript引擎,使得剧本能够间接嵌进HTML中。现将我们在ASP使用过程当中的几个小技能与人人分享。
  1、旧事栏
  年夜多半网页上有旧事栏,用以显现比来旧事的主题,点击此主题便可检察具体报导。倘使天天都一条条写在网页上,再顺次创建链接太甚贫苦。怎样让其能够依据文件主动更新呢?
  1.准备事情:
  1)建一个文件夹,起名为"news",假定存于D:/ASP/目次下;
  2)把每条旧事的具体内容写进文件,且此文件的定名情势为:x(newstime).htm。个中x为此条旧事的主题,newstime为此条旧事公布的工夫(按年-月-日按次写)。为何要如许写呢?看了上面的算法头脑和源程序就晓得了。
  2.算法头脑:关于news文件夹中的文件,根据它们文件名中旧事公布的工夫(即括号内的内  容),从年夜到小排序。如许一来,最新的旧事排在最下面,只需在网页响应地位显现news文件夹中最下面的多少个文件名,由于文件名的定名体例如1中所述,就能够在旧事栏中显现最新旧事了。
  3.源程序段(用VBScript编写的)
<%
Dimfs,f,f1,fc,filenum
dimcount
dimi,j,t1,t2
dimfile(100)
dimmystr(100)标记文件中日期的字符串
count=0
Setfs=CreateObject("Scripting.FileSystemObject")
Setf=fs.GetFolder("D:/ASP/news")
Setfc=f.Files
foreachf1infc
count=count+1计文件个数
file(count)=fs.getbasename(f1)标志文件基名
mypos=InStr(1,file(count),"("))在文件基名中的地位
文件基名中的日期字符串
mystr(count)=Mid(file(count),mypos+1,Len(file(count))-(mypos+1))
next
fori=1tocount
forj=1tocount-i
ifmystr(j)<mystr(j+1)then
t1=file(j)
file(j)=file(j+1
file(j+1)=t1
t2=mystr(j)
mystr(j)=mystr(j+1)
mystr(j+1)=t2
endif
next
next
j=1
ifcount<10then旧事栏中共显现10条旧事
temcount=count
else
temcount=10
endif
dowhilej<=temcount%>
<ahref="file:///D:/ASP/news/<%=file(j)%>.htm"target="new_window"><%=file(j)%></a>
<%
j=j+1
loop
%>
  4.旧事栏内容更新:
  只需养成优秀的誊写习气,使得旧事的称号依照1的请求,再把写好的文件存进news文件夹,旧事栏就会主动显现出最新的10条旧事了。
  2、通告栏
  除旧事栏以外,较经常使用的就是通告栏了,通告栏次要用来显现一些主要的关照。固然这些关照是要常常变更的。让用户每次变动通告内容时都到源程序里往修正吗?固然不可,我们必需供应一个保护的界面给用户,使得用户只需输出关照,网页上的通告栏里天然就会显现关照内容了。
  1.办理这一成绩的关头在于天真使用FileSystemObject工具和TextStream工具。在实践使用中,你无需自行创建TextStream工具,由于只需使用FileSystemObject工具翻开了文件,体系便主动创建TextStream工具。也就是说,一旦挪用OpenTextFile或CreateTextFile办法,便会传回TextStream工具。
  2.所需相干文件有三个:更新.asp、通告.asp、保护文本.txt,把它们存进d:/ASP/maintain目次下。
  3.三个文件的次要功效和源程序段:
  1)更新.asp
  次要功效是让用户输出欲显现的通告,查验输出内容是不是为空,若不为空,则提交给”通告.asp”程序处置。
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<metaname="GENERATOR"content="MicrosoftFrontPage4.0">
<metaname="ProgId"content="FrontPage.Editor.Document">
<title>更新通告栏内容</title>
</head>
<body>
<scriptlanguage=vbscript>
functiondatacheck()
dimmsg,errflag
errflag=true
iflen(trim(maintain.t1.value))=0then
focusto(0)
errflag=false
msg="请输出需提交的通告内容"
endif
if(errflag=false)then
msgboxmsg,64,"ohno!"
exitfunction
endif
datacheck=errflag
maintain.submit
endfunction
subfocusto(x)
document.maintain.elements(x).focus()
endsub
</script>
①<formmethod="POST"action="通告.asp"name="maintain">
<p><inputtype="text"name="t1"size="84"><inputtype="reset"value="重写"name="B2">
<inputtype="button"value="提交"name="B1"></p>
<hrcolor=#FF99FFsize=1>
</form>
</body>
</html>
  语句①中的action="通告.asp"部分,指出了在form提交后要启动的程序为“通告.asp”。
  2)通告.asp
  经由过程FileSystemObject工具和TextScream工具对"保护文本.txt"文件举行读写操纵,使得此文件最下面5行的内容为要在通告栏里显现的通告。
<%
dimstr
str=request.form(t1)
dims(5)
constforreading=1,forwriting=2
dimfso,myfile
setfso=server.createobject("scripting.FileSystemObject")
setmyfile=fso.opentextfile("保护文本.txt",forreading)以Reading形式翻开文件
fori=1to5通告栏共显现5条通告
s(i)=myfile.readline读取文件内容
next
myfile.close
setmyfile=fso.opentextfile("保护文本.txt",forwriting,true)以writing形式翻开文件
myfile.writelinestr
fori=1to4
myfile.writelines(i)将数据写回文件
next
myfile.close
%>
  3)保护文本.txt
  此文件入手下手为空,从”更新.asp”显现的界面输出通告后,此文件内容被主动写进。
  4.在主页文件(一般是default.asp)欲显现通告地位的代码段中到场以下代码,便可显现出更新后的通告。
<marqueescrollamount="2"scrolldelay="50"direction="up"width="223"height="133"id="a">通告栏高低转动
<%
Dims(20)
Dimfso,MyFile
Setfso=CreateObject("Scripting.FileSystemObject")
SetMyFile=fso.OpenTextFile("D:/ASP/maintain/保护文本.txt",1,true)
fori=1to5
ReadLineTextFile=MyFile.ReadLine
s(i)=ReadLineTextFile
response.write"★ "&s(i)
response.write"<br>"
next
%>
</marquee>
  上述两个小技能触类旁通,能够办理良多此类成绩。网页计划喜好者们无妨一试。
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。
再现理想 该用户已被删除
沙发
发表于 2015-1-19 09:26:28 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
飘飘悠悠 该用户已被删除
板凳
发表于 2015-2-2 11:29:01 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
只想知道 该用户已被删除
地板
发表于 2015-2-7 19:10:47 | 只看该作者
下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
再见西城 该用户已被删除
5#
发表于 2015-2-23 01:55:00 | 只看该作者
封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
分手快乐 该用户已被删除
6#
发表于 2015-3-7 05:32:52 | 只看该作者
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
飘灵儿 该用户已被删除
7#
发表于 2015-3-14 13:48:57 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
柔情似水 该用户已被删除
8#
发表于 2015-3-21 09:41:07 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 10:46

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表