有没有搞错,这么简单的问题,还需要问吗。使用DELPHI编写一个ACTIVEX OBJECT,并在里面
使用ADOEXPRESS组件来打开数据库,和一般的桌面数据库一样来打开数据集,就是ACTIVE:=TRUE,或者OPEN就好了。至于参数的话,直接用RESPONSE对象就行了。
建议看李维的<ADO、MTS>

解决方案 »

  1.   

    老兄,给个例子吧,急啊,一时间又调不出
    [email protected]
      

  2.   

    刚刚发了一份,请查收。不是这样吗?很简单:
    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.
      

  3.   

    怎样把a返回
    比如在asp中定义了一个recordset变量x,怎样把delphi中得到的dataset返回给x
      

  4.   

    我认为由于TDataSet不是OleAutomate Type,所以应该不可以。
    如果必要,可以在Delphi中写代码啊。Request ,Response,Server,Application,Session都能用。
      

  5.   

    http://www.csdn.net/expert/topic/495/495183.shtm
    救命啊
      

  6.   

    vb可以的,delphi如果不能这样,用response输出是指把数据逐条取出,然后输出到浏览器么
      

  7.   

    这个没办法了。谁叫ASP是MICROSOFT出的。一些非规则的事情,VB可以用,Delphi就没办法了。
      

  8.   

    导入ado原生com借口类型苦,
    使用ado的recordset做返回值就可以了,
    不用delphi封装的!