请各位大侠帮忙看一下下面这段代码:
Q_Save.SQL.Clear;
Q_Save.SQL.Add('Insert into HT_Report_Quick');
Q_Save.SQL.Add('(QuickReport_id,QuickReport_dw,QuickReport_nian,QuickReport_sgsj,QuickReport_sgdd,QuickReport_xwr,QuickReport_cbss,');
Q_Save.SQL.Add('QuickReport_cbsw,QuickReport_sgjg,QuickReport_zgld,QuickReport_tbsj,QuickReport_tbr)');
Q_Save.SQL.Add('Values ');
Q_Save.SQL.Add('('''+edt_jlbh.Text+''','''+edt_dw.Text+''','''+edt_nf.Text+''','''+datetostr(dtp_date.Date)+''+timetostr(dtp_time.Time)+''',');
Q_Save.SQL.Add(''''+edt_sgdd.Text+''','''+edt_xwr.Text+''','''+edt_cbss.Text+''','''+mm_cbsw.Text+''','''+mm_jgjs.Text+''',');
Q_Save.SQL.Add(''''+edt_zgld.Text+''','''+edt_tbsj.Text+''','''+edt_tbr.Text+''')');
Q_Save.ExecSQL;
运行后提交时,提示:从char数据类型到datetime数据类型转换导致datetime值越界!请各位行行好!帮帮忙!
Q_Save.SQL.Clear;
Q_Save.SQL.Add('Insert into HT_Report_Quick');
Q_Save.SQL.Add('(QuickReport_id,QuickReport_dw,QuickReport_nian,QuickReport_sgsj,QuickReport_sgdd,QuickReport_xwr,QuickReport_cbss,');
Q_Save.SQL.Add('QuickReport_cbsw,QuickReport_sgjg,QuickReport_zgld,QuickReport_tbsj,QuickReport_tbr)');
Q_Save.SQL.Add('Values ');
Q_Save.SQL.Add('('''+edt_jlbh.Text+''','''+edt_dw.Text+''','''+edt_nf.Text+''','''+datetostr(dtp_date.Date)+''+timetostr(dtp_time.Time)+''',');
Q_Save.SQL.Add(''''+edt_sgdd.Text+''','''+edt_xwr.Text+''','''+edt_cbss.Text+''','''+mm_cbsw.Text+''','''+mm_jgjs.Text+''',');
Q_Save.SQL.Add(''''+edt_zgld.Text+''','''+edt_tbsj.Text+''','''+edt_tbr.Text+''')');
Q_Save.ExecSQL;
运行后提交时,提示:从char数据类型到datetime数据类型转换导致datetime值越界!请各位行行好!帮帮忙!
Q_Save.SQL.Clear;
Q_Save.SQL.Add('Insert into HT_Report_Quick');
Q_Save.SQL.Add('(QuickReport_id,QuickReport_dw,QuickReport_nian,QuickReport_sgsj,QuickReport_sgdd,QuickReport_xwr,QuickReport_cbss,');
Q_Save.SQL.Add('QuickReport_cbsw,QuickReport_sgjg,QuickReport_zgld,QuickReport_tbsj,QuickReport_tbr)');
Q_Save.SQL.Add('Values ');
Q_Save.SQL.Add('('''+edt_jlbh.Text+''','''+edt_dw.Text+''','''+edt_nf.Text+''','''+datetostr(dtp_date.Date)+''+timetostr(dtp_time.Time)+''',');
Q_Save.SQL.Add(''''+edt_sgdd.Text+''','''+edt_xwr.Text+''','''+edt_cbss.Text+''','''+mm_cbsw.Text+''','''+mm_jgjs.Text+''',');
Q_Save.SQL.Add(''''+edt_zgld.Text+''','''+edt_tbsj.Text+''','''+edt_tbr.Text+''')');
inputbox('','',q_save.sql.text);
Q_Save.ExecSQL;随后将inputbox得内容自己手工执行看看什么问题.要是出错不会解决的将那一句帖出来看看.