企业网站设计与实现

企业网站设计与实现[java毕业论文下载]

摘   要

 

 


     随着计算机及网络技术的飞速发展,Internet/Intranet应用在全球范围内日益普及,当今社会正快速向信息化社会前进,信息自动化的作用也越来越大。

从而使我们从繁杂的事务中解放出来,提高了我们的工作效率。

本论文主要阐述一个功能比较强大的企业网站系统的后台操作过程及一些关键技术。该系统信息来源主要由用户直接添加,通过管理员审核后,在网站上发布出来,以供大家查询相关公司信息。本系统主要让社会各界能更好的了解本本企业,欢迎对本企业的发展提出更多宝贵留言。该企业网站系统是前台应用Dreamweaver MX 2004、FireworksMX2004、Flash MX 2004等软件,后台结合ASP编程技术和Access数据库技术开发出来的。

 

关键词:用户管理;信息发布;ASP;企业网站

 

 

Abstract

 

 

With the rapid development of computer and network technology rapid development, Internet/The Intranet application popularizes day by day in the global scope, now the society fast to the becoming an information based society advance, the information automation function also more and more is big. Thus causes us to liberate from the numerous and diverse business, enhanced our working efficiency.
    The present paper mainly elaborates a function quite formidable enterprise website system backstage operating process and some essential technologies. This system information originates mainly directly increases by the user, verifies after the manager,issues in the website ,by for everybody inquiry related company information. This system mainly enables the society from all walks of life the better understanding notebook enterprise, welcome to propose more precious messages to this enterprise's development.
    This enterprise website system is the onstage applies software Dreamweaver MX 2004, Fireworks MX2004, Flash MX   2004, and so on, the backstage unifies of the ASP programming technology and the Access database technologydevelopment.

 

Key word: user management; information issued; ASP;  enterprise website

 

 

 

1      1

1.1  简介 1

1.2  开发环境 2

2   系统分析 4

2.1  网站的可行性分析 4

2.2  网站的需求分析 4

3   系统设计 6

3.1  登录 7

3.1.1 后台管理登录界面 7

3.1.2 左子树目录 12

3.2  系统管理 12

3.2.1 管理员管理 12

3.2.2 网站配置 14

3.3  产品管理 16

3.3.1 产品类别设置 16

3.3.2 产品管理 17

3.4  订单管理 20

3.4.1 订单管理 20

3.4.2 支付管理 22

3.5  会员管理 24

3.6  新闻管理 25

3.6.1 管理全部新闻 26

3.6.2 管理新闻类别 28

3.7  留言管理 30

3.7.1 留言管理 31

3.7.2 管理员公告 32

3.8  调查管理 33

3.8.1 调查设置 33

3.8.2 添加新调查 35

    37

    38

参考文献 39

   3

第一章        4

1.1简介 4

1.2 软件配置 5

第二章   系统分析 8

2.1 网站的需求分析 8

2.2 网站的可行性分析 8

第三章   系统设计 10

3.1.1后台管理登录界面 10

3.1.2左子树目录 19

3.2系统管理 20

3.2.1管理员管理 20

3.2.2 网站配置 22

3.3产品管理 23

3.3.1产品类别设置 23

3.3.2 产品管理 25

3.4订单管理 28

3.4.1订单管理 28

3.4.2 支付管理 30

3.5会员管理 32

3.6新闻管理 34

3.6.1管理全部新闻 34

3.6.2管理新闻类别 36

3.7留言管理 39

3.7.1留言管理 39

3.7.2管理员公告 40

3.8调查管理 41

3.8.1调查设置 41

3.8.2添加新调查 43

   45

     46

参考文献 47

 

 

 

 

第1章   概  论

 

 

1.1  简介

 

目前,中国企业信息化意识明显提高,信息化进程正在加快,企业信息化工作在提高生产率和企业竞争力方面正在形成巨大的潜力。但在总体水平提高的同时,仍与全球领先水平有较明显的差距;从成功实施信息化的四大影响因素(即领导力、管理机制、执行能力和IT平台)方面分析,中国企业均存在不同程度的问题和差距;从管理角度看,还面临许多事关信息化成败的关键性挑战。下面的数据能一定程度上反映出问题来,中国企业与全球500强企业之间在信息化方面还存在多方面的差距:全球最佳实践企业的信息化程度(网络就绪水平)比国内企业高出38%。

