以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  目录树名字自动上控件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=159445)

--  作者:nuoyan89
--  发布时间:2020/12/26 21:34:00
--  目录树名字自动上控件
老师,我用目录树做了一个审核的角色名单,我想在录入窗口中的“审核人员”这个控件中打开时双击对应名字,名字自动到以下控件中如下图,谢谢
图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/12/27 20:42:00
--  
双击事件给控件赋值:http://www.foxtable.com/webhelp/topics/0886.htm
--  作者:nuoyan89
--  发布时间:2020/12/28 14:27:00
--  

老师,还请帮忙看看,谢谢!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:条码扫码系统数据库.zip


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

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


--  作者:有点蓝
--  发布时间:2020/12/28 14:40:00
--  
http://www.foxtable.com/webhelp/topics/2350.htm
--  作者:nuoyan89
--  发布时间:2020/12/28 15:46:00
--  

老师,改好了,但是很奇怪,第一次点击之后可以生成自己想要的,但是再点击要换其他名字就不变了,还是第一次点击的那个名字

If e.Node.Level = 2 Then \'如果单击的是第二层节点
    Dim tr As Row = Tables("公司人员名单").Current
    Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的DataRow
    tr("姓名") = dr("姓名")
    tr("部门") = dr("部门")
    tr("岗位") = dr("岗位")
    e.Form.DropDownBox.Value = tr("姓名") \'这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据.
    e.Form.DropDownBox.CloseDropdown()
End If


--  作者:有点蓝
--  发布时间:2020/12/28 16:11:00
--  
If e.Node.Level = 2 Then \'如果单击的是第二层节点
    Dim tr As Row = Tables("公司人员名单").Current
    Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的DataRow
    tr("部门") = dr("部门")
    tr("岗位") = dr("岗位")
    e.Form.DropDownBox.Value = dr("姓名") \'这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据.
    e.Form.DropDownBox.CloseDropdown()
End If
--  作者:nuoyan89
--  发布时间:2020/12/28 17:09:00
--  

[_Identify] Is Null,我在表里加了这个不加载的代码,我1楼的代码需要怎么能全部加载出来呢?谢谢


--  作者:有点蓝
--  发布时间:2020/12/28 19:47:00
--  
比如:http://www.foxtable.com/webhelp/topics/2054.htm
--  作者:nuoyan89
--  发布时间:2021/2/4 12:26:00
--  

老师,现在发现一个异常,里面有个名字到处乱跳,后台数据如图2,但是在选择时却成了如图1那样,


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

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

--  作者:有点蓝
--  发布时间:2021/2/4 13:35:00
--  
这不是正常的吗,多个部门都有同一个名称的人