查看文章
 
ext-treepanel的使用:用asp写的一个treeloader
2008-11-14 17:06
asp代码:
<%@ LANGUAGE = VBScript CodePage = 65001%>
<!--#include file="../conn/conn.asp" -->
<%
Response.Charset="utf-8"
Response.Buffer   =   True
Response.ExpiresAbsolute   =   Now()   -   1
Response.Expires   =   0
Response.CacheControl   =   "no-cache"
Response.AddHeader   "Pragma",   "No-Cache"  
%>
<%
dim sql,rs,flag,op
dim tj
tj = request.QueryString("tj")
sql = "select id,xxmcheng,dwlbie,dwlbmcheng from v_dwxxb "& tj &" order by dwlbie desc"
flag=rec(rs,sql)
if flag then
    set id = rs("id")
    set dw = rs("xxmcheng")
    set lb = rs("dwlbie")
    while not rs.eof
        select case lb
            case 5
            f5=1
            op5 = op5 & "{""id"":"""& id &""",""text"":"""& dw &""",""leaf"":true,""children"":[]},"
           
            case 4
            f4=1
            op4 = op4 & "{""id"":"""& id &""",""text"":"""& dw &""",""leaf"":true,""children"":[]},"
           
            case 3
            f3=1
            op3 = op3 & "{""id"":"""& id &""",""text"":"""& dw &""",""leaf"":true,""children"":[]},"
           
            case 2
            f2=1
            op2 = op2 & "{""id"":"""& id &""",""text"":"""& dw &""",""leaf"":true,""children"":[]},"
           
            case 1
            f1 = 1
            op1 = op1 & "{""id"":"""& id &""",""text"":"""& dw &""",""leaf"":true,""children"":[]},"
        end select
        rs.movenext
    wend
end if
if f5=1 then
    op5 = "{""id"":""a"",""text"":""局机关"",""leaf"":false,""children"":["&delLast(op5)&"]},"
    op = op & op5
end if
if f4=1 then
    op4 = "{""id"":""b"",""text"":""教科培"",""leaf"":false,""children"":["&delLast(op4)&"]},"
    op = op & op4
end if
if f3=1 then
    op3 = "{""id"":""c"",""text"":""中学"",""leaf"":false,""children"":["&delLast(op3)&"]},"
    op = op & op3
end if
if f2=1 then
    op2 = "{""id"":""d"",""text"":""小学"",""leaf"":false,""children"":["&delLast(op2)&"]},"
    op = op & op2
end if
if f1=1 then
    op1 = "{""id"":""e"",""text"":""幼儿园"",""leaf"":false,""children"":["&delLast(op1)&"]}"
    op = op & op1
end if
op = "[" & op5 & op4 & op3 & op2 & op1 &"]"
rw op
conn.close()
set conn = nothing   
function delLast(a)
    delLast = left(a,len(a)-1)
end function
%>


js代码:
Ext.onReady(function(){
    Ext.QuickTips.init();
   var mytree=new Ext.tree.TreePanel({
       el:"container",
       animate:true,
       title:"简单Extjs动态树",
       collapsible:true,
       enableDD:true,
       enableDrag:true,
       rootVisible:true,
       autoScroll:true,
       autoHeight:true,
       width:150,
       lines:true,
       loader:new Ext.tree.TreeLoader({
          dataUrl:"json_tree.asp"
       }),
       root:new Ext.tree.AsyncTreeNode({
           id:"root",
           text:"控制面板",
           expanded:true
       }),
     });
  

  
   //mytree.setRootNode(root);
   mytree.render();//不要忘记render()下,不然不显示哦
})


html:
<div id="container">
    </div>

类别:Ext||添加到搜藏 |分享到i贴吧|浏览(328)|评论 (0)
 
最近读者:
 
网友评论:
发表评论:
姓 名:
网址或邮箱: (选填)
内 容:
     

   
帮助中心 | 空间客服 | 投诉中心 | 空间协议
©2012 Baidu