网站建设是企业信息化建设和管理的重要手段之一。

一个企业通过网站可以实现以下几个方面:

品牌形象创建。网站的形象代表着企业的网上品牌形象,人们在网上了解一个企业的主要方式就是访问该公司的网站,网站建设的专业化与否直接影响企业的网络品牌形象,同时也对网站的其他功能产生直接影响。

产品/服务展示。顾客访问网站的主要目的是为了对公司的产品和服务进行深入的了解,企业网站的主要价值也就在于灵活地向用户展示产品说明及图片甚至多媒体信息,即使一个功能简单的网站至少也相当于一本可以随时更新的产品宣传资料。

信息发布。网站是一个 信息载体,在法律许可的范围内,可以发布一切有利于企业形象、顾客服务以及促进销售的企业新闻、产品信息、各种促销信息、招标信息、合作信息、人员招聘信息等等。因此,拥有一个网站就相当于拥有一个强有力的宣传工具。

网上调查。通过网站上的在线调查表,可以获得用户的反馈信息,用于产品调查、消费者行为调查、品牌形象调查等,是获得第一手市场资料有效的调查工具。

网上联盟。为了获得更好的网上推广效果,需要与供应商、经销商、客户网站、以及其他内容互补或者相关的企业建立合作关系,没有网站,合作就无从谈起。

网上销售。建立网站及开展网络营销活动的目的之一是为了增加销售,一个功能完善的网站本身就可以完成订单确认、网上支付等电子商务功能,即网站本身就是一个销售渠道。

根据企业的需要,我们将设立前台管理系统(信息发布系统、客户调查系统、产品展示系统、网上订货系统)和后台管理系统。

信息发布系统里面涉及一切需要发布的信息,包括信息存储和更新(旧信息的修改和新信息的添加)。

客户调查系统是管理客户对本企业的产品的需求、相应的意见反馈。

产品展示系统则负责展示本企业的所有产品。

网上订货系统就是在网上给客户提供订货和相应支付方式。

该企业网站管理系统基于ASP+ACCESS技术开发的电子商务平台,属于全自动化、全智能的在线方式管理、维护、更新的网站管理系统。后台管理系统采用Access数据库技术。前台管理系统和后台管理系统的协调一致。

后台主要功能:

系统管理、产品管理、订单管理、会员管理、新闻管理、留言管理、调查管理。

前台网页所实现的主要功能模块是新闻资讯、产品展示、营销网络、客户服务。

新闻资讯包括企业新闻和业内资讯;产品展示包括产品展示、产品分类和产品搜索;营销网络包括国内市场和国外市场;客户服务包括会员中心、信息反馈、留言中心、订单查询。

 

1.2  开发环境

     

  Windows XP

 Photoshop

 Micromedia Dreamweaver MX 2004

 FLASH MX 2004

 Microsoft  Office 2003

 IIS 5.0

目前开发网站的技术主要有ASP、ASP.NET、JAVA等。

ASP是Microsoft提出的一个概念。所谓ASP是指在Windows系统中运行的Web Server所能利用的Server端的Script环境,通常以DLL(asp.dll)的形式表示。

ASP(Active Server Pages)从字面上看包含三方面含义:

   (1)Active:ASP使用Microsoft的ActiveX技术。

   (2)Server:ASP运行在服务器端。

   (3)Page:ASP返回标准的HTML页面,可以正常地在常用的浏览器中显示。

ASP.NET是新一代的网页开发技术,不但能提供更高的效率,而且功能强大兼容性高,操作简单容易使用,安全性高,更可自行开发且延伸性高。

Java是Sun Microsystem公司研制的一种新型的程序设计语言。在高级语言已经非常丰富的背景下,它脱颖而出,不仅成为一门最为流行的计算机语言,而且形成一种专门的技术,有其独特的历史背景和独树一帜的品质。

