用BDE连接SQL SERVER 2000在应用程序界面登录时出错,是怎么回事啊?

用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了

posted on 2009-02-19 16:45  delphi2007  阅读(277)  评论(0编辑  收藏  举报