| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 841 人关注过本帖
标题:if的一段代码,呵呵,初等的,解释一下,谢谢大家了
取消只看楼主 加入收藏
灯、、
Rank: 4
等 级:业余侠客
威 望:2
帖 子:142
专家分:288
注 册:2010-6-21
结帖率:90%
收藏
已结贴  问题点数:20 回复次数:2 
if的一段代码,呵呵,初等的,解释一下,谢谢大家了
我本来是学jsp的,因为临时要做个asp的网站后台,下面这段代码应该是VB之类的,我对VB只是大概了解,一些语法没学过,请大家给我解释一下,谢谢了

<!--#include file="inc/setup.asp" -->
<!--#include file="inc/CheckClass.inc.asp" -->
<!--#include file="dbconnect/news.inc.asp" -->

<%
on error resume next
dim pmcount,pageno

'//设置每页新闻数目
pmcount=news_front_count

dim rs,sql
set rs=server.createobject("adodb.recordset")

s_keyword = RtnReplaceString(trim(request("keyword")))
s_cataid = RtnReplaceInt(trim(request("cataid")),0)

sub getNewsBoardTree()
    set rsf=server.CreateObject("adodb.recordset")
    sqlf="Select * from newscata order by rootid"
    rsf.Open sqlf,conn,1,3
  
    do while not rsf.EOF
        tempcataStr="<option value='"&trim(rsf("id"))&"'"
        if trim(rsf("id")) = s_cataid then tempcataStr = tempcataStr&" selected"
            
        tempcataStr = tempcataStr&">"
        tempcataStr = tempcataStr&" | |"
            
        for i=1 to rsf("level")-1
            tempcataStr = tempcataStr&" |"
        next
            
        tempcataStr = tempcataStr&"_"&trim(rsf("title"))&"</option>"
        Response.Write tempcataStr
            
        rsf.MoveNext
        loop
        
      rsf.Close()
      set rsf=nothing
end sub
%>


这段代码放在HTML代码的上面
搜索更多相关主题的帖子: 解释 代码 初等 
2010-09-19 09:48
灯、、
Rank: 4
等 级:业余侠客
威 望:2
帖 子:142
专家分:288
注 册:2010-6-21
收藏
得分:0 
回复 3楼 cnfarer
我就是不太懂这几行代码啊,好像都是给tempcataStr一直在赋值吗,看着也不像sql语句,这种语法和C,java都不一样,所以看不懂,麻烦说下,呵呵
 tempcataStr = tempcataStr&" selected"
            
        tempcataStr = tempcataStr&">"
        tempcataStr = tempcataStr&" | |"
            
        for i=1 to rsf("level")-1
            tempcataStr = tempcataStr&" |"
2010-09-20 10:41
灯、、
Rank: 4
等 级:业余侠客
威 望:2
帖 子:142
专家分:288
注 册:2010-6-21
收藏
得分:0 
回复 6楼 hams
能用汉语解释下意思吗?里面是怎样运作的,真的谢谢
2010-09-20 11:45
快速回复:if的一段代码,呵呵,初等的,解释一下,谢谢大家了
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017596 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved