Foxtable(狐表)用户栏目专家坐堂 → 关于查询表的动态加载问题


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

主题:关于查询表的动态加载问题

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


加好友 发短信
等级:五尾狐 帖子:1033 积分:7258 威望:0 精华:0 注册:2008/9/1 22:34:00
关于查询表的动态加载问题  发帖心情 Post By:2012/7/7 8:48:00 [只看该作者]

在查询表中设计一个查询订单的窗口,其中有个按钮的代码如下:

 

Dim s As String =e.Form.Controls("TextBox1").Value
If s = "" Then
    MessageBox.Show("你还未输入任何关于订单号的相关字符,请重新输入!","提示",MessageBoxButtons.OK)
Else
    Dim Values() As String
    Dim ids As String
    Values = s.split(",")
    If Values.Length=1 Then
        ids = "%" & s & "%"
        DataTables("销售订单查询").LoadFilter = "sheet_no like '" & ids & "'"
        DataTables("销售订单查询").Load()
        e.Form.Close
    Else
        For Index As Integer = 0 To Values.Length - 1
            ids=ids & "," & values(Index)
        Next
        ids= ids.Trim(",")
        DataTables("销售订单查询").LoadFilter = "{osal_ord1}.[sheet_no] In (" & ids & ")"
        DataTables("销售订单查询").Load()
        e.Form.Close
    End If
End If


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


加好友 发短信
等级:五尾狐 帖子:1033 积分:7258 威望:0 精华:0 注册:2008/9/1 22:34:00
  发帖心情 Post By:2012/7/7 8:50:00 [只看该作者]


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

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

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


加好友 发短信
等级:五尾狐 帖子:1033 积分:7258 威望:0 精华:0 注册:2008/9/1 22:34:00
  发帖心情 Post By:2012/7/7 8:53:00 [只看该作者]

 如果我将 DataTables("销售订单查询").LoadFilter = "sheet_no like '" & ids & "'" 改为DataTables("销售订单查询").LoadFilter = "{osal_ord1}.sheet_no like '" & ids & "'"

也会提示出错


 


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

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


加好友 发短信
等级:五尾狐 帖子:1033 积分:7258 威望:0 精华:0 注册:2008/9/1 22:34:00
  发帖心情 Post By:2012/7/7 8:54:00 [只看该作者]

这样的查询窗口,我在不是查询表的表上是可以的,请问这是为什么?


 回到顶部