在ACCESS做数据库时以下代码正常，换成SQL后以下代码执行时填入正确的用户名称后还是提示('无此用户名称'); 注（ZH为全程变量，在整个FORM开始处就声明的，在ACCESS中正常运行）代码如下：

 
begin
   zh:= Combobox1.Text;
  if zh='' then
   showmessage('请先选择一个正确的用户名称')
  else
  begin
     ADOQuery2.Close;
     ADOQuery2.SQL.Clear;
     ADOQuery2.SQL.Add('select * from tb_user');
     ADOQuery2.SQL.Add('where user=:用户名');
     ADOQuery2.Parameters.ParamByName('用户名').Value:=ZH;
     ADOQuery2.Open;
    if ADOQUery2.RecordCount>0 then
    gnbform.ShowModal
    else
      begin
      showmessage ('无此用户名称');
      end;
    end;
end;

------
我的编程起步于ktop，我将永远支持ktop

ntjrr兄,您好: 可以放一個DBGrid用來顯示ADOQuery2查詢後的資料,先確定是不是真的有查到資料,如果有,那可能是ADOQUery2.RecordCount的問題,我記得在TQuery會有RecordCount有時會變-1的情況,不知道ADOQuery是不是會有同樣情形,解決方法,先下Query.Last,再下Query.First才會拿到正確的RecordCount,你試試看.或是你可以直接使用 if Trim(ADOQuery2.FieldByName('ID').Asstring)<>'' then gnbform.ShowModal // 選一定會有值的欄位來判斷

首先如kevinguo所述，檢查ADOQuery的SQL查詢是否能够正確執行并返回結果。 其次，我以前碰到dbExpress組件的RecordCount不能使用，具体情況不記得了，但dbGo組件還沒碰到RecordCount出錯的情況。這類操作最好把SQL語句改為： select count(*) from tb_user where ...... 然後使用 if ADOQuery1.Fields[0].asinteger > 0 then ...... ---------------------------- 於Delphi K.Top之上 博采眾家之長, 奉獻綿薄之力 ---------------------------

------
------------------------
博采眾家之長,奉獻綿薄之力
------------------------

引言: ..... ADOQuery2.SQL.Add('where [user]=:用户名'); // user是 MSSQL的關鍵字，加個中括弧，表示為你的TABLE欄位。 ....

---------------------------------------------- We will either find a way, or make one. -Hannibal -。

引言:

引言: ..... ADOQuery2.SQL.Add('where [user]=:用户名'); // user是 MSSQL的關鍵字，加個中括弧，表示為你的TABLE欄位。 ....

---------------------------------------------- We will either find a way, or make one. -Hannibal -。

看到这个指点，我在没试之前就估计就是这答案了，因为在这之前我也详细看了一下数据表，就是发现那个栏位被加了个[]，当时我还没意识到，以为加了没影响的，呵呵