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

此主题相关图片如下：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

前面加一行，看看合成的Filter是啥：

 

MessageBox.show(filter)

tbl.DataTable.LoadFilter = Filter

tbl.DataTable.Load

tbl.sort = sort

 

 

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

leveal   => level  ???

代码看不出问题来，升级你的foxtable到最新的版本，如果还有问题，明天帮你远程看一下。

回复 4楼 mr725

 

没有 看到 

leveal   => level  ???

源文件如下

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

点击浏览该文件:琼富生产系统_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

麻烦 帮我看下。

你的项目文件的开发者密码是什么？ 进不去啊。

密码发论坛邮件了。