Hỏi về sub query trong SQL

[alohn]

Mình đang viết một đoạn sub query mà bị lỗi hoài, chưa tìm ra sai chỗ nào. Mong anh em sửa giúp mình với.
Sub Tk()
day
KetNoi
mySql = "SELECT InventoryItemCode, InventoryItemName, Unit, Sum(OpenQuantity), Sum(InwardQuantity), Sum(OutwardQuantity)" & Chr(10) & _

"From (SELECT II.InventoryItemCode, II.InventoryItemName, II.Unit, Sum(IL.InwardQuantity) - Sum(IL.OutwardQuantity) As OpenQuantity , sum(0) As InwardQuantity, sum(0) As OutwardQuantity" & Chr(10) & _
"FROM dbo.InventoryItem As II, dbo.InventoryLedger As IL, dbo.Stock As ST" & Chr(10) & _
"WHERE II.InventoryItemID = IL.InventoryItemID AND IL.StockID = St.StockID AND ((IL.RefDate<'" & gTimeFrom & "') AND (St.StockCode='155'))" & Chr(10) & _
"GROUP BY II.InventoryItemCode, II.InventoryItemName, II.Unit" & Chr(10) & _
"Union all" & Chr(10) & _
"SELECT II.InventoryItemCode, II.InventoryItemName, II.Unit, Sum(0) As OpenQuantity, Sum(IL.InwardQuantity) As InwardQuantity, Sum(IL.OutwardQuantity) As OutwardQuantity" & Chr(10) & _
"FROM dbo.InventoryItem As II, dbo.InventoryLedger As IL, dbo.Stock As ST" & Chr(10) & _
"WHERE II.InventoryItemID = IL.InventoryItemID AND IL.StockID = St.StockID AND ((IL.RefDate BETWEEN '" & gTimeFrom & "' AND '" & gTimeTo & "') AND (St.StockCode='155'))" & Chr(10) & _
"GROUP BY II.InventoryItemCode, II.InventoryItemName, II.Unit)"
rs.Open mySql, cnn, adOpenKeyset, adLockOptimistic

Sheet8.Range("A4").CopyFromRecordset rs
BoKetNoi
End Sub

Khi chạy Debug báo lỗi Incorrect syntax near ')' không biết có phải sai ở đoạn mình để màu đỏ đậm không, mong các anh em xem giúp đoạn query trên đã đúng "ngữ pháp" chưa. Tìm hoài mà không biết mình sai ở chỗ nào