ActiveX로 ms-sql DB연동하는 Dll을 만들어서


asp 아래코드에서 처럼 실행시키면

<%
Set sene = Server.CreateObject("activeLib.activclss")
if isObject(sene) then
Response.write "OK"
else
Response.write "No"
end if

Response.write sene.OnKeyName("11")

%>

이런에러가 나오던가
Invalid configuration parameter. Alias: dlldb
/ctsdll/dll_cine1.asp, line 17

아니면

Invalid unknow database. Alias: dlldb
/ctsdll/dll_cine1.asp, line 17

에러가 나옵니다

activex dll 을 만들대
datamodule 폼을 만들고 거기에다 database콤퍼넌트하고
query 콤포넌트를 올려서 쿼리후에 그 결과값을 리턴받는 dll인데
db를 오픈할때 에러가 나는것 같아요
왜 그러쵸
웹으로 연동하는 activex dll에는 database, query 컴퍼넌트를 못쓰나여
아니면 쓰는방법이 문제가 있나여



datamodule 의 함수는 아래와 같고요

function TDataModule1.GetNameInfo(ANumber: String): String;
var
  keyName : String;
  i : Integer;
  DataModule1: TDataModule1;
begin
  DataModule1 := TDataModule1.Create(Application);

  if not Database1.Connected then
     Database1.Connected := true;

  try
     with Query1 do begin
        Close;
        Sql.Clear;
        Sql.Add('SELECT * FROM gicho_cod ');
        Open;

        for i :=1 to StrToInt(ANumber) do begin
          next;
        end;

        if Not Eof then begin
           keyName := FieldByName('mo_key_name').AsString;
        end
        else keyName := '';
        Close;
     end;

     Result := Trim(keytName);
  finally
     DataModule1.Free;
  end;
end;



위함수를 부른는 함수는

function Tactivclss.Get_OnKeyName(const Param1: WideString): WideString;
var
  strANumber: string;
begin
  strANumber := Param1;
  Result := DataModule1.GetNameInfo(strANumber);
end;