Foxtable(狐表) → 用户栏目 → 专家坐堂 → 怎样设置 把加载树显示在主页来？ 代码改怎么写？ 弄好了好几次都没有弄对头 如图


  共有7821人关注过本帖树形打印复制链接

主题：怎样设置 把加载树显示在主页来？ 代码改怎么写？ 弄好了好几次都没有弄对头 如图
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		怎样设置 把加载树显示在主页来？ 代码改怎么写？ 弄好了好几次都没有弄对头 如图  发帖心情 Post By：2013/4/15 16:13:00 [显示全部帖子]

怎样设置 把加载树显示在主页来？ 代码改怎么写？ 弄好了好几次都没有弄对头   如图

 

 

 


图片点击可在新窗口打开查看此主题相关图片如下：1.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：2.jpg
图片点击可在新窗口打开查看

 

 求高手指导指导
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/15 16:40:00 [显示全部帖子]

这个我知道，关键是在那个窗口里显示，加载树里面的东西， 加载树里的东西不显示。怎么设置代码 ？？？？？
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/15 16:46:00 [显示全部帖子]

上面我说错了，应该是怎样设置代码， 让加载树里显示 如图1里的加载树里的东西。 当我在这个产品表里新增一个新的产品是，加载树里新增出来   多谢
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/17 13:47:00 [显示全部帖子]

那如果我要到达 如下图 所示 呢 ？

 


图片点击可在新窗口打开查看此主题相关图片如下：_8ak}d81p5ho{(1oetviop6.jpg
图片点击可在新窗口打开查看

跟这样一样，几种价格对比

图片点击可在新窗口打开查看此主题相关图片如下：`7~iz5nbdqx}n$nlc79_4.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2013-4-17 13:48:59编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		版主 不好意思 我没有设置的成功，您能否帮忙一下呢 谢谢  发帖心情 Post By：2013/4/23 11:07:00 [显示全部帖子]

版主 不好意思 我没有设置的成功，您能否帮忙一下呢 谢谢

 

 


图片点击可在新窗口打开查看此主题相关图片如下：000.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/23 11:43:00 [显示全部帖子]

希望多多指导指导    看一下 该怎么设置 谢谢 

 

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:价格查询对比.rar

[此贴子已经被作者于2013-4-24 12:14:05编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/23 11:48:00 [显示全部帖子]

例子表也发上来了，  直接在表里设置 和在 窗口管理里设置   多谢


 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/24 10:46:00 [显示全部帖子]

我在  AfterLoad  里 输入的是  e.Form.Controls("TreeView1").BuildTree("产品表", "品牌|产品|分类|型号")

 

在 NodeMouseDoubleClick里输入的是

 

Dim Filter As String
If e.Node.Text = "加载所有数据" Then
    Filter = ""
Else
    Dim Value() As String
    Value = e.Node.FullPath.Split("\")
    Select Case e.Node.Level
        Case 0
            Filter ="[品牌] = '" & Value(0) & "'"
        Case 1
            Filter ="[品牌] = '" & Value(0) & "' And [产品] = '" & Value(1) & "'"
        Case 2
            Filter ="[品牌] = '" & Value(0) & "' And [产品] = '" & Value(1) & "' And [分类] = '" & Value(2) & "'"
        Case 3
            Filter ="[品牌] = '" & Value(0) & "' And [产品] = '" & Value(1) & "' And [分类] = '" & Value(2) & "' And [型号] = '" & Value(3) & "'"
    End Select
End If
DataTables("产品表").LoadFilter = Filter
DataTables("产品表").Load()

为什么显示出来的  不显示"加载所有行呢？"

 


此主题相关图片如下：0.jpg
按此在新窗口浏览图片上图不显示下图所示里的 加载所有行？

此主题相关图片如下：xx(p.jpg
按此在新窗口浏览图片
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/24 11:10:00 [显示全部帖子]

也搞定了 

 

 

把 AfterLoad  改成 以下

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "SELECT DISTINCT 品牌,产品,分类,型号 From {产品表}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt,"品牌|产品|分类|型号")
trv.Nodes.Insert("加载所有数据",0)

 

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
xxxxxx
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：119 积分：870 威望：0 精华：0 注册：2013/3/14 15:37:00 		  发帖心情 Post By：2013/4/24 11:12:00 [显示全部帖子]

版主 老大  那个价格对比 查询 那个怎么弄 您那点有没有这方面的 让我参考一下嘛。 多谢

 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.10938 秒, 6 次数据查询