delphi 插入日期错误

最新推荐文章于 2022-09-21 11:29:11 发布

hztianye

最新推荐文章于 2022-09-21 11:29:11 发布

阅读量793

点赞数

CC 4.0 BY-SA版权

分类专栏： delphi 文章标签： delphi 日期 access

本文链接：https://blog.youkuaiyun.com/hztianye/article/details/12558295

delphi 专栏收录该内容

3 篇文章

订阅专栏

本文介绍了一种在Access数据库中插入包含当前日期时间记录的方法。使用Delphi代码通过ADOQuery组件执行SQL语句来实现这一目标。代码示例中详细展示了如何格式化日期并将其与其它字段一起插入到数据库表中。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

向access插入日期数据

 with FormChart.ADOQuery1 do
    begin
      Close;
      SQL.Clear;

      {
        ADOQuery1.SQL.Text := 'insert into ip([time],replytime,toip)' + 'values('
        + '#' + FormatDateTime('yyyy-mm-dd hh:nn:ss', now) + '#' + ',' +
        QuotedStr(inttostr(replyTime)) + ',' + QuotedStr(ICMP.Host) + ')';
        ShowMessage(ADOQuery1.SQL.Text);
      }
      SQL.Add('insert into ip ([Ontime],replyTime,toIP) values(:#a,:b,:c)');
      Parameters.ParamByName('#a').Value :=
        FormatDateTime('yyyy-mm-dd hh:nn:ss', now);
      Parameters.ParamByName('b').Value := inttostr(replyTime);
      Parameters.ParamByName('c').Value := ICMP.Host;
      ShowMessage(SQL.Text);
      ExecSQL;
    end;

如果出现提示找不到fields #a，可以删除项目下所有除pas，dfm，dpr，dproj文件。