我发现我在ISAPI类型的WEB服务里访问数据库的时候就会出现错误,下面是我在接口中的声明和类中的实现:
生命:
function GetData:OleVariant;stdcall;
实现:
function TmyISAPI.GetData:OleVariant;stdcall;
begin
GetData:=DataModule1.GetData;
end;
其中DataModule1.GetData是在一个数据模块中实现的:
function TDataModule1.GetData:OleVariant;
begin
GetData:=SimpleDataSet1.Data;
end;