i changed to this from your advice, but still giving me syntax errors
TheChargeDate = Format(Now(), "MM/dd/yyyy")
Dim strSQL As String
strSQL = "INSERT INTO [Charge Data](Date, Code, Number, Prospect, Detail, Time, Photocopy) VALUES (#" & TheChargeDate & "#, '" & ClientToCharge & "', '" &...