我的网站拟采用ASP技术。

ASP是目前最流行的Web应用程序开发工具之一。它功能强大并简单易学,利用ASP不仅可以快速创建交互的动态网页,而且程序代码完全保密,更重要的是它不用考虑客户端使用何种浏览器。

Access2003 就是关系数据库开发工具,数据库能汇集各种信息以供查询、存储和检索。Access 的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于 Excel 的电子表格,可以使数据库一目了然。另外,Access 允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库。Access 是一种关系数据库工具,关系数据库是已开发的最通用的数据库之一。如上所述,Access 作为关系数据库开发具备了许多优点,可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。

网页(WebPage)文件主要是用超文本标记语言(HyperText Markup Language,简称HTML)语句来写成。您可以通过IE浏览器的“查看”菜单中的“源文件”看到该页的HTML代码。HTML语言由一系列元素(element)组成,用于组织文件的内容和指导文件的输出格式。元素名称不分大小写。一个元素可以有多个属性,属性及其属性值不分大小写。属性名=属性值合起来构成一个完整的属性,一个元素可以有多个属性,各个属性用空格分开。元素又由标记(tag)的构成,大多数标记是成对出现的,分起始标记< >(start tag)和结尾标记</ >(end tag),以便和页面的内容区分开来。其写成的文件是标准的ASCII文件,不同于一般的编程语言,故称为脚本(Script)更准确一点。其实也很简单,特别是在专门的HTML编辑器的帮助下,您可以迅速地学会HTML,并能很快写出有自己特色的Homepage来。

HTML的基本结构:

超文本文档分文档头和文档体两部分,在文档头里,对这个文档进行了一些必要的定义,文档体中才是要显示的各种文档信息。

<HTML>

<HEAD>头 部 信 息
  </HEAD>

<BODY>

文 档 主 体, 正 文 部 分
   </BODY>

</HTML>

其中<HTML>在最外层, 表示这对标记间的内容是HTML文 档。我们还会看到一些Hompage省略<HTML>标记,因为.html 或.htm 文件被Web浏览器默认为是HTML文档。<HEAD> 之间包括文档的头部信息,如文档总标题等,若不需头部信息则可省略此标记。<BODY> 标记一般不省略, 表示正文内容的开始。

 

 

第2章   系统分析

2.1  网站的可行性分析

 

随着计算机技术的发展和网络人口的增加,网络世界也越来越广博,越来越丰富,电子商务已经成为网上的一股潮流。我们相信要不了太长有时间,顾客就可以在网络世界上获得他们在现实世界上可以获得的所有商品和服务。

可行性研究是为了弄清楚系统开发的项目是不是可以实现和值得进行研究的过程,实际上是一次大大简化系统分析和系统设计的过程,所以,进行可执行性的分析是非常必要的,也是很重要的,经过最初的设计目标和进行的市场调查得出以下四点的可行性分析:

1、经济可行性:即实现这个平台设计有没有什么经济效益?该平台设计只是作为本人的毕业设计,又因为本人的设计能力有限,其功能还不够完善,所以没有什么经济效益可谈。

技术可行性:即现有的技术能否开发该平台,会有哪些困难。运用ASP编程和Access数据库技术,这点当然可以做到。

操作可行性:即该平台规定的运行方式是否可行。有Windows XP、Microsoft IIS和Internet Explorer就能实现它。

法律可行性:即该平台的开发会不会在社会上引起侵权或其它责任问题。因为该平台是作为毕业设计与商业无关,又因为是自主开发设计,因此不会构成侵权,在法律上是可行的。

通过以上的可行性分析,我将采用Microsoft IIS+ASP结合的技术,运用Access数据库对网站进行建设。

 

2.21  网站的需求分析

系统分析即需求分析,是平台开发的一个不可缺少的环节,为了能够使本系统更好、更完善地被设计出来,就必须先进行调查研究。在系统调查的基础上,对新系统的功能进行细致的分析,从而才能够开发出完整的系统设计。                      

