大家来看看这段代码

maweike

procedure ConnDb(servername,userid,pwd,dbname: String);
var
  ConnStr: string;
begin
  try
    ConnStr := 'Provider=SQLOLEDB.1;Password=' + pwd +
      ';Persist Security Info=False;User ID=' + Userid + ';Initial Catalog=' + DBName
      +
      ';Data Source=' + Servername;
    ADOConnection1.ConnectionString := ConnStr;
    ADOConnection1.Connected := true;
  except
    ShowMessage('无法连接数据库！');
  end;
end;

上面的代码是连接数据库的，上面有四个字符型变量，但是这些变量根本不能从机子上把信息读到程序里面来，换句话说就是连接不上数据库，dbgrid里面的是空白的，没有数据，大家看看要怎么修改才能正确的读要信息，连接到数据库啊。

njy7648

我认为上面语法没有错误，可能是你的参数不正确，导致连接失败，使用下面动态设置看看：
ADOConnection1.Connected := false;
ADOConnection1.ConnectionString := PromptDataSource(Handle, ADOConnection1.ConnectionString);
ADOConnection1.Connected := true;
其中Handle是窗口句柄

athena815

你的ODBC设置了没有？

溯夜惊蛰

你的datasource呢？