delphi - TAdoConnection 密码擅离职守

Question

使用 D5 中的 TAdoConnection 使用密码 sa 帐户连接到 Windows 7 64 位计算机上的本地 Sql Server，我收到错误“用户 sa 登录失败”，尽管我已经构建了TAdoConnection ConnectionString 以包含密码。当 BeforeConnect 事件触发时，ConnectionString 不再包含密码。我可以在 WillConnect 事件中设置密码，然后连接就可以正常工作。

我的问题是，什么从 ConnectionString 中删除密码？是否可能是 W7 中添加的一些安全功能 - 我不记得在 XP 上遇到过这个问题。

顺便说一句:即使我在 ConnectionString 中将 Persist Security Info 设置为 true，这个问题仍然会发生 - 密码甚至没有存储在 DFM 中。

Answer 1

您的 ConnectionString 需要包含“Persist Security Info=True”，请参阅此 prior topic 。我使用两个 const，一个用于 SQL 身份验证，另一个用于 Active Directory 身份验证，只需填写空白即可。

const
  csCONNECTION   = 'Provider=%s;Password=%s;Persist Security Info=True;User ID=%s;Initial Catalog=%s;Data Source=%s';
  csADCONNECTION = 'Provider=%s;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=%s;Data Source=%s';