Foxtable(狐表)用户栏目专家坐堂 → 有谁可以帮我,关于自定义录入


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

主题:有谁可以帮我,关于自定义录入

帅哥哟,离线,有人找我吗?
haoting2000
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:133 积分:1261 威望:0 精华:0 注册:2013/1/5 22:18:00
有谁可以帮我,关于自定义录入  发帖心情 Post By:2013/5/14 20:43:00 [只看该作者]

http://www.foxtable.com/help/index.html?n=2465.htm

 

拿上面的举例, 假如上面例子中的下拉窗口,即客户列表有10万条记录, 程序应该如何改动? 因为远程的话,不可能10万条记录都先加载好再去做的,要不然肯定超时。

 

谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/5/14 21:11:00 [只看该作者]

参考:
 
http://www.foxtable.com/help/topics/1928.htm

http://www.foxtable.com/help/topics/2269.htm

http://www.foxtable.com/help/topics/1268.htm
 
ChangeEdit事件改一下,以为原来是筛选,闲杂是加载:
 
If e.Col.Name = "客户ID" Then '如果编辑的是客户ID列
    If e.Col.DroppedDown Then '如果下拉窗口已经打开
        Dim tbl As DataTable = DataTables("窗口1_Table1") 
        Dim Flt AS String
        If e.Text = "" Then '如果内容为空
            flt = "" '显示所有客户
        Else '否则根据输入内容进行模糊筛选
            Dim txt As String = "'*" & e.Text & "*'"
            flt = "客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt
        End If
        tbl.LoadFilter = flt
        tbl.Load()
    End If
End If
 


 回到顶部
帅哥哟,离线,有人找我吗?
夕然
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:619 积分:3656 威望:0 精华:1 注册:2012/6/13 22:00:00
  发帖心情 Post By:2013/5/14 22:14:00 [只看该作者]

不是说过了吗,使用动态加载

 


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

 回到顶部