MS SQL 2000 서버를 TAdoConnection 으로 접근하여,
저장프로시져를 TAdoStoredProc 로 호출하였습니다.
잘 돌아가던 넘이 갑자기
'EOleSysError OLE Error 800xxxx'
이라는 오류를 보이더니, 동작을 제대로 하지 않습니다.
아래는 제가 작성한 코드 일부를 발췌한 것입니다.
여기저기 뒤져봐도 답을 구할수 없네요 미치기 일보직전입니다.
고수님들 도와주세요.
참고로 MDAC의 버전은 2.8 입니다.
<!--CodeS-->
with dmMain.ADOStoredProc1 do
try
Close;
ProcedureName:='sp$test';
Parameters.Clear;
parameters.CreateParameter('ID', ftinteger, pdInput, 0, AID );
parameters.CreateParameter('SearchField', ftFixedChar, pdInput,20, ASearchField );
Open;
First;
nRow := 0;
while not EOF do
begin
sRecord := '';
for i:=0 to FieldCount-1 do
if sRecord = '' then
sRecord := Fields[ i ].AsString
else
sRecord := sRecord + ',' + Fields[ i ].AsString;
AList.Add( sRecord );
Next;
Inc(nRow);
end;
Result := True;
except
Result := False;
end;
<!--CodeE-->