Q&A

  • [질문]우아!!! 참다참다 못해서 결국 찾아왔습니다. ㅠㅠㅠ
델파이7
오라클10g

ADO로 연결해서 사용중에 있습니다.


procedure TfrmLogin.but_loginClick(Sender: TObject);
var
  qry : String;
  tbl : TADOQuery;
  F_ID, F_PWD : String;
begin
  if Trim(TXT_ID.Text)   = '' THEN  BEGIN
    ShowMessage('ID를 입력하세요');
    TXT_ID.SetFocus;
    txt_id.SelectAll;
    EXIT;
  END;

  if Trim(TXT_PWD.Text)   = '' THEN BEGIN
    ShowMessage('비밀번호를 입력하세요');
    TXT_PWD.SetFocus;
    EXIT;
  END;

  with dmMain do
  begin

    tbl := TADOQuery.Create(self);
    tbl.Connection := WATER_WELL_ADOConn;

    qry := 'select ID, PWD from LOGIN where ';
    qry := qry + ' ID = "' + TRIM(TXT_ID.Text) + '" ';
    qry := qry + ' and PWD = "' + TRIM(TXT_PWD.Text) + '" ';

    tbl.SQL.Text := qry;
    tbl.Open;

    if tbl.Eof = false then begin
      //SHOWMESSAGE ('OK')   frmMain: TfrmMain;
      if frmMain = nil then
        frmMain := TfrmMain.Create(nil);

      Self.Visible := False;
      frmMain.AfterLogin;
    end else begin
      SHOWMESSAGE ('고객님께서 입력하신 아이디 또는 패스워드가 일치하지 않습니다.');
      txt_pwd.SelectAll;
      txt_pwd.SetFocus
    end;
    tbl.Free;
  end;
end;


대체 어디서 잘못된것인지 모르겠습니다. ㅠㅠㅠ

실행해서 아이디 비번을 넣고 로그인 누르면
ORA-00904 : "9999":부적합한 식별자.  <<<< 이렇게 뜹니다.

데이터베이스 테이블 다있구요 컬럼명도 틀림없이 맞은거 다확인했습니다.
혹시나해서 테스트로 MS-access로 mdb연결해봤는데 되더군요 이건뭔가요

미쳐버릴것같습니다 12시간째 요러고 앉아있습니다. ㅠㅠㅠㅠ도와주십시요 굽신굽신
1  COMMENTS