我正在尝试使用Delphi将当前日期和时间插入Access数据库。
我使用的程序如下:
procedure WriteToDatabase;
var
TableName, DateTimeNow : string;
GetCurrentDateTime : TDateTime;
begin
GetCurrentDateTime := Now; // The current date and time to write as the FuncID in the database;
DateTimeNow := DateTimeToStr(GetCurrentDateTime);
ShowMessage('The current date and time is: '+DateTimeNow);
ConvertDateTimeForAccess(DateTimeNow);
TableName := 'tblFunction';
frmMain.ADOCommand.Connection := frmMain.ADOConnection;
frmMain.ADOConnection.ConnectionString := 'Provider=Microsoft.ACE.OLEDB.12.0;Data Source='+
DatabaseName+';';
frmMain.ADOCommand.CommandText := 'INSERT INTO '+TableName+ ' VALUES ('+DateTimeNow+ 'y = 3x^2 + 4x + 4);';
frmMain.ADOCommand.Execute;
end;
不幸的是,当我运行程序时出现错误,即'参数对象未正确定义。提供的信息不一致或不完整'。
问题可能是日期的格式吗?我不认为这是一个问题,因为我将其作为字符串类型输入数据库而不是日期。
有人可以建议在这里需要改变什么吗?