the # didn't work
changed code to:
Dim str AsString = "insert demographic(quest_date, accnum, clinic) values (" & _
"#" & textdate.Text & "#" & "," & _
acc & "," & _
preparestr(textclinic.Text) & ")"
When I put in today's date, I get the error:
"The name '#4' is not permitted in this context...