怎么样写一个Asp对象？象：ADODB.Connection

Question

在我的ASP程序中，我可以这样写：
set Obj=Server.CreateObject("ADODB.Connection")
在Delphi中，怎么写一个类似ADODB.Connection的东东呢？
我现在关键是不知道在File/New/ActiveX中选择哪一个，请高手指点一二。

Answer 1

不需要写已经有了:
Var
  Conn : Variant;
Begin
  Conn := CreateOleObject( 'ADODB.Connection' );
或者导入ADODB的TypeLib生成ADODB_TLB.pas单元,就可以直接用:
Var
  Conn : _Connection;
Begin
  Conn := CoConnection.Create;

Answer 2

不是啊，我是想自己写一个和ADODB.Connection一样的服务器，也就是说和它是同一个级别的。怎么写？可以告诉我吗？

Answer 3

就是asp对象，在File/New/ActiveX先选择ActiveX Library，然后再在File/New/ActiveX选择Active Server Object，定义一个类名，相当于Connection，ActiveX Library的名字相当于ADODB。

Answer 4

先选ActiveX Library，后选File/New/ActiveX下的Active Server Object

Answer 5

http://raptorz.myetang.com/mentals/tech/delphi/d5_asp.htm

Answer 6

dim conn,connstr
set conn=server.createobject("ADODB.CONNECTION")
    connstr="DBQ="+server.mappath("tocdbs.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" 
   ' connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data source="+server.mappath("tocdbs.mdb")
conn.open connstr