TQuery를 이용해서 로그인 확인을 하려고 합니다.
Query이름은 qryLog입니다.
open만 하면 에러가 납니다. 쿼리문 실행시키는게 open말고 다른건가요?
쩜갈쳐주세요....
qryLog.Close;
qryLog.SQL.Clear;
qryLog.SQL.Add('SELECT * FROM USERS WHERE TYPE="0" AND USERID=:edtId');
qryLog.Params[0].Value:=edtId.Text;
qryLog.Open; ->> 여기서 에러가 나는것 같습니다.
if qryLog.Eof then begin
Application.MessageBox('존재하지않는 사용자입니다.','확인',MB_OK);
ModalResult := mrNone;
end
else begin // 비밀번호 확인
sDbpwd := qryLog.FieldByName('passwd').value;
if sDbpwd = edtPwd.text then begin
qryLog.Close;
ModalResult := mrOK; // 로그인창 닫기
end
else begin
qryLog.close;
Application.MessageBox('비밀번호가 틀립니다.','확인',MB_OK);
ModalResult := mrNone;
end;
end; // 비밀번호 확인끝
" 을 '로 바꿔 보세요.
즉,
'SELECT * FROM USERS WHERE TYPE=''0'' AND USERID=:edtId'
로여~ 글구
Params[0]
보단
ParamByName
을 쓰는 편이 프로그래밍시 더 유리하므로 이 방법을 추천합니다.
즐거운 하루~~~