Double up your double quotes (or use CHR$(34)).
VB Code:
'doubling up double quotes strQuery = "SELECT Surname & Chr(44) & Chr(32) & Forenames " & _ "AS FullName, IIF(IsNull(RegMem.MemID), ""N"", ""Y"") " & _ "AS Present From Members LEFT JOIN RegMem " & _ "ON Members.MemID = RegMem.MemID WHERE SDate = #" & _ Format(#7/4/2005#, "yyyy-mm-dd") & "#;" objRS.Open strQuery, objConn, adOpenStatic, adLockPessimistic




Reply With Quote