需求分析阶段确定的系统逻辑模型是以后设计和实现目标系统的基础,因此必须准确完整地体现用户的要求。系统分析员通常都是计算机软件专家,技术专家一般不喜欢着手搞具体设计,然而,一旦分析员开始谈论程序设计的细节时,就会脱离用户,使他们不能继续提出他们的要求和建议。软件工程使用的结构分析设计的方法为每个阶段都规定了特定的结束标准,需求分析阶段必须提出完整的准确的系统逻辑模型,经过用户确认之后才能进入下一阶段。

需求分析是软件生命周期的一个重要阶段,它根本的任务是确定为了满足用户的需要必须做什么。具体地说,应该确定系统必须具有的功能和性能,系统要求的运行环境,并且预测系统发展的前景,必须仔细分析系统中的数据,既要分析系统中的数据流。又要分析长期使用的数据存储,通过分析应该得出用数据流图、数据字典,为系统的设计奠定基础。根据企业的需要,我们将设立前台管理系统(信息发布系统、客户调查系统、产品展示系统、网上订货系统)和后台管理系统。

信息发布系统里面涉及一切需要发布的信息,包括信息存储和更新(旧信息的修改和新信息的添加)。

客户调查系统是管理客户对本企业的产品的需求、相应的意见反馈。

产品展示系统则负责展示本企业的所有产品。

网上订货系统就是在网上给客户提供订货和相应支付方式。

该企业网站管理系统基于ASP+ACCESS技术开发的电子商务平台,属于全自动化、全智能的在线方式管理、维护、更新的网站管理系统。后台管理系统采用Access数据库技术。前台管理系统和后台管理系统的协调一致。

后台主要功能:

系统管理、产品管理、订单管理、会员管理、新闻管理、留言管理、调查管理。

前台网页所实现的主要功能模块是新闻资讯、产品展示、营销网络、客户服务。

新闻资讯包括企业新闻和业内资讯;产品展示包括产品展示、产品分类和产品搜索;营销网络包括国内市场和国外市场;客户服务包括会员中心、信息反馈、留言中心、订单查询。

 

 

2.2 网站的可行性分析

 

随着计算机技术的发展和网络人口的增加,网络世界也越来越广博,越来越丰富,电子商务已经成为网上的一股潮流。我们相信要不了太长有时间,顾客就可以在网络世界上获得他们在现实世界上可以获得的所有商品和服务。

可行性研究是为了弄清楚系统开发的项目是不是可以实现和值得进行研究的过程,实际上是一次大大简化系统分析和系统设计的过程,所以,进行可执行性的分析是非常必要的,也是很重要的,经过最初的设计目标和进行的市场调查得出以下四点的可行性分析:

1、经济可行性:即实现这个平台设计有没有什么经济效益?该平台设计只是作为本人的毕业设计,又因为本人的设计能力有限,其功能还不能完善,所以没有什么经济效益可谈。

  • 技术可行性:即现有的技术能否开发该平台,会有哪些困难。
  • 运行可行性:即该平台规定的运行方式是否可行。
  • 法律可行性:即该平台的开发会不会在社会上引起侵权或其它责任问题。因为该平台是作为毕业设计与商业无关,又因为是自主开发设计,因此不会构成侵权,在法律上是可行的。

通过以上的可行性分析,我将采用Microsoft IIS+ASP将结合的技术,运用Access数据库对网站进行建设。

 

 

 

 

 

 

 

 

第3章   系统设计

 

 

后台管理系统结构:

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

后台管理示意流程图:

 

3.1  登录

3.1.1 后台管理登录界面

进入后台管理(管理员)登录界面即Login.asp,里面的验证码调用checkcode.asp。

 

图3.1

 

 

Login.asp:

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link rel="stylesheet" href="inc/southidc.css">

<script language=javascript>

function SetFocus()

{

if (document.Login.UserName.value=="")

document.Login.UserName.focus();

else

document.Login.UserName.select();

}

function CheckForm()

