Foxtable(狐表)用户栏目专家坐堂 → SQLQuery语句


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

主题:SQLQuery语句

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/20 17:07:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/21 9:16:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/21 9:18:00 [显示全部帖子]

Dim Filter As String = ""
With e.Form.Controls("ComboBOx1")
    
If .Value IsNot Nothing Then
If e.form.controls("精确搜索").checked Then
    FIlter = "品名规格 = '" & .text & "'"
Else If e.form.controls("模糊搜索").checked Then
    Filter = "品名规格 like '%" & .text & "%'"
End If
    
End If
End
 With
With e.Form.Controls("xx控件")
    
If .Value IsNot Nothing Then
        
If Filter > "" Then
            Filter = Filter & 
" And "
        
End If
        Filter = Filter & 
"低耗料号清单 like '%" & .text & "%'"
    
End If
End
 With
Tables("ckgl_table1").Filter =Filter 

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/21 10:39:00 [显示全部帖子]

打不开提示什么错误?

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/21 11:26:00 [显示全部帖子]

客户端电脑没有权限访问服务器

数据源链接发上来看看

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/21 11:59:00 [显示全部帖子]

不同电脑可能路径不一样,因为使用的是绝对路径。参考这里设置:http://www.foxtable.com/webhelp/topics/0682.htm

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/21 16:08:00 [显示全部帖子]

如果使用共享,把数据库放到共享目录。然后其它电脑有访问这个电脑共享目录的权限

对于一个准备在局域网使用的项目,不管服务器是否是本机,都应该通过网上邻居来选择路径和数据库文件:

图片点击可在新窗口打开查看


 回到顶部