有没有搞错,这么简单的问题,还需要问吗。使用DELPHI编写一个ACTIVEX OBJECT,并在里面
使用ADOEXPRESS组件来打开数据库,和一般的桌面数据库一样来打开数据集,就是ACTIVE:=TRUE,或者OPEN就好了。至于参数的话,直接用RESPONSE对象就行了。
建议看李维的<ADO、MTS>
使用ADOEXPRESS组件来打开数据库,和一般的桌面数据库一样来打开数据集,就是ACTIVE:=TRUE,或者OPEN就好了。至于参数的话,直接用RESPONSE对象就行了。
建议看李维的<ADO、MTS>
[email protected]
unit Test;{$WARN SYMBOL_PLATFORM OFF}interfaceuses
ComObj, ActiveX, AspTlb, chechy_TLB, StdVcl, DB;type
TTest = class(TASPObject, ITest)
protected
procedure OnEndPage; safecall;
procedure OnStartPage(const AScriptingContext: IUnknown); safecall;
function MyMethod(Input: Integer): Integer; safecall;
end;implementationuses ComServ, Dm1;procedure TTest.OnEndPage;
begin
inherited OnEndPage;
end;procedure TTest.OnStartPage(const AScriptingContext: IUnknown);
begin
inherited OnStartPage(AScriptingContext);
end;function TTest.MyMethod(Input: Integer): Integer;
var
a: TDataSet;
begin
a := GetDataSet;
Result := Input;
end;initialization
TAutoObjectFactory.Create(ComServer, TTest, Class_Test,
ciMultiInstance, tmApartment);
end.
比如在asp中定义了一个recordset变量x,怎样把delphi中得到的dataset返回给x
如果必要,可以在Delphi中写代码啊。Request ,Response,Server,Application,Session都能用。
救命啊
使用ado的recordset做返回值就可以了,
不用delphi封装的!