{

if(document.Login.UserName.value=="")

{

alert("请输入用户名!");

document.Login.UserName.focus();

return false;

}

if(document.Login.Password.value == "")

{

alert("请输入密码!");

document.Login.Password.focus();

return false;

}

if (document.Login.CheckCode.value==""){

       alert ("请输入您的验证码!");

       document.Login.CheckCode.focus();

       return(false);

    }

}

</script>

 

 

checkcode.asp:

<%

Option Explicit

Response.buffer=true

NumCode

Function NumCode()

Response.Expires = -1

Response.AddHeader "Pragma","no-cache"

Response.AddHeader "cache-ctrol","no-cache"

On Error Resume Next

Dim zNum,i,j

Dim Ados,Ados1

Randomize timer

zNum = cint(8999*Rnd+1000)

Session("CheckCode") = zNum

Dim zimg(4),NStr

NStr=cstr(zNum)

For i=0 To 3

zimg(i)=cint(mid(NStr,i+1,1))

Next

Dim Pos

Set Ados=Server.CreateObject("Adodb.Stream")

Ados.Mode=3

Ados.Type=1

Ados.Open

Set Ados1=Server.CreateObject("Adodb.Stream")

Ados1.Mode=3

Ados1.Type=1

Ados1.Open

Ados.LoadFromFile(Server.mappath("../image/body.Fix"))

Ados1.write Ados.read(1280)

For i=0 To 3

Ados.Position=(9-zimg(i))*320

Ados1.Position=i*320

Ados1.write ados.read(320)

Next

Ados.LoadFromFile(Server.mappath("../image/head.fix"))

Pos=lenb(Ados.read())

Ados.Position=Pos

For i=0 To 9 Step 1

For j=0 To 3

Ados1.Position=i*32+j*320

Ados.Position=Pos+30*j+i*120

Ados.write ados1.read(30)

Next

Next

Response.ContentType = "image/BMP"

Ados.Position=0

Response.BinaryWrite Ados.read()

Ados.Close:set Ados=nothing

Ados1.Close:set Ados1=nothing

If Err Then Session("CheckCode") = 9999

End Function

%>

能否进入后台管理系统,调用Admin_ChkLogin.asp,其中又用到Conn.asp(连接数据库),Config.asp(配置),md5.asp(加密算法)。

Admin_ChkLogin.asp:

<%

dim sql,rs

dim username,password,CheckCode

username=replace(trim(request("username")),"'","")

password=replace(trim(Request("password")),"'","")

CheckCode=replace(trim(Request("CheckCode")),"'","")

if UserName="" then

FoundErr=True

ErrMsg=ErrMsg & "<br><li>用户名不能为空!

end if

if Password="" then

FoundErr=True

ErrMsg=ErrMsg & "<br><li>密码不能为空!

 end if

if CheckCode="" then

FoundErr=True

ErrMsg=ErrMsg & "<br><li>验证码不能为空!

 end if

if session("CheckCode")="" then

FoundErr=True

ErrMsg=ErrMsg & "<br>

你登录时间过长,请重新返回登录页面进行登录。

end if

if CheckCode<>CStr(session("CheckCode")) then

FoundErr=True

ErrMsg=ErrMsg & "<br><li>您输入的确认码和系统产生的不一致,请重新输入。

end if

if FoundErr<>True then

   password=md5(password)

set rs=server.createobject("adodb.recordset")

sql="select * from Admin where password='"&password&"' and username='"&username&"'"

rs.open sql,conn,1,3

if rs.bof and rs.eof then

FoundErr=True

ErrMsg=ErrMsg & "<br><li>用户名或密码错误!!! else

if password<>rs("password") then

FoundErr=True

ErrMsg=ErrMsg & "<br><li>用户名或密码错误!!! else

    RndPassword=GetRndPassword(16)

rs("LastLoginIP")=Request.ServerVariables("REMOTE_ADDR")

rs("LastLoginTime")=now()

rs("LoginTimes")=rs("LoginTimes")+1

rs("RndPassword")=RndPassword

rs.update

session.Timeout=SessionTimeout

