厦门人才网个人登录,国内好的seo,织梦网站栏目是做什么用的,淄博百度推广1.1动态网站的优点
•动态网站可以实现交互功能#xff0c;如用户注册、信息发布、产品展示、订单管理等等#xff1b;
•动态网页并不是独立存在于服务器的网页文件#xff0c;而是浏览器发出请求时才反馈网页#xff1b;
•动态网页中包含有服务器端脚本#xff0c;所…
1.1动态网站的优点
•动态网站可以实现交互功能如用户注册、信息发布、产品展示、订单管理等等
•动态网页并不是独立存在于服务器的网页文件而是浏览器发出请求时才反馈网页
•动态网页中包含有服务器端脚本所以页面文件名常以ASP、jsp、php等为后缀
•动态网页由于需要数据库处理所以动态网站的访问速度大大减慢
•动态网页由于存在特殊代码所以不易被搜索引擎检索. 1.2 ASP概述
做动态网站我选择用ASP语言编写. ASP是Active Server Page的缩写意为“活动服务器网页”.ASP是微软公司开发的代替CGI脚本程序的一种应用,它可以与数据库和其它程序进行交互是一种简单、方便的编程工具.ASP的网页文件的格式是.ASP现在常用于各种动态网站中. ASP是一种服务器端脚本编写环境可以用来创建和运行动态网页或Web应用程序.ASP网页可以包含HTML标记、普通文本、脚本命令以及COM组件等.利用ASP可以向网页中添加交互式内容如在线表单也可以创建使用HTML网页作为用户界面的web应用程序. 与HTML相比ASP网页具有以下特点 1利用ASP可以实现突破静态网页的一些功能限制实现动态网页技术 2ASP文件是包含在HTML代码所组成的文件中的易于修改和测试 3服务器上的ASP解释程序会在服务器端制定ASP程序并将结果以HTML格式传送到客户端浏览器上因此使用各种浏览器都可以正常浏览ASP所产生的网页 4ASP提供了一些内置对象使用这些对象可以使服务器端脚本功能更强.例如可以从web浏览器中获取用户通过HTML表单提交的信息并在脚本中对这些信息进行处理然后向web浏览器发送信息 5ASP可以使用服务器端ActiveX组件来执行各种各样的任务例如存取数据库、发现哦那个Email或访问文件系统等. 6由于服务器是将ASP程序执行的结果以HTML格式传回客户端浏览器因此使用者不会看到ASP所编写的原始程序代码可放置ASP程序代码被窃取. 1.3 ASP工作环境 ASP需要运行在PWS或IIS下.PWS或IIS服务在windows98或windows2000的光盘上附带着可以通过“添加/删除程序”中的“添加/删除windows组件”来安装. 一般ASP需与access数据库或SQL Server数据库结合使用编出功能强大的程序. 能够运行ASP的web服务器软件 Windows2000默认安装的是IIS5.0(internet information server)而windows xp默认安装的是IIS5.1windows 2003默认安装的IIS6.0. PWS(personal web server)运行在windows98环境下的简单个人网页服务器 1.4 ASP工作原理 当在Web站点中融入ASP功能后将发生以下事情 1、用户向浏览器地址栏输入网址默认页面的扩展名是.ASP. 2、浏览器向服务器发出请求. 3、服务器引擎开始运行ASP程序. 4、ASP文件按照从上到下的顺序开始处理执行脚本命令执行HTML页面内容. 5、页面信息发送到浏览器. 1.5 ASP技术特点 ASP( Application Service Provider,应用软体租赁服务提供者 )即是指「透过网路以租赁方式提供应用软体服务的业者」,即是指业者以应用软体为主体,透过网路一对多地传递服务,这种以服务为主的交易模式促使企业可藉由租赁的方式,以更符合成本效益的方式拥有软体的使用权,并且亦能因为业者集中式的管理而大幅降低企业维护的成本.
基本上,ASP即具有「软体服务化,服务网路化」,「资讯委外服务与网路结合」与「产品通路化,通路产品化」等三大特性,其甚至可以被视为是ISPInternet Service Provider与ITSInformation Technology Service的结合. ASP的英文是Application Service Provider中文的标准翻译就是“应用服务提 供商”是指为商业或者个人客户提供管理应用解决方案的公司或者企业.最近 ASP被媒体炒做十分火热不是IT行业的人面对一堆技术名词专业术语很难弄清楚ASP的内容本文试图用浅显的语言来为广大的读者揭开ASP神秘的面纱对于IT行业的大热门ASP领域有一些基本的认识. 1. ASP是什么东西 简单地讲ASP就是为客户提供服务的服务商它和会计事物所、婚姻介绍所没有什么本质方面的区别.不同的是ASP主要是通过INTERNET国际互联网络作为主要工作和业务工具采用一对多的方式向企业、公司提供标准化的应用软件以及相关的技术咨询、管理租赁的服务ASP的概念最早是1998年由美国人提出来的.目前被全球各大IT厂商看好并被认为是可以推动网络经济发展的有稳固基础的第三种网络商业模式. 和传统的外包服务Outsourcing相比ASP的主要区别在于ASP是一对多的经营模式提供的服务有兼容性和可协调性并且ASP的收费方式一般是按月收费.
业界认为ASP一般有这样一些“成员”电信运营商、传统IT服务厂商、互联网络接入服务商ISP、独立软件供应商ISV、系统集成商和单纯的ASP公司. 根据流行的观点ASP有如下五个核心内涵 a. ASP着重应用为中心提供对于应用方面的访问和管理.
b. ASP服务可以为用户提供没有在服务器、人员、系统和系统授权等前期资源投入情况下就可以在“定制”的全新应用系统环境进行访问的服务如ISP而这样的服务一般按月份ASP收取服务费.
c. ASP采用集中管理的方式---ASP一般都有一个管理中心所有的客户通过INTERNET来进行远程访问获得技术支持和咨询服务.
d. 一对多的服务也就是讲ASP提供的是标准化的产品包产品都是最低程度的自定义或者没有实现客户定制化对于行业用户来讲已经达到实用方便的标准.
e. 按照合同交付在ASP客户的眼中ASP是一家根据客户协议内容提供相关服务保证应用服务系统服务可以得到确实履行的机构. 2. ASP为什么会火 从大的方面来讲困扰国内企业生存、发展的核心问题是管理问题.随着互联网络的普及和应用的深入企业用户可以随时随地直接租用ASP的服务器和软件系统来进行自己的业务管理这样做的好处在于第一企业可以节省大笔用于IT建设方面的资金大幅度降低企业管理信息化的成本.第二ASP的用户可以采用各种方式获得应用和服务软件类服务产品完全可以通过网络在非常短的时间内组成一个完善的、高效的、先进的企业管理系统迅速获得企业一体化的运营管理方案. 网络经济发展突飞猛进电子商务一日千里网络和网站从门户到内容、从注意力到垂直性目前逐渐转向热衷ASP也是一个主要的原因. 笔者资料中国内最早对ASP触电的是网友“飞鸟”在1998年6月自发组织了研究、交流和探讨ASP技术的“飞鸟之家”现在已经发展成为chinaASP.com成为国内最早的ASP应用技术服务提供商网站.上海的互易网络有限公司结合国内实际情况推出了为国内企业服务的ASP平台互易网向企业提供以电子商务为核心的企业内、外部网络设施和应用的远程构架和托管服务创造虚拟企业门户EP直接将ASP应用到商业增殖环节中去. 此外ISP也全面转向ASP的怀抱成为ISP进一步发展的产物.软件商对于ASP更是情有独钟.业界最新的消息是中国第三电信“网通”已经制定ASP发展战略国内最大的管理咨询公司“汉普”将把旗下八个子公司定位在企业内部资源计划管理ERP领域的ASP中北京“联成互动”瞄准客户关系管理CRM领域的ASP北京“数码方舟”定位在网络办公的ASPHP正在和中国建设银行讨论共建金融领域的ASP. ASP正在IT经济大潮中显山露水其发展前景不可估量. 3. ASP的发展阶段和面临的问题 以网络服务商、软件厂商和ISP为主力的各种IT角色正在根据自己的优势条件出发对ASP领域进行多种方面的尝试.就目前阶段来讲ASP提供的服务不计其数五花八门没有标准化和量化的概念硬件厂商向ASP的“土壤”和势力方向靠拢软件厂商和ISP则直接参与到ASP业务的第一线. 笔者估计经过一段时间的试探和发展ASP将向服务集成方面发展产品和服务初步的标准化将很快建立起来接着进入到市场细化和标准制定、ASP产品成熟时期ASP的稳步增长最终将成为IT行业商务模式的核心 目前在ASP发展的道路上主要面临的问题是观念的转变方面用租赁代替购买服务集成代替产品经销商、服务经济代替产品经济等等.具体到实际方面来讲安全和服务的质量是ASP和客户共同关心的头等大事要实现ASP提出的“租赁高科技”的口号ASP任重而道远 1.6 ASP内置函数 1日期/时间函数 这些函数包括对“年”、“月”、“日”、“时”、“分”、“秒”、“星期”等的显示. 1Now函数根据计算机系统设定的日期和时间返回当前的日期和时间值.使用方法now() 2Date函数只返回当前计算机系统设定的日期值.使用方法date() 3Time函数只返回当前计算机系统设定的时间值.使用方法time() 4Year函数返回一个代表某年的整数.使用方法year(date)其中date参数是任意的可以代表日期的参数比如“year(date())”就表示是从“date()”得出的日期中提取其中“年”的整数. 另外还可以这样应用“year(#5 20,2006#)”表示提取“2006年5月20日”中“年”的整数值.关于“5 20,2006”也可使用“5-20-2006”、“5/20/2006”等形式表现即“某月某日”和“某年”的组合.同时注意使用“#”进行包括以表示日期值. 5Month函数返回1到12之间的整数值表示一年中某月.使用方法month(date).关于参数date的说明和year函数相同.但要注意日期的正确性比如“#13-31-2006#”根本就没有“13”月肯定是错误的了. 6Day函数返回1到31之间的整数值表示一个月中的某天.使用方法day(date).关于参数date的说明和year函数相同.同样要注意日期的正确性比如“#2-30-2006#”其中对“2”月定义的“30”日这天就是错误的. 7Hour函数返回0到23之间的整数值表示一天中的某个小时.使用方法hour(time).其中参数time是任意的可代表时间的表达式.比如“hour(time())”就表示是从“time()”得出的时间中提取其中“小时”的整数.同样参数time还可以这样应用“hour(#11:45:50#)”表示从“11”时“45”分“50”秒中提取当前小时数.当然定义的时间要符合时间的规范. 8Minute函数返回0到59之间的整数值表示一小时中的某分钟.使用方法minute(time).time参数的说明和hour函数相同. 9Second函数返回0到59之间的整数值表示一分钟中的某秒.使用方法second(time).time参数的说明和hour函数相同. 10Weekday函数返回一个星期中某天的整数.使用方法weekday(date).关于参数date的说明和year函数相同.该函数返回值为“1”到“7”分别代表“星期日”、“星期一”……“星期六”.比如当返回值是“4”时就表示“星期三”. 11WeekDayName函数返回一个星期中具体某天的字符串.相对weekday函数而言即翻译出“星期几”使用方法weekdayname(weekday).参数weekday即星期中具体某天的数值.比如“weekdayname(weekday(date()))”就表示当前是“星期几”.因为“date()”表示的是当前的时间而“weekday(date())”就表示的是一星期中具体某天的整数. 当然weekdayname函数最终显示的字符串内容还与当前操作系统语系有关比如中文操作系统将显示“星期一”这类的中文字符而英文操作系统则显示为“Mon”Monday简写. 此外在VBScript中还有一些关于时间间隔的计算函数 1DateAdd函数返回指定时间间隔的日期、时间.可以计算出相隔多少年、或相隔几个月、又或相隔几个小时等的新日期、时间.使用方法dateadd(interval, number, date). 其中参数interval表示需要添加的时间间隔单位.其是以字符串的形式表达的比如“yyyy”表示年“q”表示季度“m”表示月份“d”表示天数“ww”表示周数“h”表示小时数“n”表示分钟数“s”表示秒数. 而参数number则表示添加的时间间隔数.其是以数值的形式表达的可以为负值.参数date则要求是日期、时间的正确格式. 比如dateadd(d,100,2006-5-20)就表示2006年5月20号以后的100天的日期值2006-8-28.再比如dateadd(h,-12,2005-5-20 10:00:00)就表示2005年5月20号上午10点前的12小时的日期时间2005-5-19 22:00:00. 2DateDiff函数返回两个日期时间之间的间隔.可计算出两个日期相隔的年代、小时数等.使用方法datediff(interval,date1,date2). 参数interval和dateadd函数中的interval参数内容描述相同date1和date2参数分别就是相互比较的两个日期时间.另外当date1的日期时间值大于date2时将显示为负值. 比如DateDiff(yyyy,1982-7-18,date)表示某人的出生到现在已经多少年了.又比如DateDiff(d,1982-7-18,2062-7-18)则计算了80年过了多少天29220. 2字符串处理函数 在脚本的功能处理中通常需要对一些字符串进行一些修饰性处理.比如过滤掉字符串中的敏感字眼以符合最终显示的要求又比如一段较长的字符串需要提取开头的几个字符时. 1Asc函数返回字符串中第一个字母对应的ANSI字符代码.使用方法asc(string).其中string参数表示字符串. 2Chr函数返回指定了ANSI 字符代码对应的字符.使用方法chr(chrcode).参数chrcode是相关的标识数字.该函数的功能和asc函数形成对应. 比如asc(“a”)表示小写字母“a”的ANSI 字符“97”同样chr(97)表示的就是“小写字母a”.另外chr(chrcode)中参数chrcode值为0到31的数字时表示不可打印的ASCII码.比如“chr(10)”表示换行符“chr(13)”表示回车符等这常用于输入和显示格式的转换中. 3Len函数返回字符串内字符的数目字节数.使用方法len(string).比如len(“love”)的值就是4. 4LCase函数返回所有字符串的小写形式.使用方法lcase(string).比如lcase(“CNBruce”)返回为“cnbruce”. 5UCase函数返回所有字符串的大写形式.与lcase函数形成对应.同样ucase(“CNBruce”)返回为“CNBRUCE”. 6Trim函数、LTrim函数和RTrim函数分别返回前导和后续不带空格、前导不带空格或后续不带空格的字符串内容.比如 trim(“ cnbruce ”)返回为“cnbruce”前导和后续都不带空格
ltrim(“ cnbruce ”)返回为“cnbruce ”前导不带空格;
rtrim(“ cnbruce ”)返回为“ cnbruce”后续不带空格 该函数常用于注册信息中比如确保注册用户名前或后的空格. 7Left函数返回从字符串的左边算起的指定数目的字符.使用方法left(string,length).比如left(“brousce”,5)返回为“brous”即前五位字符. 8Right函数返回从字符串的左边算起的指定数目的字符.使用方法right(string,length).比如right(“brousce”,4)返回为“usce”即后四位字符. 9instr函数返回某字符串在另一字符串中第一次出现的位置.比如现在查找字母“A”在字符串“A110B121C119D1861”中第一次出现的位置则可以 instr(my_string,A110B121C119D1861) 10Mid函数从字符串中返回指定数目的字符.比如现在的“110”则应该是从字符串“A110B121C119D1861”的第2位取得3个单位的值mid(A110B121C119D1861,2,3) 11Replace函数在字符串中查找、替代指定的字符串.replace(strtobesearched,strsearchfor,strreplacewith)其中strtobesearched是字符串strsearchfor是被查找的子字符串strreplacewith是用来替代的子字符串.比如 replace(rscon,,) 则表示将rscon中所有“”的字符替换为“” 3类型转换函数 Cbool(string) 转换为布尔值
Cbyte(string) 转换为字节类型的值
Ccur(string) 转换为货币类值
Cdate(string) 转换为日前类型的值
Cdbl(string) 转换为双精度值
Cint(string) 转换为整数值
Clng(string) 转换为长整型的值
Csng(string) 转换为单精度的值
Cstr(var) 转换为字符串值
Str(var) 数值转换为字符串
Val(string) 字符串转换为数值 4运算函数 Abs(nmb) 返回数子的绝对值
Atn(nmb) 返回一个数的反正切
Cos(nmb) 返回一个角度的余炫值
Exp(nmb) 返回自然指数的次方值
Int(nmb) 返回数字的整形进位部份
Fix(nmb) 返回数字的整形舍去部份
Formatpercent(表达式) 返回百分比
Hex(nmb) 返回数据的16进制数
Log(nmb) 返回自然对数
Oct(nmb) 返回数字的8进制数
Rnd 返回大于“0”而小于“1”的随机数但此前需 randomize 声明产生随机种子
Sgn(nmb) 判断一个数字的正负号
Sin(nmb) 返回角度的正铉值
Sqr(nmb) 返回数字的二次方根
Tan(nmb) 返回一个数的正切值 5其他函数 IsArray(var) 判断一个变量是否是数组
IsDate(var) 判断一个变量是否是日期
IsNull(var) 判断一个变量是否为空
IsNumeric(var) 判断表达式是否包含数值
IsObject(var) 判断一个变量是否是对象
TypeName(var) 返回变量的数据类型
Array(list) 返回数组
Split(liststr) 从一个列表字符串中返回一个一维数组
LBound(arrayP 返回数组的最小索引
Ubound(array) 返回数组的最大索引
CreateObject(class) 创建一个对象
GetObject(pathfilename) 得到文件对象 1.7 ASP中Application和Session对象 一、Application对象的成员概述 Application对象成员包括Application对象的集合、方法和事件. ⒈Application对象的集合 Contents集合没有使用元素定义的存储于Applicaiton对象中的所有变量的集合
StaticObjects:使用元素定义的存储于Application对象中的所有变量 的集合 例在default.ASP中有如下赋值
application(a)a
application(b)128
application(c)false 则有contents集合
application.contents(1)a 也可写为application.contents(a)a
application.contents(2)128 也可写为application.contents(b)128
application.contents(3)false 也可写为application.contents(c)false 在此笔者推荐你在调用时使用类如application.contents(a)的方法因为这样更为直观如果用序号来表示的话则要考虑赋值的先后顺序. ⒉Application对象的方法 Contents.Remove(变量名)从Application.Contents集合中删除指定的变量
Contents.RemoveAll() 把Application.Contents集合中的所有变量删除
Lock() 锁定Application对象使得只有当前的ASP页对内容能进行访问
Unlock() 解除对Application对象的锁定 例在default.ASP中
application(a)a
application(b)128
application(c)false
response.write application.contents(1) response.write application.contents(2) response.write application.contents(3) response.write After Remove b:
application.contents.remove(b)
response.write application.contents(1) response.write application.contents(2) 执行结果
a
128
False
After Remove b:
a
False 如果要删除集合中所有变量用application.contents.removeall即可至于Lock和Unlock方法在实际中经常用到读者也比较熟悉在此就不在累赘. ⒊Application对象事件 OnStart第一个访问服务器的用户第一次访问某一页面时发生
OnEnd 当最后一个用户的会话已经结束并且该会话的OnEnd事件所有代码已经执行完毕后发生或最后一个用户访问服务器一段时间一般为20分钟后仍然没有人访问该服务器产生. 想要定义application对象的OnStart和OnEnd事件里做什么需要将代码写在Global.asa这个文件里下文有举例并且将该文件放在站点的根目录下一般是Inetpub\wwwroot\ 二、Session对象的成员概述 Session对象的成员比Application对象多一项属性即集合、属性、方法、事件 ⒈Session对象的集合 Contents 没有使用元素定义的存储于特定Session对象的所有变量的集合.
StaticObject使用元素定义的、存储于Session对象中的所有变量的集合. 例在default.ASP中有如下赋值
session(a)a
session(b)128
session(c)false 则有contents集合
session.contents(1)a 也可写为session.contents(a)a
session.contents(2)128 也可写为session.contents(b)128
session.contents(3)false 也可写为session.contents(c)false ⒉Session对象的属性 CodePage: 可读/可写.整型.定义用于在浏览器中显示页内容的代码页.代码页是字符集的数字值不同的语言使用不同的代码页.例如ANSI代码页为1252日文代码页为932简体中文代码页为936.
LCID : 可读/可写.整型.定义发送给浏览器的页面地区标识.LCID是唯一地标识地区的一个国际标准缩写例如2057定义当前地区的货币符号是.
SessionID: 只读.长整型.返回本会话的会话标识符.每创建一个会话由服务器自动分配一个标识符.可以根据它的值判断两个用户是谁先访问服务器.
Timeout : 可读/可写.整型.为会话定义以分钟为单位的超时限定.如果用户在这个时间内没有刷新或请求任何一个网页则该用户产生的会话自动结束.缺省值是20.
以上属性在实际应用中作用不大而且基本上不需要怎么修改这几个属性也没什么特殊的地方. ⒊Session对象的方法 Contents.Remove(变量名): 从Session.contents集合中删除指定的变量
Contents.Removeall() : 删除Session.contents集合中的所有变量
Abandon() : 结束当前用户会话并且撤消当前Session对象.
Session对象的Contents.Remove(变量名)和Contents.Removeall()方法与Application对象的基本上没什么区别为帮助理解大家可以参照上面的例子将Application改为Session.这里要说明一下的是Contents.Removeall()和Abandon()的区别执行这两个方法都会释放当前 用户会话的所有Session变量不同的是Contents.Removeall()单纯地释放Session变量的值而不终止当前的会话而Abandon()除了释放Session变量外还会终止会话引发Session_OnEnd事件希望大家注意两者的区别. ⒋Session对象的事件 OnStart: 当ASP用户会话产生时触发一旦有任一用户对本服务器请求任一页面即产生该事件.
OnEnd : 当ASP用户会话结束时触发当使用Abandon()方法或超时也会触发该事件. 这两个事件和Application的OnStart、OnEnd事件一样也是必须放在Global.asa文件里下
面就重点和大家研究一下这四个事件的使用. 三、Global.asa ASP的Application和Session对象体现了其他ASP内置对象所没有的特征--事件.每一个访客访问服务器时都会触发一个OnStart事件第一个访客会同时触发Application和Session的OnStart事件但Application先于Session每个访客的会话结束时都会触发一个OnEnd事件最后一个访客会话结束时会同时触发Application和Session的OnEnd事件但Session先于Application. OnStart和OnEnd这两个事件一般应用在虚拟社区中统计在线人数、修改用户的在线离线状态等.要具体定义这两个事件需要将代码写在Global.asa文件并将该文件放在站点的根目录下缺省是\Inetpub\wwwroot\.另外Application和Session对象规定了在OnEnd事件里除了Application对象外其他ASP内置对象Response、Request、Server、Session...一概不能使用.以下举一个虚拟社区统计在线人数的例子来说明如何使用这两个事件. 文件说明
global.asa 位于d:\Inetpub\wwwroot\目录下
default.ASP 位于d:\Inetpub\wwwroot\目录下虚拟社区登录页面
login.ASP 位于d:\Inetpub\wwwroot\目录下用于检测用户输入的用户名及密码
index.ASP 位于d:\Inetpub\wwwroot\目录下虚拟社区首页
bbs.mdb 位于d:\Inetpub\wwwroot\目录下存储用户信息的数据库 数据库ACCESS结构
bbs表
id 用户ID长整型
name 用户名文本型
code 密码文本型
online 在线状态是/否 global.asa script LANGUAGEVBScript RUNATServer
Sub Application_OnStart
application(online)0
End Sub
sub Application_OnEnd
nd Sub
Sub Session_OnStart
End Sub
Sub Session_OnEnd
if session.contents(pass) then 判断是否为登录用户的Session_OnEnd
application.lock
application(online)application(online)-1
application.unlock
end if
End Sub /script
login.ASP
......密码验证连接数据库检测用户输入的用户名及密码是否正确
if 密码验证通过 then
session(name)rs(name)
session(id)rs(id)
session(pass)true
else
rs.close
conn.close
response.write 密码错误
response.end
end if
application.lock
application(online)application(online)1
conn.Execute (update bbs set online1 where idsession(id))将用户的状态设为在线
application.unlock
rs.close
conn.close
response.redirect index.ASP 初始化数据后跳转到社区首页 在本例中用application(online)变量记录已经登录社区的在线人数因为一旦有用户访问服务器而不管用户是否登录都会产生OnStart事件所以不能在OnStart事件里使Applicaiton(online)加一.因为不管是否是登录用户的会话结束都会产生OnEnd事件假如有访客访问了服务器但并不登录社区他的会话结束后也会产生OnEnd事件所以在Session_OnEnd事件里用了句if语句来判断是否为已登录用户的OnEnd事件如果是才将在线人数减一. 这只是一个统计在线人数的简单例子对于一个完整的虚拟社区来说仅仅统计有多少人在线是不够的在本例中数据库里有个online字段是用来记录用户的在线状态用户登录的时候在login.ASP里将online设为1但用户离线时并没有将online设为0要完善它就要修改一下Session_OnEnd事件在该事件里将online设为0. script LANGUAGEVBScript RUNATServer
Sub Application_OnStart
application(online)0
set application(conn)Server.CreateObject(ADODB.Connection)
application(db)Server.MapPath(\bbs.mdb) 此处最好使用绝对路径\bbs.mdb下文有详细介绍
End Sub
sub Application_OnEnd
set application(conn)nothing
End Sub
Sub Session_OnStart
End Sub
Sub Session_OnEnd
if session.contents(pass) then 判断是否为登录用户的Session_OnEnd
application(con).open driver{Microsoft Access Driver (*.mdb)};dbqapplication(db)
application.lock
application(online)application(online)-1
application(con).Execute (update friends set online0 where idsession.contents(id))
application.unlock
application(con).close
end if
End Sub script 至此完整的代码已经完成了.因为在Application和Session的OnEnd事件里不能使用Server对象所以要将数据库的连接及数据库在服务器上的物理地址d:\inetpub\wwwroot\bbs.mdb存储在application变量中并在Application_OnStart事件中预先处理.同理在Session_OnEnd事件中不能用session(pass)来代替session.contents(pass)以下有详尽说明. 四、本文实例中值得引起注意的两点 ⒈OnEnd事件里的session.contents 刚开始接触global.asa的朋友经常会将上面Session_OnEnd事件里的
if session.contents(pass) then 写成
if session(pass) then 这样的话系统不会提示错误但是永远也不会执行then后面的内容这是因为在OnEnd事件里禁止使用Session对象但是可以用Session对象的集合来调用session变量.因为IIS并没提示任何错误信息所以笔者曾经在这上面浪费了很多时间.在此希望大家引以为鉴
⒉Application_OnStart事件里用Server.MapPath获取数据库的物理地址时应使用绝对地址为了说明这个问题大家可以做个实验将上面Application_OnStart事件里的
application(db)Server.MapPath(\bbs.mdb)改为:
application(db)Server.MapPath(bbs.mdb) 然后在d:\inetpub\wwwroot\目录下建立一个test子目录写一个temp.ASP在test目录里.
test.ASP response.write application(db) 再将temp.ASP拷贝一份放在根目录下d:\inetpub\wwwroot\.用记事本打开global.asa再打开两个浏览器浏览器A输入地址http://localhost/temp.ASP按回车将在浏览器上输出
d:\inetpub\wwwroot\bbs.mdb 然后在记事本的窗口上点文件菜单选保存使global.asa的修改时间改变从而使IIS重启动所有服务再在浏览器B输入地址http://localhost/test/temp.ASP按回车在浏览器上输出的是
d:\inetpub\wwwroot\test\bbs.mdb global.asa文件虽然是放在站点根目录下但是如果在server.mappath中使用的是相对地址而触发Application_OnStart事件的用户第一次访问的页面又不是属于根目录的话得到数据库的物理地址将不会是期望的结果希望大家要特别小心. 全面解析ASP Server对象
Server对象提供对服务器上访问的方法和属性.大多数方法和属性是作为实用程序的功能提供的. 语法:
Server.property|method 属性property
Server对象只有一个属性ScriptTimeout 程序能够运行的最大时间 方法Methods
CreateObject 建立一个对象实例.
Execute 执行一个ASP文件
GetLastError 返回一个错误代码
HTMLEncode 对指定的HTML代码进行转换.
MapPath 将一个相对路径转化为一个绝对路径.
Transfer 将当前的所有状态信息发送给另一个ASP文件
URLEncode 以URL形式转化指定的代码,包括空格
Server对象的方法详细说明
CreateObject 语法
Server.CreateObject( progID ) 参数
progID 指定要创建的组件名称,格式如下: [Vendor.]Component[.Version]. 要点 一般来说,用由Server.CreateObject方法创建的对象拥有页面的范围.这就说,当这页的ASP程序执行完后,这种对象会自动地消失. 为了创建一个拥有Session或Application范围的对象,你可以在Global.asa文件中使用
Execute
Execute 方法呼叫一个ASP文件并且执行它就像这个呼叫的ASP文件存在这个ASP文件中一样.这很像许多语言中的类的调用. 语法
Server.Execute( Path ) 参数
Path 指定执行的那个ASP文件的路径.如是它是一个绝对路径那么它必须是一个在这个ASP应用程序相同的地方目录. 讲解
Server.Execute 方法提供了一种将一个复杂ASP应用程序分化为小块单位来执行的方法.通过这种方法你能够建一个ASP图书馆你能够随便在你需要时调用你图书馆中的ASP文件.这个就有点像SSI了嘿嘿 当IIS根据指定的ASP文件路径执行完这个ASP文件之后就会自动返回以前的ASP文件.这个刚刚执行完的ASP文件有可能改变了HTTP head.但是和其它的ASP文件一样当程序试图改变http head时就会报错 这个path参数可以包括一个询问信息. 如果在被呼叫和呼叫的ASP文件中都含有相同的子函数那么这些子函数只在本ASP文件中起作用.举个例子如果在下面的ASP1和ASP2两个文件中都含有放弃程序的子函数.首先ASP1呼叫ASP2那么ASP2中的的OnTransactionAbort开始执行当ASP2执行完毕ASP1中的OnTransactionAbort才开始执行. ASP1: % Transaction
Required
% %
Server.Execute (Page22.ASP)
Sub OnTransactionAbort
Sub OnTransactionCommit
% ASP2.ASP: %
TransactionRequired
Sub OnTransactionAbort
Sub OnTransactionCommit
% Example ASP1 % Response.Write(I am going to execute ASP2 )
Server.Execute(/myASPs/ASP2.ASP)
%
ASP2 % Response.Write(Here I am)% GetLastError
GetLastError 方法返回一个ASPError Object 来描述一个错误信息.这个方法只适用于在ASP文件发送任何内容给用户机之前. 语法
Server.GetLastError () 要点 如果一个500;100 用户错误已经被定义在一个ASP应用程序中它是指的一个以.ASP为后缀的文件.这种情况下在这个程序运行时当一个错误发生时服务器就会自动的以Server.Transfer这种方式传送到这个正在执行的ASP页面.ASP应用程序就会将有效的处理这个错误.另外这个ASPError Object一定要有效这样你就能够看到服务器提供给你的错误信息来改这个文件了 一般的Web Site 都是根据文件\iishelp\common\500-100.ASP来构造的.你能够用它来执行一个ASP错误当然你能够自己定义了.如果你想改变为另外一个ASP文件的来执行这些用户错误.那么你可以用IIS中的snap-in. 注意当IIS发现了一个ASP文件或者global.asa文件中的一个错误那么一个500;100用户错误产生.以下的程序将不能执行
Example 下面的三个例子证明不同的错误会产生的用户错误.三个错误是 编译错误 运行错误 逻辑错误 第一个例子证明了一个编译错误就是当IIS试图包含一个文件时产生的.这个错误会产生是因为在这个包含文件中没有定义所需的参数.第二个例子显示的是一个运行错误这个程序中断的原因是程序中没有“next.第三个例子显示的是一个逻辑错误因为这个程序试图除以一个0. 不行啦 Example 1 %
response.write hello
%
Example 2 %
dim I
for i1 to 1
nxt
%
Example 3 %
dim i,j
dim sum
sum0
j0
for i1 to 10
sumsum1
next
sumsum/j
%
HTMLEncode
HTMLEncode方法对指定的字符串进行HTML编码. 语法
Server.HTMLEncode( string ) 参数
string 要进行编码的字符 例子
下面的程序: % Server.HTMLEncode(The paragraph tag: ) % 输出为:
The paragraph tag: 注意 程序执行后在浏览器中看到的是:
The paragraph tag: 但是如果你用查看源文件看一下的话,源代码就不是了.
MapPath
MapPath 方法将相对路径转化为服务器上的物理路径 语法
Server.MapPath( Path ) 参数
Path 相对路径.这个路径是以/或\开头的路径如果这个路径中没有\,那么MapPath方法就会返回以当前目录为基础的路径. 讲解
MapPath 方法不能检查路径在这个服务器下是否存在.因为 MapPath 转化路径时是不管这个路径是否在这个服务器下存在的. 你能够用它来将一个相对路径转化为一个物理路径然后再在这个路径下进行各种操作.
Example 在下面的例子中data.txt文件存在 C:\Inetpub\Wwwroot\Script 目录中而且一个test.ASP 文件包括下面的代码.C:\Inetpub\Wwwroot 是该服务器的主目录 . 下面的例子中首先用环境变量PATH_INFO获得当前文件的物理路径. 下面是Script 代码 % server.mappath(Request.ServerVariables(PATH_INFO))% 显示为
c:\inetpub\wwwroot\script\test.ASP 因为下面的例子中路径参数没有以/开头所以它是以当前目录转化的ASP文件是放在C:\Inetpub\Wwwroot\Script中的.以下是 scripts的内容 % server.mappath(data.txt)% % server.mappath(script/data.txt)% 显示为
c:\inetpub\wwwroot\script\data.txt
c:\inetpub\wwwroot\script\script\data.txt 以下的两个例子是以/开头的.以下是scripts的内容 % server.mappath(\script)% 显示为
c:\inetpub\wwwroot\script\data.txt
c:\inetpub\wwwroot\script 直接用/或\就会得到服务器的主目录 % server.mappath(\)% 显示为 c:\inetpub\wwwroot
c:\inetpub\wwwroot Transfer
transfer 方法会把一个正在执行的ASP文件的所有信息传给另外一人ASP文件. 语法
Server.Transfer (path) 参数
Path 将要接收信息的ASP文件的位置. 要点 当你调用Server.Transfer时所有内建对象的状态信息都会包含在这次传送之中.这就是说所有在保存在Session或Application中的信息都会被传送而且所有当前请求的信息都会被接收信息的ASP文件所接受.
Example 下面的例子示范了从一个ASP文件传送到另一个ASP文件例子
ASP1 % Dim sessvar1 Response.Write Session.SessionID
Response.Write ()
Response.Write(I am going to ASP2 )
Server.
Transfer
(/MyASPs/ASP2.ASP)
% ASP2 % Response.Write Session.SessionID %
URLEncode
URLEncode 方法可以将指定字符串进行URL编码. 语法
Server.URLEncode( string ) 参数
string 指定要转化的字符串
Example 下面是代码 % Respones.Write(Server.URLEncode(http://www.microsoft.com)) % 显示为
http%3A%2F%2Fwww%2Emicrosoft%2Ecom 属性ScriptTimeout
ScriptTimeout 属性规定了程序的最大运行时间. 语法
Server.ScriptTimeout NumSeconds 参数
NumSeconds 规定了程序的最大的运行时间以秒计算.缺省值是90秒
Remarks 一个缺省的Scritpt Timeout的值会能过ASPScriptTimeOUT属性来设置在Web sertvic 或 Web server上.在程序中ScriptTimeout属性的值不能小于这个缺省值.举个例子吧如果NumSeconds我们设置为10秒而缺省值为90秒那么程序就会中止在90秒以后而不是10秒以后的.同样如果我们设置ScriptTimeout的值为100秒那么程序就会在100秒之后中止而不是90秒.
Example 下面的例了中程序将被设置为100秒后自动中止. % Server.ScriptTimeout 100 % 下面的例子中将重新得到ScriptTimeout的值然后把它存在Timout变量中 % TimeOut Server.ScriptTimeout %
