我用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;
谢谢指导。