新学的用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
而且是可以连上数据库的
急求答案
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
而且是可以连上数据库的
急求答案
ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=sa;Data Source='+trim(strIP)+';Persist Security Info=True'
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'
Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=sa;Data Source=\\Xingzheng\CS\db1.mdb;Persist Security Info=true
上面是我在中间加个EDIT,把连接字符串显出来的,可还是连不上
改成Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Xingzheng\CS\db1.mdb;Persist Security Info=true
+'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';已经测试通过了,希望给以后的朋友个参考