delphi中用ADOTable和ADOQuery设置连接数据库..实现密码验证时是不是有不同的要求..比如ADOTable一般是连接Access..ADOQuery一般是连接SQL...
我用ADOTable连接SQL的数据库验证密码时总是“密码错误或用户名不存在!”(在数据库中已经有用户和密码的记录了的,测试连接也是成功的)...后来改用ADOQuery重新写代码..重新连接就能通过密码验证了...因为是新手..不明白为什么...请高手们指点一下...谢谢...
主要代码如下
Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=管理系统;Data Source=(local)
var
results:variant;
begin
ADOTable1.Close;
ADOTable1.Open;
ADOTable1.Active;
results:=ADOTable1.Lookup('用户名',edit1.text,'密码');
if edit1.Text='' then
application.MessageBox('用户名不能为空!','提示',mb_ok)
else if edit2.Text='' then
application.messagebox('密码不能为空!','警告',mb_ok)
else
if results=edit2.Text then
begin
application.CreateForm(Tform10,form10);
form10.ShowModal;
end
else
showmessage('密码错误或用户名不存在!');
edit1.Visible:=true;
edit2.Visible:=true;
edit1.Text:='';
edit2.Text:='';