仓酷云

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

[学习教程] ASP网页编程之ASP实例教程:asp无穷级显现分类代码

[复制链接]
山那边是海 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:04:03 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

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

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

x
楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。</p>为了便利利用分类,我界说了一个分类表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显现与埋没
参数: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);"""onclick=""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内里往了。优点:简单易学、开发速度快、有很多年“历史”,能找到非常多别人做好的程序来用、配合activeX功能强大,很多php做不到的asp+activeX能做到,例如银行安全控件
谁可相欹 该用户已被删除
8#
发表于 2015-3-12 22:16:14 | 只看该作者
接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
深爱那片海 该用户已被删除
7#
发表于 2015-3-6 06:40:58 | 只看该作者
那么,ASP.Net有哪些改进呢?
再见西城 该用户已被删除
6#
发表于 2015-2-18 12:37:11 | 只看该作者
以上是语言本身的弱点,在功能方面ASP同样存在问题,第一是功能太弱,一些底层操作只能通过组件来完成,在这点上是远远比不上PHP/JSP,其次就是缺乏完善的纠错/调试功能,这点上ASP/PHP/JSP差不多。
活着的死人 该用户已被删除
5#
发表于 2015-2-6 20:04:12 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
admin 该用户已被删除
地板
发表于 2015-1-31 15:23:27 | 只看该作者
另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)
若相依 该用户已被删除
板凳
发表于 2015-1-23 05:48:28 来自手机 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
柔情似水 该用户已被删除
沙发
发表于 2015-1-18 18:51:46 来自手机 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-12-22 23:58

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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