session("AdminName")=rs("username")

session("AdminPassword")=rs("Password")

session("RndPassword")=RndPassword

rs.close

set rs=nothing

call CloseConn()

Response.Redirect "default.asp"

end if

end if

rs.close

set rs=nothing

end if

if FoundErr=True then

call WriteErrMsg()

end if

call CloseConn()

sub WriteErrMsg()

dim strErr

strErr=strErr & "

response.write strErr

end sub

Function GetRndPassword(PasswordLen)

Dim Ran,i,strPassword

strPassword=""

For i=1 To PasswordLen

Randomize

Ran = CInt(Rnd * 2)

Randomize

If Ran = 0 Then

Ran = CInt(Rnd * 25) + 97

strPassword =strPassword & UCase(Chr(Ran))

ElseIf Ran = 1 Then

Ran = CInt(Rnd * 9)

strPassword = strPassword & Ran

ElseIf Ran = 2 Then

Ran = CInt(Rnd * 25) + 97

strPassword =strPassword & Chr(Ran)

End If

Next

GetRndPassword=strPassword

End Function

%>

 

Conn.asp:

<%

dim conn dim connstr dim db

db="../Databases/myszw.mdb" '数据库文件位置

on error resume next

connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

set conn=server.createobject("ADODB.CONNECTION")

if err then

err.clear

else

conn.open connstr

end if

%>

 

config.asp:

<%

Const SiteName="浙西网域公司企业网站"        '网站名称

Const SiteTitle="浙西网域公司企业网站"        '网站标题

Const SiteUrl="http://www.zxwu.cn/gsqy/"        '网站地址

Const EnterpriseMail="http://mail.163.com"        '企业邮局

Const LogoUrl="images/logo.gif"        'Logo地址

Const BannerUrl="Img/myszw.swf"        'Banner地址

Const High=100        '高度

Const WebmasterName="ykb"        '站长姓名

Const WebmasterEmail="ykb@163.com"        '站长信箱

Const Copyright="版权所有 浙西网域公司企业网站<br>销售热线:0570-8027101,13117101402,13710829762 在线客服QQ:38306293,417586492"        '版权信息

Const MaxPerPage_Default=10        '首页每页产品或文章数

Const MaxPerPage_Search=10        '文章搜索页每页文章数

Const ShowContentByPage="Yes"        '文章内容是否分页显示

Const MaxPerPage_Content=200000        '每页显示大约字符数

Const EnableArticleCheck="Yes"        '是否启用文章审核功能

Const HitsOfHot=50        '热门文章点击数

%>

 

Default.asp:

<%

if session("AdminName") = "" then

    response.Redirect "Login.asp"

end if

%>

<style type="text/css">

.navPoint {COLOR: white; CURSOR: hand; FONT-FAMILY: Webdings; FONT-SIZE: 9pt}

.a2{BACKGROUND-COLOR: A4B6D7;}

</style>

<%

select case Request("menu")

case ""

main

case "top"

top

end select

%>

<% sub top %>

<% sub main %>

<script>

if(self!=top){top.location=self.location;}

function switchSysBar(){

if (switchPoint.innerText==3){

switchPoint.innerText=4

document.all("frmTitle").style.display="none"

}else{

switchPoint.innerText=3

document.all("frmTitle").style.display=""

}}

</script>

<script>

  if(window.screen.width<'1024'){switchSysBar()}

</script>

</body>

<%

end sub

Function IsObjInstalled(strClassString)

On Error Resume Next

IsObjInstalled = False

Err = 0

Dim xTestObj

Set xTestObj = Server.CreateObject(strClassString)

If 0 = Err Then IsObjInstalled = True

Set xTestObj = Nothing

Err = 0

End Function

%>

左子树目录调用LeftTree.asp,右边显示“系统信息”(Sysadmin_view.asp),它用到Conn.asp和Admin.asp。

 

图3.2

 

 

图3.3

企业网站设计与实现[点击下载]

如需要全部源码,联系QQ:2812491287如需要全部源码,联系QQ:2812491287

评论