在sqlquerry 的sql屬性內輸入下列的一句sql select * from employee where username = :susername and passwd = :spassword procedure TLoginForm.bbtnOKClick(Sender: TObject); begin sqlqLogin.Params.ParamByName('susername').Value:=edtUsername.Text; sqlqLogin.Params.ParamByName('spassword').Value:=edtPassword.Text; sqlqLogin.ExecSQL(true); if sqlqLogin.RecordCount<>0 then showmessage('Login OK!') else showmessage('Login Fail!'); end; 為甚麼會出錯?

您好!    Select語法查詢請使用Open , 不要使用ExecSQL. 另外, 請將下兩句: sqlqLogin.Params.ParamByName('susername').Value:=edtUsername.Text; sqlqLogin.Params.ParamByName('spassword').Value:=edtPassword.Text; 改為: sqlqLogin.Params.ParamByName('susername').AsString:=edtUsername.Text; sqlqLogin.Params.ParamByName('spassword').AsString:=edtPassword.Text; 因為使用Value, 當edtUsername和edtPassword為null時是會出錯的. Value無法判斷空字串, 使用AsString會將Null自動傳為'' 參考看看! ===================== 努力,相信會獲得美麗! 忻晟 發表人 - cashxin2002 於 2003/09/03 21:35:00

------
忻晟

仍會出現 dbexpress error:operation not supported

chrislao 兄 誠如cashxin2002兄所言 Select語法查詢請使用Open , 不要使用ExecSQL 因為ExecSQL不會有傳回值 看起來您是用DBexpress 用ADO聯結試試看 我試過可以阿

procedure TLoginForm.bbtnOKClick(Sender: TObject); begin sqlqLogin.Close; sqlqLogin.SQL.Clear; sqlqLogin.SQL.ADD('select * from employee where username = :susername and passwd = :spassword '); sqlqLogin.Params.ParamByName('susername').Value:=edtUsername.Text; sqlqLogin.Params.ParamByName('spassword').Value:=edtPassword.Text; sqlqLogin.Open; if sqlqLogin.RecordCount<>0 then showmessage('Login OK!') else showmessage('Login Fail!'); end; TRY TRY SEE

chih版主,我已經按照你的方法做,但當我一輸入username和password就會在 if sqlqLogin.RecordCount<>0 then 這句出錯, dbexpress error:operation not supported 請問是甚麼原因?

你好： 這可能是你所連結的資料庫不支援 RecordCount 的原因吧。 如果是這樣的話你可以使用下列方式取代。原理是當資料表一開啟時除非是空表 否則 Bof 與 Eof 絕對不可能一樣。

sqlqLogin.open;
if (sqlqLogin.Bof = sqlqLogin.Eof) then
   showmessage('Login OK!')
else
   showmessage('Login Fail!');

摘錄 RecordCount文件說明 Use the RecordCount property to find out how many records are in a Recordset object. The property returns -1 when ADO cannot determine the number of records or if the provider or cursor type does not support RecordCount. Reading the RecordCount property on a closed Recordset causes an error.

您好!    出錯信息是運算子無支援, 所以試試: if sqlqLogin.RecordCount > 0 then ===================== 努力,相信會獲得美麗! 忻晟

------
忻晟

引言: 你好： 這可能是你所連結的資料庫不支援 RecordCount 的原因吧。 如果是這樣的話你可以使用下列方式取代。原理是當資料表一開啟時除非是空表 否則 Bof 與 Eof 絕對不可能一樣。

sqlqLogin.open;
if (sqlqLogin.Bof = sqlqLogin.Eof) then
   showmessage('Login OK!')
else
   showmessage('Login Fail!');

摘錄 RecordCount文件說明 Use the RecordCount property to find out how many records are in a Recordset object. The property returns -1 when ADO cannot determine the number of records or if the provider or cursor type does not support RecordCount. Reading the RecordCount property on a closed Recordset causes an error.

至ha0009版主 還記得小弟吧< >, 借此篇問題之寶地, 感謝您的多次幫助, 不過近來都很少見到您< >, 蠻想念的啦! 看您答題快破百了, 先恭喜在前, 這應該是earliest屬性的恭喜元件吧 您以上的><>===================== 努力,相信會獲得美麗! 忻晟 發表人 -

ha0009你好: 多謝你的指教,問題已解決,完來是mysql不支援recordcount