ADO访问

Question

如果DELPHI程序要运行在机器名为A的电脑上,而所要访问的数据库则是在电脑B上，需要通过修改IP地址实现访问，请问ADOCONNECTIN中该怎么修改? 原来的如下: 
Provider=SQLOLEDB.1;Password="";Persist Security Info=True;User ID=sa;Initial Catalog=DL;Data Source='server';Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=MAZW;Use Encryption for Data=False;Tag with column collation when possible=False';

Answer 1

可以配置一个名为server的客户机DSN

Answer 2

Provider=SQLOLEDB.1;Password="";User ID=sa;Initial Catalog=DL;Data Source='server';//改一下server，然后装一个客户端在本机，连接到相应的电脑的SQL Server上就可以了，

Answer 3

如下所示（用户名，密码，数据库名和SQL Server名放到了文件mzcf中）：
resourcestring
  s1='Provider=SQLOLEDB.1;Password=';//touch1
  s2='User ID=';//touch1
  s3='Initial Catalog=';//hwyy
  s4='Data Source=';//XYRMYY-SERVER
var
  f:textfile;
  a,b,c,d:string;
  da:string; 
begin
  assignfile(f,getcurrentdir()+'\text\mzcf');
  reset(f);
  readln(f,a);
  readln(f,b);
  readln(f,c);
  readln(f,d);
  closefile(f);
  form1.ADOConnection1.Close;
  form1.ADOConnection1.ConnectionString:=s1+a+';'+s2+b+';'+s3+c+';'+s4+d+';';
  form1.ADOConnection1.Open;

Answer 4

Provider=SQLOLEDB.1;Password="";Persist Security Info=True;User ID=sa;Initial Catalog=DL;Data Source='B机的地址';Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=MAZW;Use Encryption for Data=False;Tag with column collation when possible=False';