Question

I have a insert statement in MS Access which needs to be wrapped in single quotes so that it can be passed as string to a column in another table. here is my insert statement below

Insert into Employee(EmpName,EmpDepartment) Values (‘Mike’,NULL)

when I wrap I am getting errors arounf ‘Mike’

‘Insert into Employee(EmpName,EmpDepartment) Values (‘Mike’,NULL)’

Below is my create table with two primary keys

create table Employee([OBJECTID] AUTOINCREMENT(1, 1), EmpName Text(10), EmpDepartment Text(50), Primary Key (OBJECTID, EmpName))

How can I set default values to EmpName as Mike and Null to EmpDepartment while creating table it self ??

Answer 1

You will need ADO to create a default easily with a standard SQL mode for Access. This will run in VBA.

sSQL = "create table Employee([OBJECTID] AUTOINCREMENT(1, 1), " _
     & "EmpName Text(10) default mike, EmpDepartment Text(50), " _
     & "Primary Key (OBJECTID, EmpName))"
CurrentProject.Connection.Execute sSQL