主题：原来好好地自定义录入界面突然出错了，怎么回事呢？

此主题相关图片如下：126.jpg

上个月 打得好好地，停了几天到这个月就突然出错了。

一定要说 有where 代码的话

只有这里了

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("窗口4_Table1")

Dim Filter As String

Dim Sort As String
If txt = "" Then
       Filter =" leveal=2 and deleted=0 and isstop=0"
       Sort = "pfullname desc,Standard desc,Unit1 desc"

Else
       txt = "'%" & txt & "%'"   '这里用%,不是*
      filter = "(pfullname Like " & txt & " Or Standard Like " & txt & " Or Unit1 Like " & txt & ") and (leveal=2 and deleted=0 and isstop=0)"
      Sort = "pfullname desc,Standard desc,Unit1 desc"
End If

tbl.DataTable.LoadFilter = Filter

tbl.DataTable.Load

tbl.sort = sort

回复 4楼 mr725

没有 看到 

源文件如下

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:琼富生产系统_0906.zip

数据库下载地址：

http://119.147.99.36/down_group126/M00/0A/F8/d5NjJE5lgwYAAAAAAl1CAFgM9o09868166/tt?k=oUVKK4To88rO1hXU8Zu-2Q&t=1315290028&u=112.67.116.119@4745127@bhdo9bk2&file=tt

直接 点击地址可能无法 下载，我用 迅雷可以下载。

项目数据源 需要 改一下 qiongfu2  改成 tt

麻烦 帮我看下。

那我怎么处理？

    txt = "'%" & txt & "%'"   '这里用%,不是*
      filter = "(pfullname Like " & txt & " Or Standard Like " & txt & " Or Unit1 Like " & txt & ") and (leveal=2 and deleted=0 and isstop=0)"
      Sort = "pfullname desc,Standard desc,Unit1 desc"

光取消红色代码并不能解决问题呢。

而且 原来运行正常的，就算是foxtable 的问题，那也是很奇怪的问题。

晕哦。我们偌大一个工厂，只有销售 没有 库存数据，我这个生产功能和管家婆销售功能结合起来，基本上可以管理库存数据了，搞了差不多1个多月了，以为可以了。半路杀出个 无名BUG。还要等foxtable版本更新，才可以吗？

搞得我怪没面子的，几次说好了好了，结果一运行，总是这里那里的问题。

反正原来是运行好好的。我在我的机器和财务的机器上都装了。8月底的时候运行好好的，停了几天 ，这个月准备开始正式使用了，就出这样的问题。我敢保证代码原来可以运行，并且没有修改过。会不会 是管家婆动了 所谓的 排序参数？

还是 foxtable 有我看不到的 排序参数？

嗯 谢谢 管理员~！！！