I noticed a problem in my query results when a null/blank field exits. For instance I am selecting MAX date and if there are 5 results and one of the 5 recs has a blank date NONE are selected. How can I get SQL to ingore the blank date field and return the appropriate value?
Thanks much,
Trudye
strSQL = "SELECT MAX(Deals.From) as MaxDate, [Deal Detail].Item, [Deal Detail].COST " _
& "FROM (Clients " _
& "INNER JOIN Deals on Clients.ID = Deals.ClientId) " _
& "INNER JOIN [Deal Detail] on Deals.Dealid = [Deal Detail].Dealid " _
& "WHERE Clientid = " & sID & " AND Item = '16x20 Photo'" _
& " GROUP BY [Deal Detail].Item, Clients.Id, [Deal Detail].COST"
Set rst = db1.OpenRecordset(strSQL)
If rst.RecordCount > 0 Then
sItem = rst!Item
If IsDate(rst!MaxDate) Then
sMaxFrom = rst!MaxDate
End If
sMaxRate = rst!COST
GoSub Write_Recs
End If
Thanks much,
Trudye
strSQL = "SELECT MAX(Deals.From) as MaxDate, [Deal Detail].Item, [Deal Detail].COST " _
& "FROM (Clients " _
& "INNER JOIN Deals on Clients.ID = Deals.ClientId) " _
& "INNER JOIN [Deal Detail] on Deals.Dealid = [Deal Detail].Dealid " _
& "WHERE Clientid = " & sID & " AND Item = '16x20 Photo'" _
& " GROUP BY [Deal Detail].Item, Clients.Id, [Deal Detail].COST"
Set rst = db1.OpenRecordset(strSQL)
If rst.RecordCount > 0 Then
sItem = rst!Item
If IsDate(rst!MaxDate) Then
sMaxFrom = rst!MaxDate
End If
sMaxRate = rst!COST
GoSub Write_Recs
End If