ＣＳＶデータをＤＢに登録するには (ID：20722)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

ＣＳＶファイルのデータをＤＢ(INTERBASE)に登録しています。
どりあえず１レコードの１項目を登録したいと考えています。

実行するとエラーが表示されます。
SQL err code -206
column unknown
CUST_CD
何が原因でしょうか？
よろしくお願い致します。

procedure TForm1.Button1Click(Sender: TObject);
var
  SL1:TStringList;
  SL2:TStringList;
  i,j :word;
  xx,zz,nam:string;
begin

try
      IBDatabase1.Connected := Active;

SL1:=TstringList.Create;
      SL2:=TstringList.Create;

if Opendialog1.Execute then begin
        nam := Opendialog1.FileName;
        SL1.LoadFromFile(nam);
        for i:=0 to SL1.count-1 do begin
          SL2.CommaText := SL1[i];
          IBQuery1.Close;
          IBQuery1.SQL.Clear;
          IBQuery1.SQL.Add('insert into customer (cust_cd)');
          IBQuery1.SQL.Add('values (:cust_cd)');
          IBQuery1.ParamByName('cust_cd').AsString:=SL2[0];
          Try
            IBQuery1.ExecSQL;
          except

end;
        end;
      end;
      Finally
        SL1.Free;
        SL2.Free;
        IBQuery1.Active       := False;
        IBDatabase1.Connected := False;
      end;

end;

end.

←解決時は質問者本人がここをチェックしてください。

戻る