Query in VBA

[March]

Hello,

SELECT GeneralLedger.tDate, GeneralLedger.AccountNumber,
GeneralLedger.Explanation, Sum(GeneralLedger.Fee) AS SumOfFee
FROM GeneralLedger
GROUP BY GeneralLedger.tDate, GeneralLedger.AccountNumber,
GeneralLedger.Explanation
HAVING (((GeneralLedger.tDate)=#4/3/2008#) AND
((GeneralLedger.AccountNumber)="D0001") AND ((GeneralLedger.Explanation) Like
"c*"));


Above is from query. It works well.

However, I would like to rewrite the query in VBA (Access)

I try this one below

sqlCmd = "SELECT GeneralLedger.tDate, GeneralLedger.AccountNumber, " _
& "GeneralLedger.Explanation, Sum(GeneralLedger.Fee) AS SumOfFee " _
& "FROM GeneralLedger " _
& "GROUP BY GeneralLedger.tDate, GeneralLedger.AccountNumber, " _
& "GeneralLedger.Explanation " _
& "HAVING GeneralLedger.tDate=#" & maxDate & "# AND " _
& "GeneralLedger.AccountNumber='" & getAccountNumber & "' AND " _
& "GeneralLedger.Explanation Like " & """ & x & " * "" & ";"

I don't know how to correct

" & "GeneralLedger.Explanation Like " & """ & x & " * "" & ";" "


Please give me suggestion

Thank you,

March

 

[Klatuu]

& "GeneralLedger.Explanation Like ""c*"";"

 

[March]

Thank you so much.

March

& "GeneralLedger.Explanation Like ""c*"";"