仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 373|回复: 8
打印 上一主题 下一主题

[学习教程] ASP网页编程之ASP+ACCESS完成的无穷级目次树

[复制链接]
金色的骷髅 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:35:27 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
缺点:正版成本价格贵(盗版就不说了)、不够安全,大多数服务器用windows系统,没有linux安全下载地点:http://www.ckuyun.com/download/treemenu.rar
关头代码:
<%
setconn=server.createobject("ADODB.CONNECTION")
connstr="DBQ="+server.mappath("db1.mdb")+";DefaultDir=;DRIVER={MicrosoftAccessDriver(*.mdb)};"
conn.openconnstr
functionmenu(id)
setrs=server.CreateObject("adodb.recordset")
sql="select*frommenuwhereid1="&id&"orderbyurl,id"
rs.opensql,conn,1,1
ifrs.recordcount=0then
rs.close
setrs=nothing
exitfunction
endif
response.write("<tableborder=0cellspacing=0cellpadding=0>")
i=1
whilenotrs.eof
iflen(rs("url"))>0then
ifi=rs.recordcountthen
menutype="file1"
else
menutype="file"
endif
menuname="<ahref="&rs("url")&"target=_blank>"&rs("menuname")&"</a>"

else
ifi=rs.recordcountthen
menutype="menu3"
listtype="list1"
&rs("id")&"))if(style.display==){style.display=none;this.className=menu3;}else{style.display=;this.className=menu4;}"
else
menutype="menu1"
listtype="list"
&rs("id")&"))if(style.display==){style.display=none;this.className=menu1;}else{style.display=;this.className=menu2;}"
endif
menuname=rs("menuname")
endif
%>
<tr>
<tdclass="<%=menutype%>"><%=menuname%></td>
</tr>
<%iflen(rs("url"))<3then%>
<trid="id<%=rs("id")%>"style="display:none">
<tdclass="<%=listtype%>"><%menu(rs("id"))%></td>
</tr>
<%
endif
rs.movenext
i=i+1
wend
response.write("</table>")
rs.close
setrs=nothing
endfunction
%>
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title>=========无穷级目次树=========http://www.ckuyun.com</title>
<styletype="text/CSS">
<!--
.menu1{
background-image:url(folder1.gif);
background-repeat:no-repeat;
height:17px;
left:32px;
padding-left:32px;
cursor:hand;
}
.menu2{
background-image:url(folder2.gif);
background-repeat:no-repeat;
height:17px;
left:32px;
padding-left:32px;
cursor:hand;
}
.menu3{
background-image:url(folder3.gif);
background-repeat:no-repeat;
height:17px;
left:32px;
padding-left:32px;
cursor:hand;
}
.menu4{
background-image:url(folder4.gif);
background-repeat:no-repeat;
height:17px;
left:32px;
padding-left:32px;
cursor:hand;
}
.list{
padding-left:20px;
background-image:url(list.gif);
background-repeat:repeat-y;
}
.list1{
padding-left:20px;
}
.file{
background-image:url(file.gif);
background-repeat:no-repeat;
height:16px;
cursor:hand;
padding-left:32px;
}
.file1{
background-image:url(file1.gif);
background-repeat:no-repeat;
height:16px;
cursor:hand;
padding-left:32px;
}
body{
font-size:9pt;
color:#000000;
background-color:#FFFFFF;
}
a:link{
font-size:9pt;
color:#000000;
text-decoration:none;
}
a:visited{
font-size:9pt;
color:#000000;
text-decoration:none;
}
a:hover{
font-size:9pt;
color:#0000FF;
text-decoration:none;
position:relative;
right:1px;
bottom:1px;
}
a:active{
font-size:9pt;
color:#000000;
text-decoration:none;
}
-->
</style>
</head>
<body>
<ahref="http://www.ckuyun.com/"target="_blank">http://www.ckuyun.com/</a>供应最新下载《<ahref="menu.asp">办理</a>》<br>
<%
menu0
conn.close
setconn=nothing
%>
</body>
</html>
Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。
山那边是海 该用户已被删除
沙发
发表于 2015-1-19 17:52:04 | 只看该作者
Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点)
灵魂腐蚀 该用户已被删除
板凳
发表于 2015-1-25 18:39:08 | 只看该作者
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
简单生活 该用户已被删除
地板
发表于 2015-2-3 13:09:58 | 只看该作者
接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
飘飘悠悠 该用户已被删除
5#
发表于 2015-2-9 02:00:05 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
再见西城 该用户已被删除
6#
发表于 2015-2-26 18:24:05 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
兰色精灵 该用户已被删除
7#
发表于 2015-3-8 16:31:28 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
蒙在股里 该用户已被删除
8#
发表于 2015-3-16 05:48:01 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
再现理想 该用户已被删除
9#
发表于 2015-3-22 20:13:42 | 只看该作者
多看多学多思。多看一些关于ASP的书籍,一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人,向同学老师多多学习,不论知识的大小;多思则是要将学到的知识灵活运用。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 03:43

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表