DB는 인터베이스이고요,,
델파이에서 다음과 같이 코딩을 했습니다. 근데 에러는 없는데 아무값도 나오지 않아요..
다 맞는데 결과값만 나오질 않아요,, ㅠ,.ㅠ
아시는 분 답변 부탁드립니다.
with DM.Login_Query do begin
Close;
Sql.Clear;
Sql.Add('select AgentPwd, AgentName from Agent ');
Sql.Add('where AgentGbn = :Gubun ');
Sql.Add('and AgentID = :Login ');
ParamByName('Gubun').AsString := '111111';
ParamByName('Login').AsString := Trim(LoginForm.Edit1.Text);
open;
password := FieldByName('AgentPwd').AsString;
Global_Name := FieldByName('AgentName').AsString;
end;
다만 아래의 조건에 맞는 레코드가 없는것 같군요.
레코드를 다시한번 살펴보십시오.
바라미~
초보 wrote:
> DB는 인터베이스이고요,,
> 델파이에서 다음과 같이 코딩을 했습니다. 근데 에러는 없는데 아무값도 나오지 않아요..
> 다 맞는데 결과값만 나오질 않아요,, ㅠ,.ㅠ
> 아시는 분 답변 부탁드립니다.
>
> with DM.Login_Query do begin
> Close;
> Sql.Clear;
> Sql.Add('select AgentPwd, AgentName from Agent ');
> Sql.Add('where AgentGbn = :Gubun ');
> Sql.Add('and AgentID = :Login ');
>
> ParamByName('Gubun').AsString := '111111';
> ParamByName('Login').AsString := Trim(LoginForm.Edit1.Text);
> open;
>
> password := FieldByName('AgentPwd').AsString;
> Global_Name := FieldByName('AgentName').AsString;
> end;