仓酷云

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

[学习教程] ASP编程:asp无穷级分类加js压缩舒展功效代码

[复制链接]
因胸联盟 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:03:40 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
asp对于服务器的要求较高,一般的服务器如果访问量一大就垮了,不得不重启。为了便利利用分类,我界说了一个分类表category,内里字段是
id(主动编号)cat_name(分类名)parent_id(父ID,对应本表ID)cat_order(按次)is_show(是不是显现)u_id(这个用来区分是旧事分类,仍是产物分类,仍是其他分类),为了便利,我将这些分类全体放在这张表中。
在给客户增加分类的时分,了局有太多的分类,原本前台显现的时分,将它们全体显现出来了,好长。客户提出修正定见,请求将它们改成点击年夜分类,才能够将其子分类显现出来,而且每一个分类上面另有一条虚线,而且年夜分类后面有个图片加号,睁开后要酿成减号。
<script>
functionfd(id,num)
{
t=$("c"+id+"_1").style.display;

if(t=="none")
{
t1="block";
t2="images/fll_34.gif";
}
else
{
t1="none";
t2="images/fll_34.gif";
}
for(i=1;i<=num;i++)
{
$("c"+id+"_"+i).style.display=t1;
$("d_"+id).src=t2;
}
}
function$(id)
{
returndocument.getElementById(id);
}
</script>
这是asp无穷级显现分类代码,并给这些分类加上id
<%
功效:asp无穷级显现分类+js显现与埋没
wangsdong
开辟:www.aspprogram.cn
参数:parent_id为父ID,stype为旧事,产物,文章年夜分类
原创文章,转载请保存些信息,感谢
functioncat111(parent_id,stype)
setrs1=server.createobject("adodb.recordset")
sql="selectcat_name,cat_id,parent_idfromcategorywhereparent_id="&parent_id&"andu_id="&stype&"andis_show=1orderbycat_orderasc"
setrs1=conn.execute(sql)
Ifrs1.eofThen
Else
if(depath>2)then
display2="none"
else
display2="block"
endif
dimj
j=1
dowhilenotrs1.eof
cat_name1=rs1("cat_name")
cat_id1=rs1("cat_id")
parent_id1=rs1("parent_id")
******************上面是你要显现的******************
m9=0
sql2="selectcount(cat_id)astfromcategorywhereparent_id="&cat_id1&"andu_id="&stype&""
setrs2=server.createobject("adodb.recordset")
setrs2=conn.execute(sql2)
ifnotrs2.eofthen
m9=rs2("t")
else
m9=0
endif
rs2.close

if(depath<=2)then
mgif="images/-.gif"
a="block"
else
if(m9>0)then
mgif="images/+.gif"
else
mgif="images/-.gif"
endif
if(depath=4)then
a="block"
else
a="none"
endif
endif


catstr=catstr&"<trid=""c"&parent_id&"_"&j&"""style=""display:"&a&"""><tdwidth=""25""align=""center""valign=""middle""class=""dotted_class""><imgsrc="""&mgif&"""width=""12""height=""11""id=""d_"&cat_id1&"""></td><tdclass=""dotted_classleftcatCSS"">"
if(m9>0)then
catstr=catstr&"<ahref=""javascript:void(0);""_fcksavedurl="""javascript:void(0);"""_fcksavedurl="""javascript:void(0);"""fd("&cat_id1&","&m9&")"">"&vbnewline
else
catstr=catstr&"<ahref=""products.asp?id="&cat_id1&"""target=""_blank"">"&vbnewline
endif
fori=1todepath
catstr=catstr&""
Next
catstr=catstr&cat_name1&"</a></td></tr>"&vbnewline
m9=0

sql2="selectcat_name,cat_idfromcategorywhereparent_id="&parent_id1&"andu_id="&stype&"orderbycat_orderasc"
setrs2=server.createobject("adodb.recordset")
setrs2=conn.execute(sql2)
ifnotrs2.eofthen
depath=depath+4
callcat111(cat_id1,stype)
endif
rs2.close
setrs2=nothing
depath=depath-4
******************下面是你要显现的******************
j=j+1
rs1.movenext
loop
EndIf
rs1.close
setrs1=nothing
endFunction
%>
在利用这个函数之前加上
catstr=""
然后再call,上面的虚线加在css中的dotted_class内里,如许就弄定了。
注重:这里失掉的是一个表格的行,要和其他行放在一同,不要加到td内里往了。
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来;
兰色精灵 该用户已被删除
沙发
发表于 2015-1-17 15:21:36 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
灵魂腐蚀 该用户已被删除
板凳
发表于 2015-1-20 20:09:49 | 只看该作者
我认为比较好的方法是找一些比较经典的例子,每个例子比较集中一种编程思想而设计的。
变相怪杰 该用户已被删除
地板
发表于 2015-1-29 20:10:08 | 只看该作者
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。
莫相离 该用户已被删除
5#
发表于 2015-2-6 04:19:41 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
海妖 该用户已被删除
6#
发表于 2015-2-15 13:01:49 | 只看该作者
在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。
柔情似水 该用户已被删除
7#
发表于 2015-3-4 11:32:36 | 只看该作者
那么,ASP.Net有哪些改进呢?
透明 该用户已被删除
8#
发表于 2015-3-11 19:14:25 | 只看该作者
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
9#
发表于 2015-3-27 19:08:36 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-11-1 07:46

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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