以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自定义窗口  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134709)

--  作者:admin22327
--  发布时间:2019/5/5 8:17:00
--  自定义窗口
我做了一个项目,有2个问题 1、想在窗口中按照自定义窗口二的范例输入财务负责人,在主表中正常,改在主表的副本中报错,帮我看一下。2、窗口加载过程中,通过逻辑列筛选,一种加载没有选中的(比如表中是否转换为潜在客户,),一个是加载选中的,代码怎么写。谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:速达客户管理系统.foxdb

[此贴子已经被作者于2019/5/5 8:17:08编辑过]

--  作者:有点甜
--  发布时间:2019/5/5 9:24:00
--  

afterOpenProject的代码 Tables("资源客户_Table1").Cols("财务负责人_姓名").DropForm = "人员下拉"

 

写到窗口的afterLoad事件,即可。


--  作者:admin22327
--  发布时间:2019/5/5 13:28:00
--  
 
第一个问题我就是按你说的那样子做到,不行,我把项目发你了,你可以试试,
 
 
 
 
第二个问题求代码,窗口加载的时候,不加载选定的逻辑列和加载选定的逻辑列  代码,位置我知道在哪了

--  作者:有点甜
--  发布时间:2019/5/5 14:32:00
--  

afterOpenProject删除这句代码啊

 

Tables("资源客户_Table1").Cols("财务负责人_姓名").DropForm = "人员下拉"


--  作者:admin22327
--  发布时间:2019/5/6 8:18:00
--  

窗口的表为副本,通过筛选加载了主表的一部分,现在需要按设定的条件继续进行筛选,怎么才可以只筛选副本中的内容,而不是筛选主表中内容,比如,只筛选窗口中副本的客户。下边代码哪里有问题(这个代码筛选的主表的)

Dim Filter As String

With e.Form.Controls("cmbProduct")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "客户名称 = \'" & .Value & "\'"
    End If
End With


If Filter > "" Then
    Tables("VIP客户_Table1").Filter = Filter
End If


--  作者:有点甜
--  发布时间:2019/5/6 9:22:00
--  

1、在afterLoad事件,记录你副本表的筛选条件,如

 

vars("条件") = "第一列=\'123\'"

 

2、代码改一下

 

Tables("VIP客户_Table1").Filter = Filter & " and " & vars("条件")