第08章 搜索引擎网站系统

第8章搜索引擎网站系统本章提要所谓搜索引擎，是指企业出于扩大宣传的目的，将自己的网站提交到搜索引擎，让相关的产品和服务信息进入到搜索引擎数据库，以增加与潜在客户通过互联网建立联系的机会。在我们以往所做的用户调查中，可以发现有不少企业似乎都存在这样一种意识：只要把网站建设好了，就已经实现了企业信息化，就可以搞电子商务了。其实不然，这是一种误解。实现电子商务远不像建一个网站那么简单，信息若是到达不了手中，这本身也是对资源的一种浪费。据统计，目前世界上网站总数已经超过了4000万个，在这浩若烟海的信息世界里，如何让你的客户找到你，网站如何才能被更多的人访问，尤其是被自己的潜在客户浏览呢？要实现这一目标，有效地实施网上营销策略，就显得非常重要。那么，如何让网络营销发挥它的最大效能？这就需要借助专业的网站推广手段，而搜索引擎，正是网站推广中最廉价、最高效的方式，它可使你的网站吸引更多的潜在客户，从而实现企业利益最大化。研究表明，搜索引擎是目前最重要、效果最明显的网站推广方式，也是最为成熟的一种网络营销方法。ASP+SQLServer组建动态网站实例精讲——企业网站篇55488..11系系统统概概述述系统具有目录型搜索引擎的基本功能，目录类别分为层次管理、编辑、搜索功能定义、特征网站、推荐网站定义以及相应的辅助功能。网站建设完成后，您的客户可以选择自己感兴趣的类目，填写自己网站的信息进行提交，经过审核通过之后，网站即可被加入目录并可被搜索到。系统功能。1、网站信息登录模块可接受浏览者的链接申请。浏览者填写站点名称、类型和URL后提交，即自动录入数据库，经管理员开放后即可出现在页面上。2、搜索引擎信息管理模块网站管理员可分类查询或根据关键字查询数据库内的所有站点，并可增加、修改、删除数据库内的站点，并能自动更新。网站管理员可删除或开放浏览者的链接申请。88..22数数据据库库设设计计数据库技术的应用是信息资源管理最有效的方法。数据库设计是指对于一个给定的应用环境，构造最优的数据库模式，建立数据库及其应用系统，有效存储数据，满足用户信息要求和处理要求。88..22..11数数据据库库需需求求分分析析数据项和数据结构如下。l管理员表admin：管理员用户名、管理员密码。l网站目录表cat：id（自动编号）、目录名称。l网站二级目录表subcat：subcatid（自动编号）、二级目录名称、一级目录编号。l用户表ourusers：id（自动编号）、用户名、密码、电子邮件、icq号、oicq号、地址、性别、生日、加入日期和个人主页等。l网站信息表link2：id（自动编号）、网站名称、网站url地址、关键字、内容介绍、电子邮件、日期、一级目录编号、二级目录编号、审核控制和错误提示。88..22..22数数据据库库逻逻辑辑设设计计1.管理员表admin，如图8-1所示。图8-1资料信息表2.网站目录表cat，如图8-2所示。第8章搜索引擎网站系统555图8-2教师信息表3.网站二级目录表subcat，如图8-3所示。图8-3回复作业表4.用户表ourusers，如图8-4所示。图8-4栏目信息表5.网站信息表link2，如图8-5所示。图8-5栏目信息表88..22..33数数据据库库连连接接文文件件database.asp连接数据库，这是一开始就需写入的代码，代码如下。%setconn=server.CreateObject(ADODB.connection)conn.Connectionstring=Provider=sqloledb;&DataSource=127.0.0.1;InitialCatalog=qiye_8;UserId=sa;Password=password;conn.openASP+SQLServer组建动态网站实例精讲——企业网站篇556%88..33前前台台系系统统实实现现前台系统的作用主要是用户浏览目录寻找需要的网站，也可以通过搜索进行搜索网站。如果自己有网站，也可以登录网站到系统中，通过管理员审核后就可以显示在网页上了，如果你发现网站联接地址错误，还可以通过网站联接发送错误报告给管理员，管理员会及时更正。前台系统主要包含以下几个页。l网站首页login/register.asp。l网站二级目录页login/register_confirm.asp。l网站列表显示页login/login.asp。l连接错误报告页login/login_check.asp。l网站url指向页syjh/list.asp。l网站收录页syjh/business_info.asp。l网站搜索页syjh/publish_info.asp。88..33..11网网站站首首页页面面1.index.asp页面示例。如图8-6所示为网站首页的页面。图8-6网站首页2.index.asp页面代码分析。%Response.Cookies(tgDate)=now()%第8章搜索引擎网站系统557!--#includefile=head.asp--!--directory--!--分类目录:开始--tablewidth=97%border=0cellspacing=5cellpadding=0align=centercolwidth=33%colwidth=33%colwidth=33%/table!--分类目录:结束--!--网站列表:开始--tablewidth=600border=0cellspacing=0cellpadding=0trtdheight=1background=images/bg01.gifspacertype=blockwidth=1/td/tr/tabletablewidth=600border=0cellspacing=0cellpadding=10trtd/td/tr/tabletablewidth=97%border=0cellspacing=0cellpadding=2align=centerbgcolor=EEFFEFCENTERbAclass=cataHREF=index.asp首页/A/b/centerbrtableborder=0cellPadding=0cellSpacing=0height=237width=90%TBODYtrtdalign=center%Conn_String=Provider=sqloledb;&DataSource=127.0.0.1;InitialCatalog=qiye_8;UserId=sa;Password=password;SetConn=Server.CreateObject(ADODB.Connection)Conn.OpenConn_Stringsql=select*fromcatorderbycatsetrs=Conn.Execute(sql)%divalign=centercentertableborder=0width=90%%’显示网站一级目录页信息DowhileNOTrs.EOFColNum=1DowhileColNum3%trtdALIGN=LEFTVALIGN=topWIDTH=45%braclass=catahref=showsub.asp?CatID=%=rs(id)%&cat=%=serverurlencode(rs(cat))%b%=rs(cat)%/b/a%ParentID=rs(id)sqlcount=SELECTcount(url)FROMlink2whereparentid='&rs(id)ASP+SQLServer组建动态网站实例精讲——企业网站篇558&'andshow=1‘取得该一级目录页下的二级目录页信息SetRScounts=Conn.Execute(sqlcount)rcounts=RScounts(0)Response.Write((&rcounts&))Response.Writebrbrsubsql=SELECTtop3*FROMsubcatwherecatID='&ParentID&'orderbysubcatnamesetrssubcat=conn.Execute(subsql)count=rssubcat.RecordCountcount=1dowhilenotrssubcat.EOFandcount=3%ahref=showlink.asp?CatID=%=rssubcat(subcatID)%&parentID=%=rs(id)%&parentname=%=server.urlencode(rs(cat))%&Subname=%=server.urlencode(rssubcat(Subcatname))%%=rssubcat(subcatname)%/a  /font%rssubcat.movenextloop%/td%ifNOTrs.EOFthenrs.MoveNextendifColNum=ColNum+1ifNOTrs.EOFthen%tdALIGN=LEFTVALIGN=topWIDTH=45%braclass=catahref=showsub.asp?CatID=%=rs(id)%&cat=%=server.urlencode(rs(cat))%b%=rs(cat)%/b/FONT/a/font%ParentID=rs(id)‘计算出该目录页下的网站总数sqlcount=SELECTcount(url)FROMlink2whereparentid='&rs(id)&'andshow=1SetRScounts=Conn.Execute(sqlcount)rcounts=RScounts(0)Response.Write((&rcounts&))Response.Writebrbr‘显示一级目录下的前三个二级目录页名称第8章搜索引擎网站系统559subsql=SELECTtop3*FROMsubcatwherecatID='&ParentID&'orderbysubcatnamesetrssubcat=conn.Execute(subsql)count=rssubcat.RecordCountcount=1dowhilenotrssubcat.EOFandcount=3%ahref=showlink.asp?CatID=%=rssubcat(subcatID)%&parentID=%=rs(id)%&parentname=%=server.urlencode(rs(cat))%&Subname=%=server.urlencode(rssubcat(Subcatname))%%=rssubcat(subcatname)%/a  %rssubcat.movenextloop%/td%endifColNum=ColNum+1Loop%/tr%ifNOTrs.EOFthenrs.MoveNextendifLoop%/table/center/div%rs.closeConn.ClosesetConn=nothing%palign=center /td/tr/TBODY/table!--directoryend--!--网站列表:结束--!--rightcol--!--#includefile=gg.asp--!--rightcolend--ASP+SQLServer