Quotes the passed value like q(), but using the passed in quote string
The variant value to quote
The string to use for quoting and escaping
Docmd.RunSQL "UPDATE tblSample SET SampleCount=1 WHERE SampleDate=" & QuoteWithEscape("1 Sep 2015", "#")