这个SQL怎么写啊？

Question

Access数据库里的字段是日期型的a := DatetoStr(Date);adoqNEC.Close;
adoqNEC.SQL.Clear;
sql := 'Insert Into WHQL_DB (Date)';
adoqNEC.SQL.Add(sql);
v := 'Values ('''+a+''')';
adoqNEC.SQL.Add(v);
adoqNEC.ExecSQL;run说类型和数据库里的Date不匹配大侠能不能帮我改一下

Answer 1

第一不要用关键字，第二sql字符串最后加一个空格sql := 'Insert Into WHQL_DB (Date) ';

Answer 2

a := DatetoStr(Date);adoqNEC.Close;
adoqNEC.SQL.Clear;
adoqNEC.SQL.Add('insert into WHQL_DB (Date) values ('a')');
adoqNEC.ExecSQL;

Answer 3

a := DatetoStr(Date);adoqNEC.Close;
adoqNEC.SQL.Clear;
sql := 'Insert Into WHQL_DB (Date) values (:P_Date)';
adoqNEC.SQL.Add(sql);
adoqNEC.Parameters.parambyname('P_Date').value := a;
adoqNEC.ExecSQL;