SQL SELECT INTO FROM from Delphi 中的语法错误
Syntax error in SQL SELECT INTO FROM from Delphi
我正在尝试使用 SQL 向我的数据库中插入一条新记录,但它一直告诉我在 from 子句中有语法错误。
我没有看到错误。
代码如下:
procedure TForm1.BitBtn7Click(Sender: TObject);
var
sCategoryName :string;
begin
sCategoryName := InputBox('Category Name', 'Please enter your category name that you would like to add','');
with dmRecords do
begin
qryRecords.Active := False;
qryRecords.SQL.Add('INSERT INTO [Category of Income]([Category Name])');
qryRecords.SQL.Add('VALUES ' + '(' + QuotedStr(sCategoryName) + ')');
qryRecords.ExecSQL;
qryRecords.SQL.Add('SELECT * FROM [Category of Income] ORDER BY [Category ID]');
qryRecords.Active := True;
end;
end;
您还没有清除上一条语句中的 SQL。当您打开查询时,SQL 有三行文本。
在添加 SELECT 语句之前添加 qryRecords.SQL.Clear
。
我正在尝试使用 SQL 向我的数据库中插入一条新记录,但它一直告诉我在 from 子句中有语法错误。
我没有看到错误。
代码如下:
procedure TForm1.BitBtn7Click(Sender: TObject);
var
sCategoryName :string;
begin
sCategoryName := InputBox('Category Name', 'Please enter your category name that you would like to add','');
with dmRecords do
begin
qryRecords.Active := False;
qryRecords.SQL.Add('INSERT INTO [Category of Income]([Category Name])');
qryRecords.SQL.Add('VALUES ' + '(' + QuotedStr(sCategoryName) + ')');
qryRecords.ExecSQL;
qryRecords.SQL.Add('SELECT * FROM [Category of Income] ORDER BY [Category ID]');
qryRecords.Active := True;
end;
end;
您还没有清除上一条语句中的 SQL。当您打开查询时,SQL 有三行文本。
在添加 SELECT 语句之前添加 qryRecords.SQL.Clear
。