一个小小的问题 ( 积分: 30 )

我有一个登录窗体，一个主窗体，我用的是SQL2000的数据库　当我点击按钮登录时进不去主窗体，说用户ID或密码不正确，而我我用access数据库连接就能进入主窗体，请问这个为什么？

我有一个登录窗体，一个主窗体，我用的是SQL2000的数据库　当我点击按钮登录时进不去主窗体，说用户ID或密码不正确，而我我用access数据库连接就能进入主窗体，请问这个为什么？

把代码贴出来！会不会是你的连接有问题？

首先确定你输入的用户名和密码与数据表中的相同。
如果没问题，也就是你代码或数据库连接的原因了

是不是连接字符串的问题？

procedure Tlogin.FormCreate(Sender: TObject);
begin
with ADOQuery1 do
begin
Close;
SQL.Text:='SELECT 用户名称,用户密码 FROM device_holder';
Open;
if RecNo<>-1 then
begin
First;
if ComboBox1.Items.IndexOf(FieldByName('用户名称').AsString)=-1 then
ComboBox1.Items.Add(FieldByName('用户名称').AsString);
while RecNo<RecordCount do
begin
Next;
if ComboBox1.Items.IndexOf(FieldbyName('用户名称').AsString)=-1 then
ComboBox1.Items.Add(FieldByName('用户名称').AsString)
end;
end;
end;
ActiveControl:=ComboBox1;
end;

procedure Tlogin.Button1Click(Sender: TObject);
begin
if ComboBox1.Text='' then
begin
Application.MessageBox('用户ID不能为空','用户ID错误',MB_IconError);
ActiveControl:=ComboBox1;
end
else
begin
with ADOQuery1 do
begin
Close;
SQL.Text:=Format('SELECT * FROM device_holder WHERE 用户名称=''%s''',[ComboBox1.Text]);
Open;
if (FieldByName('用户密码').AsString<>Edit1.Text) then
begin
Application.MessageBox('用户ID与密码不匹配','登录失败',MB_IconError);
Edit1.Clear;
ActiveControl:=Edit1;
end
else
begin
FormMain.Show;
UserName:=FieldByName('用户名称').AsString;
ExitApplication:=False;
//self.Close;
end;
end;
end;
end;
end.

多人接受答案了。