新学的用INI连接数据库,数据库是ACCESS在局域网的另一台电脑,
db.ini文件
[severinfo]
ServerIP=\\Xingzheng\CS\db1.mdb
procedure TFmian.connstr;
var
  ini:TIniFile;
  strCO,strIP:string;
begin
  ini:=TIniFile.Create(ExtractFilePath(Application.ExeName)+'db.ini');
  strIP:=ini.ReadString('severinfo','ServerIP','');
 try
  strCO:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+trim(strIP)
          +';Persist Security Info=False';
   
  DataModule2.ADOConnection1.ConnectionString:=strCO;
  DataModule2.ADOConnection1.Open;
 except
   ShowMessage('连接数据库出错,请联系管理员');
 end;然后调用这个过程,可一直提示对象打开时不允许操作,可我在ADOConnection1.ConnectionString,直接通过选择数据库的方式的字符串就是:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Xingzheng\cs\db1.mdb;Persist Security Info=False
而且是可以连上数据库的
急求答案

解决方案 »

  1.   

    共享过了,我在ADOConnection1.ConnectionString属性直接选择数据库可以连上的,选择后的数据库的方式的字符串就是:Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Xingzheng\cs\db1.mdb;Persist Security Info=False
      

  2.   

    ConnectionString:='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=ChkPrint;Data Source='+sServerIP;
    ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=sa;Data Source='+trim(strIP)+';Persist Security Info=True'
      

  3.   

    你单步跟下strIP的值撒。。不然把ServerIP也换成完整的路径
      

  4.   

    更正
    ConnectionString:='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db1;Data Source='+trim(strIP);
    ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=sa;Data Source='+trim(strIP)+';Persist Security Info=True'
      

  5.   


    Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=sa;Data Source=\\Xingzheng\CS\db1.mdb;Persist Security Info=true
    上面是我在中间加个EDIT,把连接字符串显出来的,可还是连不上
      

  6.   

    Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=sa;Data Source=\\Xingzheng\CS\db1.mdb;Persist Security Info=true
    改成Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Xingzheng\CS\db1.mdb;Persist Security Info=true
      

  7.   

    本人已经自行测试解决了,给大家分享下:strCO:='Provider=Microsoft.Jet.OLEDB.4.0;'
              +'Data Source='+trim(strIP)
              +';Persist Security Info=false';  或者
      strCO:='Provider=Microsoft.Jet.OLEDB.4.0;'
              +'Data Source='+trim(strIP)
              +';User ID=admin;Jet OLEDB:Database Password="";'
              +'Persist Security Info=false';已经测试通过了,希望给以后的朋友个参考