Dears：   最近小弟我使用TADOConnection的元件，來撰寫有關SQL的程式。原先，小弟我都是一開始就使用ConnectionString，將連接SQL的User ID跟Password設定好了。   現在小弟我想要將連結SQL的User Id跟Password寫在程式的畫面中，讓使用者輸入後再進行連線。請問，應該要如何處理呢？   我有搜尋一下範例：  

 void __fastcall TForm1::SQLConnectionBeforeConnect(TObject *Sender)
{
  if (SQLConnection1->LoginPrompt == false)
  {
    SQLConnection1->Params->Values["User_Name"] = "SYSDBA";
    SQLConnection1->Params->Values["Password"] = 
      Decrypt(SQLConnection1->Params->Values["Password"]);
  }
}

不過，這程式碼的Params是只有在SQLConnection1才能使用。 如果我想要類似像上面的程式的使用方式，在TADOConnection 跟如何撰寫呢？ 小弟我是BCB的新手，若有發問一些蠢問題，敬請見諒。 對於各位的大力協助，感激不盡！

------
小弟我是BCB的新手，若有發問一些蠢問題，敬請見諒。
對於各位的大力協助，感激不盡！

二個方法    法一:    你可以在輸入完帳號/密碼之後 把這些資料填到 ConnectionString 去之再做連線 反正沒帳密，是不能連線的 拖到這時候再連線也是無所謂...    法二:    用 Open，像這樣:

    if(ADOConnection1->LoginPrompt == false) {
        ADOConnection1->Open("帳號", "密碼");
    };
    ADOTable1->Active = true;

Hi, 你可以使用 StringReplace 的方法, 並將真實的 ConnectionString 中的 uid, pwd 改為 MYID, MYPASSORD, 如,    Provider=SQLOLEDB.1;Password=MYPASSWORD;Persist Security Info=True;User ID=MYID;Initial Catalog=testdb;Data Source=192.168.3.20    

  TReplaceFlags f;
  ADOConnection1->ConnectionString = StringReplace(ADOConnection1->ConnectionString, "MYID", "real id", f);
  ADOConnection1->ConnectionString = StringReplace(ADOConnection1->ConnectionString, "MYPASSWORD", "real password", f);
  ADOConnection1->Open();

如此一來便能利用動態修改你的 uid, pwd!!

Hi, 先將真實的 ConnectionString 中的 uid, pwd 改為 MYID, MYPASSORD, 如    Provider=SQLOLEDB.1;Password=MYPASSWORD;Persist Security Info=True;User ID=MYID;Initial Catalog=testdb;Data Source=192.168.3.20    使用 StringReplace 的方法, 在程式中將兩個 tag 改為 user 輸入的資料即可, 如    

  TReplaceFlags f;
  ADOConnection1->ConnectionString = StringReplace(ADOConnection1->ConnectionString, "MYID", "real id", f);
  ADOConnection1->ConnectionString = StringReplace(ADOConnection1->ConnectionString, "MYPASSWORD", "real password", f);
  ADOConnection1->Open();

如此一來便能利用動態修改你的 uid, pwd!!

什麼程式碼都不用寫!!直接把 ADOConnection 的 LoginPrompt 設成 True 就好了 < >< >