用BDE串連SQL SERVER 2000在應用程式介面登入時出錯,是怎麼回事啊?

來源:互聯網
上載者:User
用BDE串連SQL SERVER 2000在應用程式介面登入時出錯,是怎麼回事啊? Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiDB/html/delphi_20061218213005232.html
我用BDE串連SQL   SERVER   2000在應用程式介面登入時出錯,提示如下:  
  [Microsoft][ODBC   SQL   Server   Driver][SQL   Server]使用者'(null)'登入失敗。原因  
  未與信任SQL   Server串連相關聯。  
  哥位高手,到底是怎麼回事啊。登陸按鈕的代碼如下:  
  procedure   TLoginForm.Button1Click(Sender:   TObject);  
      var  
          aname,apassword:string;  
  begin  
          aname:=trim(Edit1.Text);  
          apassword:=trim(Edit2.Text);  
          Table1.Open;  
          Table1.SetKey;  
          Table1.Fields[0].AsString:=aname;  
          if   Table1.GotoKey   then  
                if   Table1.Fields[1].AsString=apassword   then  
                      if   Table1.Fields[2].AsString='內部管理員'   then  
                            begin  
                                  Table1.Close;  
                                  LoginForm.hide;  
                                  ManageForm.show  
                            end  
                      else  
                            begin  
                                  Table1.Close;  
                                  LoginForm.hide;  
                                  ServeingForm.show  
                            end  
                else  
                      begin  
                          MessageDlg('您不是合法的使用者,請退出!',mtInformation,[mbOk],0);  
                          Table1.Close;  
                          LoginForm.Close;  
                      end;  
  end;  
  謝謝指導。

TDataBase中的Params沒賦值,  
  DataBase:='User   Name=sa   Password=密碼'就可以了

資料庫在本地還是在另外機子?有沒有訪問資料庫的許可權?訪問資料庫時要添加使用者名稱和密碼的,,

沒有設定訪問資料庫的使用者與密碼,設定就OK了

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.