|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
当然了,现在国内CRM厂商的产品与其说是CRM,但从至少从我的角度分析上来看,充其量只是一个大型的进销存而已了,了解尚浅,不够胆详评,这里只提技术问题菜单跟我学做树型菜单(一)
关头字:ASP|树型菜单|递回
写在后面
在网页中,为了便利构造内容,常常用到的要数菜单了,用一个树型的菜
单(效果参看http://www.he-xi.com/tree),能够十分方
便地对庞大的内容举行构造。好比商品的分类;下载文件的分类;网站导航等
等。这里要办理的就是如许一个成绩。我们将会用数据库来存储树型菜单的结
构,并用ASP程序来输出。
(一)功效计划
树型菜单在功效计划上没有太多的请求。只要对纪录的增、删、改。另有
就是最基础的,也是最主要的显现功效。显现功效要把纪录显现出来,而且要
把显现的内容构造成客户真个静态网页。还能够到场挪动的功效,完成的时分
大概有点庞大,在这里我没有详细写出来,有乐趣的伴侣能够本人写。还能够
扩大办理员登录功效,只要办理员登录后才干举行办理,没有登录的话只显现
菜单。别的的功效有待更新,这里就纷歧一列出了。详细的功效计划以下:
1、显现菜单:最基础也是最主要的功效。显现菜单,并构造成客户真个静态网页。
2、增添纪录:增添一个纪录,作为所选择的纪录的子菜单。
3、删除纪录:删除所选择的纪录。
4、修正纪录:修正所选择的纪录。可修正的属性有:称号,链接。
5、*挪动纪录:把所选择的纪录挪动到指定的纪录下,成为它的子菜单。
6、*办理员登录:只要登录后才干办理。
7、存储的内容:每一个纪录中存储菜单的名字和菜单的链接。
注:加*号的在本文中没有完成。
(二)数据库计划
数据库利用ACCESS2000数据库。数据库文件为tree.mdb假如请求平安,能够
更名为tree.asp不外记得在ASP程序中也要做响应的修正。数据库布局以下:
表名:treemenu
字段名字段范例申明
id主动编号/有索引无反复/递增每一个纪录的编号
par_id长整型/有索引有反复父结点的ID号/为0暗示根
chi_id长整型/有索引有反复子结点的个数
Txt文本/长度50菜单的称号/50太少的话本人改
Link文本/长度50链接/50太少的话本人改
新建好数据表后先输出一个纪录,par_id和chi_id都为0别的恣意
(三)文件计划
在这里仅作为演示,并没有到场太多功效。以是只要一个文件。取名为index.asp便
于放在文件夹做为默许文档。在这里将会用到一些图象,用于暗示菜单的形态,能够翻开资本
扫瞄器,睁开一些文件夹,然后抓图上去举行编纂一下。要注重,失掉的图象最好巨细不异。
我们文中利用的是16X16的图象。能够到这里间接下载:
http://www.he-xi.com/tree/images.zip
(四)相干函数
基础上要用到的函数都和《跟我学做留言本》一文的不异。次要是用于操纵数据库的。在
这里也再次列出来:
共用函数文件,文件名:operation$db.asp
<%
*******************************************************************
通用数据库ASP函数
*******************************************************************
数据库常数
databasename="tree.mdb"数据库名,假如更名的话,在这里修正就好了
*******************************************************************
翻开数据库
subopendb(connect)
setconnect=server.CreateObject("ADODB.connection")
connect.ConnectionString="DRIVER={MicrosoftAccessDriver(*.mdb)};DBQ="&_
server.MapPath(databasename)
connect.Openstrconn
endsub
*******************************************************************
封闭数据库
subclosedb(connect)
connect.close
setconnect=nothing
endsub
*******************************************************************
翻开单个表读
subopentable(connect,tbname,myrs)
setmyrs=server.createobject("ADODB.recordset")
rssql="select*from"&tbname
myrs.openrssql,connect,1,1
endsub
*******************************************************************
封闭一时表
subclosetable(rs)
rs.close
setrs=nothing
endsub
*******************************************************************
查询数据库
subsearchtable(connect,sql,rs)
setrs=server.createobject("ADODB.recordset")
rs.opensql,connect,1,1
endsub
*******************************************************************
查询并变动数据库
subchangetable(connect,sql,rs)
setrs=server.createobject("ADODB.recordset")
rs.opensql,connect,1,3
endsub
*******************************************************************
显现信息用于调试
Subw(msg)
response.writemsg
endsub
*******************************************************************
程序中止用于调试
subuserstop()
response.end
endsub
%>
</p>SQLServer是基于服务器端的中型的数据库,可以适合大容量数据的应用,在功能上管理上也要比Access要强得多。在处理海量数据的效率,后台开发的灵活性,可扩展性等方面强大。 |
|