ACCESS如何查询订单查询详表中字段为空值的记录

yzc2011

如何查询订单查询详表中字段为空值的记录
通过输入要被查询的字段来查询此字段中的空值记录。
如查询单价、交货日期、完成日期为空值的记录
这样可以快速查询到记录中忘了输入的内容。如单价、交货日期等。

Henry D. Sy

yzc2011 发表于 2017-3-22 17:39
这个空值查询与原来的查询能不能合一起使用。如能合一起的话，帮忙看一下这两段代码如何结合。我把两段代码 ...

订单管理0320.rar (58.07 KB, 下载次数: 65)

2017-3-22 19:40 上传

点击文件名下载附件
下载积分: 金钱 -1 点

Henry D. Sy

1. WHERE 字段名 Is Null
   

复制代码

Henry D. Sy

1. SELECT 订单表.订单编号, 订单表.客户名称, 订单详表.产品名称, 订单详表.数量, 订单详表.单价, 订单详表.交货日期, 订单详表.完成日期, IIf(IsNull(完成日期),Switch(DateDiff("d",Date(),[交货日期])>=5,"正常",DateDiff("d",Date(),[交货日期])<5 And DateDiff("d",Date(),[交货日期])>0,"注意",DateDiff("d",Date(),[交货日期])=0,"交货",DateDiff("d",Date(),[交货日期])<0,"超期"),Switch([完成日期]-[交货日期]<0,"按时",[完成日期]-[交货日期]=0,"交货",[完成日期]-[交货日期]>0,"超期")) AS 准时, DateDiff("d",[交货日期],Date()) AS 表达式1
   
2. FROM 订单表 INNER JOIN 订单详表 ON 订单表.订单编号 = 订单详表.订单编号
   
3. WHERE (((订单详表.单价) Is Null)) OR (((订单详表.交货日期) Is Null)) OR (((订单详表.完成日期) Is Null));

复制代码

yzc2011

新手，不明白。能做个实例吗

Henry D. Sy

yzc2011 发表于 2017-3-22 14:00
新手，不明白。能做个实例吗

1. Private Sub cmd查询_Click()
   
2.     Dim str As String
   
3.     Dim sSQL As String
   
4.     If Not IsNull(Me.空值字段) Then
   
5.         str = Me.空值字段
   
6.     Else
   
7.         MsgBox "请输入查询字段名称"
   
8.         Me.空值字段.SetFocus
   
9.         Exit Sub
   
10.     End If
    
11.     sSQL = "select * from 订单查询 where " & str & " is null"
    
12.     Me.订单查询详表.Form.RecordSource = sSQL
    
13. 
    
14. End Sub

复制代码

yzc2011

还是不行。能说的详细点吗，都需要在哪些地方做修改

yzc2011

把查询的整个代码梳理一下，全部传上来行吗，还有第一次回复的这个代码 WHERE 字段名 Is Null 要吗。

Henry D. Sy

yzc2011 发表于 2017-3-22 14:25
还是不行。能说的详细点吗，都需要在哪些地方做修改

订单管理0320.rar (55.6 KB, 下载次数: 90)

2017-3-22 16:06 上传

点击文件名下载附件
下载积分: 金钱 -1 点

yzc2011

不知道是怎么回事，就是下载不了。能发在邮箱上吗！！邮箱地址：skyyzc@126.com

yzc2011

迅雷下载不了，用其它方式下载了，谢谢，先看一下。