1、 企业人力资源管理系统摘 要企业人力资源管理工作是目前企业各项工作中的重点工作之一,如何能科学有效的开展好人事工作,是当前企业普遍关心的问题。因此,实现企业人事工作的信息化管理有着十分重要的实践意义。 本系统是采用ASP作为前台开发工具,ACCESS作为后台数据库平台的基于B/S的两层模式的管理系统。旨在实现对现有的企业人事管理工作中遇到的各种情况和大量数据进行数据库存储的基础上,设计并完成对其各种数据的分类、查询和统计,在深入研究的过程中,尽可能实现各类方便友好的操作界面和数据报表。关键词: ASP,B/S,数据库,管理系统AbstractThe management for company
2、 human resource is one of focal point work in corporation for the present, how to scientific and efficiently develop the personnel matters is the problem that the industry circles were corporation concerned about at present time . This system is using Asp as the proscenium development tool, and Acce
3、ss is as three layers of management system of model base on B/S of backstage supporters data base terrace .Therefore to realize the information management of labor work makes very important practice sense. This system is aimed at realizing on the foundation of data base holding of various circumstan
4、ces and mass data that the management to existing available labor in working, design and accomplish classification、query and statistics to his various data , in the course of research thoroughly , realizes as far as possible the friendly operation interface sum of various kind of convenience accordi
5、ng to the report form.Keywords: ASP, B/S, Data Base, Management System引 言企业管理从以物的管理为中心,转向以人的管理为中心,是企业管理思想一个划时代的进步。人事信息,是企业所有信息资源中最为活跃与昂贵的资源,因而,人事信息的规范化与量化管理,已成为现代先进企业管理中不可缺少的重要组成部分。如何提高人事信息资源部门的工作效率,吸引培养人才、加强绩效考核、降低人工成本、量化对人的管理,成为企业管理者重点关心的问题。企业原有的计算机软件难以满足人事信息管理的要求,需要思想、技术更为先进的人事信息管理信息系统。本系统设计采用ASP
6、作为前台开发工具,ACCESS作为后台数据库平台的基于B/S的两层模式的职工信息管理系统。旨在实现对现有的企业职工信息管理工作中遇到的各种情况和大量数据进行数据库存储的基础上,设计并完成对其各种数据的分类、查询和统计。整个职工信息管理系统分为两个模块:进入系统模块和员工信息管理模块。进入系统模块包括用户登陆和新用户注册功能。员工信息管理模块包括查询、添加、删除、修改员工信息功能。第1章 ASP 概述11 ASP的定义 随着计算机及网络技术的飞速发展,Internet/Intranet应用在全球范围内日益普及,当今社会正快速向信息化社会前进,信息自动化的作用也越来越大。各式的信息化管理工作迫切需
7、要从繁杂的事务中解放出来,提高工作效率。Active Server Pages(ASP)是实现ADO技术的一种较为理想的编程环境。它是Microsoft公司为IIS以及MS personal web server 等web服务器开发的技术,提供了一个将VBScript 和JavaScript集成到HTML面的服务器端的脚本编写环境。随着计算机及网络技术的飞速发展,Internet/Intranet应用在全球范围内日益普及,当今社会正快速向信息化社会前进,信息自动化的作用也越来越大。各式的信息化管理工作迫切需要从繁杂的事务中解放出来,提高工作效率。ASP是Microsoft公司推出的一种服务器端
8、脚本执行环境,使用它可以创建和运行动态、交互的 Web 服务器应用程序,使用 ASP 可以组合 HTML 页脚本命令和 ActiveX 组件以创建交互的 Web 页和基于 Web 的功能强大的应用程序。只要掌握了简单的脚本语言,网页设计人员就可以更好的完成这部分工作。它与CGI尤其是ISAPI相比,在执行效率上确实有所不如,毕竟它是解释执行的脚本语言,但是在NT下ASP仍然是网页编程语言中的较佳选择。总之,ASP包含三方面含义:1.Active:ASP使用了微软的ActiveX技术。ActiveX(COM)技术是现在Microsoft软件的重要基础。它采用封装对象,程序调用对象的技术,简化编程
9、,加强程序间合作。ASP本身封装了一些基本组件和常用组件,有很多公司也开发了很多实用组件。只要你可以在服务器上安装这些组件,通过访问组件,你就可以快速、简易地建立自己的WEB应用。2.Server:ASP运行在服务器端。这样就不必担心浏览器是否支持ASP所使用的编程语言。ASP的编程语言可以是VBSCRIPT和JSCRIPT。VBSCRIPT是VB的一个简集,会VB的人可以很方便的快速上手。然而NETscape浏览器不支持客户端的VBSCRIPT,所以最好不要在客户端使用VBSCRIPT。而在服务器端,则无需考虑浏览器的支持问题。NETscape浏览器也可以正常显示ASP页面。3.Pages:
10、ASP返回标准的HTML页面,可以正常地在常用的浏览器中显示。浏览者查看页面源文件时,看到的是ASP生成的HTML代码,而不是ASP程序代码。这样就可以防止别人抄袭程序。由此可以看出,ASP是在IIS下开发WEB应用的一种简单、方便的编程工具。在了解了VBSCRIPT的基本语法后,只需要清楚各个组件的用途、属性、方法,就可以轻松编写出自己的ASP系统。 12 ASP的工作原理和特点121 ASP的工作原理ASP的工作原理是:ASP通过后缀名为ASP的文件来实现,一个ASP文件相当于一个可执行文件,因此必须放在web服务器上有可执行权限的目录下。当浏览器向web服务器请求调用ASP文件时,就启动
11、了ASP。Web服务器响应该HTTP请求,调用ASP引擎,解释被申请的文件。当遇到与Active X Script兼容的脚本(VBScript,JavaScript)时,ASP引擎调用相应的脚本引擎进行解释处理。若脚本指令中涉及到对数据库的访问,就通过ODBC与后台数据库进行连接,由数据库访问组件实现对数据库的操作,并将执行结果动态生成一个HTML页面返回 web 服务器端,然后与页面中脚本的HTML合并成一个完整的HTML页面送至客户端浏览器。因而客户端浏览器接收到的是经web服务器执行以后生成的一个纯粹的HTML文件,可被运行在任何平台上的浏览器所执行。同时由于ASP的脚本程序是在服务器端
12、执行的,通常脚本代码不会被别人窥视,保证了程序代码的安全和知识产权。另外程序执行完毕后,服务器仅仅是将执行的结果返回给客户端浏览器,减轻了网络传输的负担,大大提高了交互的速度。122 ASP的特点1. 使用 VBScript 、JScript 等简单易懂的脚本语言,结合HTML代码,即可快速地完成网站的应用程序。 2. 无须 compile 编译,容易编写,可在服务器端直接执行。 3. 使用普通的文本编辑器,如 Windows 的记事本,即可进行编辑设计。 4. 与浏览器无关 (Browser Independence), 用户端只要使用可执行 HTML 码的浏览器,即可浏览 Active S
13、erver Pages 所设计的网页内容。 Active Server Pages 所使用的脚本语言 (VBScript 、 Jscript) 均在 WEB 服务器端执行,用户端的浏览器不需要能够执行这些脚本语言。 5. Active Server Pages 能与任何 ActiveX scripting 语言相容。除了可使用 VBScript或 JScript 语言来设计外,还通过 plugin 的方式,使用由第三方所提供的其他脚本语言,譬如 REXX 、 Perl 、 Tcl 等。脚本引擎是处理脚本程序的 COM(Component Object Model) 物件。 6. 可使用服务器端
14、的脚本来产生客户端的脚本。 7. ActiveX Server Components(ActiveX 服务器元件 ) 具有无限可扩充性。可以使用 Visual Basic 、 Java 、 Visual C 、 COBOL 等编程语言来编写你所需要的ActiveX Server Component 。13 Windows2000下的Web Server的安装和配置131 IIS的安装和配置WIN2000 server/WIN2000 advance server都是默认安装的,如果在安装时没选择的话,也可按照下面的步骤来,win2000 pro/winxp pro/win2003的用户通过“控
15、制面板”中的“添加/删除程序”可以安装IIS或选择其他组件,步骤如下:选择“开始”“设置”“控制面板”“管理工具”“Internet 服务管理器”,运行Internet 服务管理器如果可以正常运行,则IIS已安装。如果不能正常运行则需安装。 安装IIS方法:“开始”“设置”“控制面板”“添加/删除程序”“添加/删除windows组件”选择Internet 信息服务(IIS),然后插入WINDOWS安装光盘,点击下一步,这样就开始安装IIS。开始-控制面板-管理工具-internet 信息服务打开之后就到了IIS的控制台了,点计算机名前面的+号展开,再点网站前在的+号展开,这时就有一个默认网站,
16、这里就是要配置IIS的关键地方了。右击“默认网站”,在弹出菜单里选择“属性”这时就会弹出“属性”选顶卡。一般情况下“网站/常规”选项卡不要更改。选择“主目录”选项卡,本地路径就是你的主目录路径,这里你可以点浏览更改到你想设置的目录下,默认是:X:inetpubwwwroot(X:表示系统盘)。在这里还可以设置你的网站的用户操作权限。这些设置完后就转到“文档”选项卡,首先要在“启用默认文档”前面打勾,默认是打勾的。点击“添加”,可以添加默认文档,例如添加index.asp、index.htm、index.html等等,这是你网站默认打开的主文件名,在这里也可以进行删除,选择你要删除的文档之后再点
17、“删除”,现在“属性”选项卡基本设置好了,点应用、确定就返回到IIS控制台了。132 Windows2000下的Web站点和虚拟目录的建立首先建立Web站点,选择“开始” - “程序” “管理工具” “Internet信息服务管理器”命令来启动Internet信息服务管理器,在“默认Web站点”选项上以鼠标右键单击,选择“新建”-“Web站点”选项,这时就会出现新建“Web站点创建向导”对话框,单击“下一步”按钮,进入Web站点说明对话框,再单击“下一步”按钮,进入IP地址和端口设置对话框,输入站点的IP地址和端口,进入安装路径的选择,输入主目录路径,设置Web站点访问权限,最后单击“完成”按
18、钮即可,通过以上步骤,一个WEB站点ASP就建好了,可以在ASP站点下建立虚拟目录(如果你的文件放在X:inetpubwwwroot下面的话就不要设置了),右击“默认网站”选择“新建”-虚拟目录。输入虚拟目录名,下一步,选择文件路径,下一步,完成。现在IIS的配置基本完成了就可以利用IIS+IE进行ASP的调试了。打开IE,在地址栏里输入:http:/XXX(你的计算机名或是127.0.0.1或是localhost)/XXXXX(你的虚拟目录名,也就是你在设置虚拟目录时命的名,如果放在X:Inetpubwwwroot下的话就不要虚拟目录了)/www(文件名,如果是default.asp/def
19、ault.html/index.htm/index.asp这样的文件名也可以省略不填)。如果你的ASP文件有错误的话,IE就会报错。第2章 WEB数据库技术21 WEB数据库的发展WWW是目前世界上发展最快的领域,也是 Internet 网上最重要的信息检索手段。WWW的主要内容包括超文本传输协议(HTTP) 、超文本标记语言HTML) 、通 用 网 关 接 口 (CGI) 、Java和JavaScript语言等。Web是一种基于浏览器/服务器(B/S)的体系结构,用户通过浏览器访问Web站点。22 Browse/Web 模式及其与Client/Server 模式的区别B/S结构,即Brows
20、er/Server(浏览器/服务器)结构,是随着Internet技术的兴起,对C/S结构的一种变化或者改进的结构。在这种结构下,用户接口完全通过WWW浏览器实现,一部分事务逻辑在前端实现,但是主要事务逻辑在服务器端实现。B/S结构,主要是利用了不断成熟的WWW浏览器技术,结合浏览器的多种Script语言(VBScript、JavaScript等)和ActiveX技术,用通用浏览器就实现了原来需要复杂专用软件才能实现的强大功能,并节约了开发成本,是一种全新的软件系统构造技术。随着Windows 98/Windows 2000将浏览器技术植入操作系统内部,这种结构更成为当今应用软件的首选体系结构。
21、显然B/S结构应用程序相对于传统的C/S结构应用程序将是巨大的进步。由于客户端实现与服务器的直接相连,没有中间环节,因此响应速度快。客户操作界面设计个性化,具有直观、简单、方便的特点,可以满足客户个性化的操作要求。同时由于开发是针对性的,因此,操作界面漂亮、形式多样,可以充分满足客户自身的个性化要求。由于是针对性开发,因此缺少通用性的特点,业务变更或改变不够灵活,需要重新设计和开发,增加了维护和管理的难度,进一步的业务拓展困难较多。需要专门的客户端安装程序,分布功能弱,不能够实现快速部署安装和配置。兼容性差,对于不同的开发工具,相互之间很难兼容,具有较大的局限性。若采用不同工具,需要重新改写程
22、序。 开发成本较高,需要具有一定专业水准的技术员才能完成。Client/Server是建立在局域网的基础上的,Browser/Server是建立在广域网的基础上的.。它们的具体区别如下:1硬件环境不同:C/S一般建立在专用的网络上,小范围里的网络环境,局域网之间再通过专门服务器提供连接和数据交换服务。B/S建立在广域网之上的,不必是专门的网络硬件环境,例与电话上网,租用设备,信息自己管理,有比C/S更强的适应范围,一般只要有操作系统和浏览器就行。2对安全要求不同:C/S一般面向相对固定的用户群,对信息安全的控制能力很强。一般高度机密的信息系统采用C/S结构适宜,可以通过B/S发布部分可公开信息
23、。B/S建立在广域网之上,对安全的控制能力相对弱,面向是不可知的用户群。3对程序架构不同:C/S程序可以更加注重流程,可以对权限多层次校验,对系统运行速度可以较少考虑。B/S对安全以及访问速度的多重的考虑,建立在需要更加优化的基础之上,比C/S有更高的要求,B/S结构的程序架构是发展的趋势,从MS的.Net系列的BizTalk2000Exchange2000等,全面支持网络的构件搭建的系统。SUN和IBM推的JavaBean构件技术等,使B/S更加成熟。4软件重用不同:C/S程序可以不可避免的整体性考虑,构件的重用性不如在B/S要求下的构件的重用性好。B/S对的多重结构,要求构件相对独立的功能
24、,能够相对较好的重用,就入买来的餐桌可以再利用,而不是做在墙上的石头桌子。5系统维护不同:系统维护是软件生存周期中,开销大, C/S程序由于整体性,必须整体考察,处理出现的问题以及系统升级,升级难,可能是再做一个全新的系统。B/S构件组成方面构件个别的更换,实现系统的无缝升级,系统维护开销减到最小。用户从网上自己下载安装就可以实现升级。6处理问题不同:C/S程序可以处理用户面固定,并且在相同区域,安全要求高需求,与操作系统相关,应该都是相同的系统。B/S建立在广域网上,面向不同的用户群,分散地域,这是C/S无法作到的,与操作系统平台关系最小。7用户接口不同:C/S多是建立的Window平台上,
25、表现方法有限,对程序员普遍要求较高。B/S建立在浏览器上,有更加丰富和生动的表现方式与用户交流,并且大部分难度减低,减低开发成本。8信息流不同:C/S程序一般是典型的中央集权的机械式处理,交互性相对低。B/S信息流向可变化,B-BB-CB-G等信息、流向的变化,更象交易中心。23 ACCESS数据库简介Access是Office系列软件中用来专门管理数据库的应用软件。所谓数据库是指经过组织的、关于特定主题或对象的信息集合。数据库管理系统分为两类:文件管理系统和关系型管理系统。Access应用程序就是一种功能强大且使用方便的关系型数据库管理系统,一般也称关系型数据库管理软件。它可运行于各种Mic
26、rosoft Windows系统环境中,由于它继承了Windows的特性,不仅易于使用,而且界面友好,如今在世界各地广泛流行。它并不需要数据库管理者具有专业的程序设计水平,任何非专业的用户都可以用它来创建功能强大的数据库管理系统。Access使用标准的SQL(Structured Query Language,结构化查询语言)作为它的数据库语言,从而提供了强大的数据处理能力和通用性,使其成为一个功能强大而且易于使用的桌面关系型数据库管理系统和应用程序生成器。一个Access数据库中可以包含表、查询、窗体、报表、宏、模块以及数据访问页。不同于传统的桌面数据库(dbase、 FoxPro、Para
27、dox), Access数据库使用单一的*.mdb文件管理所有的信息,这种针对数据库集成的最优化文件结构不仅包括数据本身,也包括了它的支持对象。在Office 2000下,Access数据库的安全机制已经更为完善。除了对数据库设置密码保护,对数据库进行编码压缩,还可以启用用户级的安全机制,在用户级别上控制对数据库的访问。数据库设置密码, 对于单机使用的数据库或者是需要工作组共享的数据库,仅设置密码保护较为合适。知道密码的组成员,都有数据库的完全操作权限,彼此之间的使用权限没有什么区别。ASP程序中访问Access数据库 在基于微软IIS/PWS的网络平台上,通过服务器端运行的ASP程序来访问后
28、台数据库,是一种最常见的模式了。而对于小型的数据库应用需求,微软的Access数据库,应该是与ASP程序配套使用的首选。由于Access数据库的ODBC驱动程序支持的SQL指令全,执行效率高,所以Access后台数据库+ASP服务器端程序+客户端IE浏览器,是一个精练实用高效的组合模式。在本次设计中,需要建立一个数据库系统,并且在开发中希望能够建立一个专业的数据库系统,但是系统地去学习编程时间和精力上不允许,并且写SQL语句,也是一项比较麻烦的工作。而微软公司开发的Access软件很好的解决了这方面的问题,所以在本系统的开发中,数据库的建立就是使用了微软公司开发的Microsoft Acces
29、s软件。第3章 系统总体分析与设计31 可行性分析311 技术可行性本管理系统采用B/S模式。网站实施的关键是实现WEB服务器与供应商数据库的连接接口。采用B/S构架系统的优点如下:由于客户服务器两层结构存在灵活性差、升级困难、维护工作量大等缺陷,已较难适应当前信息技术与网络技术发展的需要。随着WEB技术的日益成熟,B/S结构已成为取代C/S结构的一种全新技术。采用该结构软件的优势在于:(1)无须开发客户端软件,维护和升级方便;(2)可跨平台操作,任何一台机器只要装有WWW浏览器软件,均可作为客户机来访问系统;(3)具有良好的开放性和可扩充性;(4)可采用防火墙技术来保证系统的安全性,有效地适
30、应了当前用户对管理信息系统的新需求。因此该结构在管理信息系统开发领域中获得飞速发展,成为应用软件研制中一种流行的体系结构。B/S结构采用星形拓扑结构建立企业内部通信网络或利用Internet虚拟专网,我们拟采用以下几种软件: 1) 操作系统用Windows2000 Server。Windows2000 Server作为一个优秀的网络操作系统,它的发行版本中集成了大量的网络应用软件,如Web服务器、Ftp服务器、邮件服务器等,可以快速的构建Intranet环境。 2) 本系统内核使用Asp,有几种方法可以实现本系统的内核:Jsp、PHP等。但大多都使用Windows2000 Server作为ww
31、w服务器,故还是选择微软的Asp与Windows2000 Server操作系统组合。312 经济可行性 由于系统结构采用当前流行的B/S结构,也就是客户端/服务器模式,软硬件的需求如前说述要求都比较低,只需要有假设www服务的web服务器,Access数据库以及个人PC,而且开发时间短,成本低,这不仅保证了系统的技术可行性,还保证了系统的经济可行性。313 社会可行性 (1) 本系统B/S模式架构的简单解决了安装配置难的问题,满足了用户的需要。(2) 由于开发成本的降低使得产品价格也会在市场上占据绝对优势。(3) 开发的针对性使产品的竞争度大大加强。需求分析321 性能需求联机系统对用户请求的
32、响应时间不应超过15S,以免用户产生等待感;系统需要的存储容量:硬盘容量不少于10GB,内存不应小于128MB;作为服务器,CPU最好为P733或以上,而在安全性方面采用Windows NT安全认证机制。322 系统运行需求1操作系统操作系统对使用ASP开发本管理系统的影响不是很大,Windows NT、Windows 2000、Linux、Windows XP都可以,但好的操作系统可以使ASP服务器运行的更流畅,减少系统崩溃的可能性。因此,选用了稳定性较好的Windows 2000 Server。2. ASP服务器目前ASP可运行在以下几种服务器内:1)IIS(Internet Inform
33、ation Server),该服务由Windows NT Server4.0或更高版本支持。2)PWS (Peer Web Server),该服务由Windows NT Workstation 4.0或更高版本支持。3)PWS (Personal Web Server),该服务器由Windows 9X支持。4)另外,借助第三方服务器扩展组件,ASP是可以运行在Unix或Linux上的。也就是说,无论任何一个WEB服务器,只要安装有ASP的解释程序,就可以支持ASP程序。3. 数据库因为本管理系统没有海量数据的存储问题,数据不是很多,对安全性要求也不是很高,所以选用了Microsoft Acce
34、ss 2000。4. 数据通信接口数据通信接口采用ODBC(Open Database Connectivity,开放数据库互连)。ODBC是微软开发的一套读取数据库的解决方案,它的目的是将所有对数据库的底层操作全部隐藏在ODBC的驱动程序内核里。对于程序员来说,只要构建了一个指向数据库的连接,就可以采用统一的应用程序编程接口实现对数据库的读写。目前ODBC驱动已经提供了对大多数常见类似数据库的支持,包括dBase,Informix,Access,SQL Server等,也包括对其他类型的数据库的支持,如文本、EXCEL电子表格等。33 总体设计331 系统层次概框图职工信息管理系统共分为两个
35、子系统:前台系统和后台系统,其功能模块划分如图3.1所示:图3.1 系统功能模块划分图332 系统模块设计1前台模块(1)用户注册模块。首先声请用户名,这个用户名是唯一的,必须填写姓名,密码及性别等用户信息。填好后提交资料就会被保存到用户数据表中。(2)用户登陆模块。已经注册的用户进入系统,必须先进行登陆。2后台系统(1)查询员工信息模块。为用户提供各种不同的查询途径,用户可根据个人的不同需求进行查询。(2)添加员工信息模块。对新增的员工信息进行录入操作。(3)删除员工信息模块。对辞职的员工的信息进行删除操作。(4)修改员工信息模块。对已存在的员工信息进行变更操作。34 数据库设计数据库是一种
36、存储数据并对数据进行操作的工具。数据库的作用在于组织和表达信息,简而言之,数据库就是信息的集合。计算机的数据库可以分为两类:非关系数据库(flat-file)和关系数据库(relational)。关系数据库中包含了多个数据表的信息,数据库含有各个不同部分的术语,像记录、域等。Access2000 就是关系数据库开发工具,数据库能汇集各种信息以供查询、存储和检索。Access 的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于 Excel 的电子表格,可以使数据库一目了然。另外,Access 允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库
37、,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库。Access 是一种关系数据库工具,关系数据库是已开发的最通用的数据库之一。如上所述,Access 作为关系数据库开发具备了许多优点,可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。设计如下:利用Microsoft Access 2000 制作数据库,然后制作表并写入数据字段。用Microsoft Access建立一个db.mdb数据库,其中db.mdb总共存放三个表。如图3.2所示:图3.2 数据库列表DEPT表:存放部门名称及编号。如图3.3所示:图3.3 DEPT表各字段说明:(1)DEP
38、TNO字段为部门名称编号。(2)DEPTName字段为部门名称。2Employees表:存放职员信息。如图3.4所示:图3.4 Employees表各字段说明:(1)URID字段为每个职工记录的自动编号。(2)EMPNO字段为职工工号。(3)EMPName字段为职工姓名。(4)Gender字段为职工性别。(5)Age字段为职工年龄。(6)DEPTNO字段为部门名称编号。3Users表:存放管理员和注册用户的资料。如图3.5所示:图3.5 Users表各字段说明:(1)URID字段为每个职工记录的自动编号。(2)UserName字段为用户名。(3)Passwrd字段为用户密码。(4)Gender
39、字段为用户性别。连接数据库的employeesconn.asp内容如下:341系统界面一个好的系统需要一个友好的用户界面。在系统登陆模块里,在登陆框中分别输入用户名和密码,点击登陆按钮即可进入职工信息管理系统内部主页。如果登陆不成功,提示信息栏会显示“登陆失败,请重试”字样。允许用户3次(默认)之内登陆系统,否则窗口将被关闭。登陆界面如图3.6所示:图3.6 系统登陆界面342 程序实现EMPLogin.asp主要程序如下:%dim failCountfailCount = request(LogonFailCount)if failCount = thenfailCount = 0end i
40、fdim actionaction=request(action)select case actioncase login set rs=server.createobject(adodb.recordset) sql=select * from Users where UserName = & Request.Form(UserName) & and Passwrd= & Request.Form(Passwrd) & rs.open sql,conn,1,3if not rs.eof thenSession(Logon) = 1response.write response.endelse if failCount 3 thenfailCount = failCount + 1Response.write 登录失败,请重试 elseresponse.Write alert(登录失败达到 3 次,窗口将被关闭!);response.Write window.close(); end ifend ifrs.closeset rs=nothingend select%登录 上海协威实业有限公司登录框 input name=LogonFailCount value= type=hidden 用户名: 密 码: