delphi通过注册表连接数据库 时 没有连接上怎么处理

原问题：delphi通过注册表连接数据库 时 没有连接上怎么处理
分类：编程开发 > 最后更新时间：【2017-07-14 14:42:04】

最佳答案

现网上大多是通过ODBC连接 的，实在不方便，也不是我喜欢的类型。

字串连接方式：

1 Provider=SQLOLEDB.1;Password=12345;Persist Security Info=True;User ID=UserName;Initial Catalog=DataBaseName;Data Source=123.123.123.123,5678

注意，上面的“5678”为数据库的端口，如果没有特别指定，可以不写；

示例代码：

1234567891011121314151617 procedure TForm1.Button1Click(Sender: TObject); begin ADOConnection1.ConnectionString := 'Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=DB_Name;Data Source=1.2.3.4'; //连接指定的数据库 ADOConnection1.LoginPrompt := False; ADOConnection1.Connected := True; ADOQuery1.Connection := ADOConnection1; //连接数据源 with ADOQuery1 do //用ADO组件连接数据表 begin close; SQL.Clear; SQL.Add('Select * from Table1'); //使用SQL语句查询数据表中的内容 open; end; ADOQuery1.Active := True; DataSource1.DataSet := ADOQuery1; DBGrid1.DataSource := DataSource1; end;


  • 追问：
    如果采用这种方法，还是会发生异常 没有连接到数据库，通过什么来判断是连接还是断开，从而自动重新连接
    最佳答案由网友    提供
    • 公告： 为响应国家净网行动，部分内容已经删除，感谢网友理解。
    10

    分享到：

    其他回答

    暂无其它回答!

      推荐