不用ADO控件，直接用代码，如何连接SQLSERVER数据库

Question

RT

Answer 1

可以把ADO当作com来用
用元生得ado对象
直接根据classid省城对象
声明一个变体类型变量
然后可以付给这个变量
比如conn
conn:=createobject("adodb.connection")

Answer 2

conn:=createobject("adodb.connection")
rcord:=createobject("adodb.recordset")
等；
创建ADO原生对象

Answer 3

var 
 connect:adoconnection;
.........
with connect do
begin
 connectionstring:='Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Initial Catalog=ny;Data Source=haven125';
 connected:=true;
end;.........

Answer 4

直接使用sqlserver的api接口。sqlserver带了几个动态连接库。可以使用它们连接

Answer 5

高手，我只听过动态创建连接，第一次听说动态创建ADO组件哈！高实在是高！！

Answer 6

楼主可使用ADOX或者原生的ADO对象，使用ADOX你看看李维的《delphi5 com/Dcom/mts》,如果用原生的ADO原生对象可以参考一下左轻侯的“Rich Explorer”（这是delphibbs的离线工具，有源程序，使用ADO原生对象）yinwenjie(晕) :你不知道的还多呢！动态创建ADO组件怎么了？我的程序中经常使用，为了节省资源。给个最简单的例子:
var
  _adoq:TADOQuery;
begin
  try
    _adoq:=TADOQuery.Create(nil);
    _adoq.Connection:=dm.ADOConn;//数据模块的TADOConnection
    //_adoq.ConnectionString:="自已写";
    with _adoq do
    begin
         Close;
         Sql.Text:="自已写";
         Open; 
    end;
    ....
  finally
    FreeAndNil(_adoq);
  end; 
end;

Answer 7

楼主可使用ADOX或者原生的ADO对象，使用ADOX你看看李维的《delphi5 com/Dcom/mts》,如果用原生的ADO原生对象可以参考一下左轻侯的“Rich Explorer”（这是delphibbs的离线工具，有源程序，使用ADO原生对象）yinwenjie(晕) :你不知道的还多呢！动态创建ADO组件怎么了？我的程序中经常使用，为了节省资源。给个最简单的例子:
var
  _adoq:TADOQuery;
begin
  try
    _adoq:=TADOQuery.Create(nil);
    _adoq.Connection:=dm.ADOConn;//数据模块的TADOConnection
    //_adoq.ConnectionString:="自已写";
    with _adoq do
    begin
         Close;
         Sql.Text:="自已写";
         Open; 
    end;
    ....
  finally
    FreeAndNil(_adoq);
  end; 
end;