這段sql語法我在sql下測試過了，是沒問題的  只是拿到delphi中，要丟變數進去，sql就抓不到變數，只會幫我排序， 並不會幫我找出介於這區間的資料， 請大家幫我看看好嗎…謝謝 with DM_MT.Query_MT_choose do  begin      close;      sql.Clear;      sql.LoadFromFile('sql\Dchice.sql');          case choose_item.ItemIndex of          0:  sql.add('and STUDENT_COURSE.STU_ID >=:start_id and STUDENT_COURSE.STU_ID <=:end_id order by STUDENT_COURSE.STU_ID');          1:  sql.add('and COURSE.CRS_ID >=:start_id and COURSE.CRS_ID <=:end_id order by COURSE.CRS_ID');        end;           ParamByName('start_id').asstring:=edit1.text;   ParamByName('end_id').asstring:=edit2.text;              prepare;      open;         if recordcount=0 then         showmessage('找不到符合的資料!!');      bitbtn2Click(nil);  end;

Don't know if it is related. I remember encountering a BUG in using BDE with Access DB back in Delphi 2.0: RecordCount will be zero when FIRST called. So I used to call it twice, e.g.

Query1.RecordCount; { it fixed a BUG???}
if Query1.RecordCount<>0 then begin
    {....}
end;

底下改成這樣試看看.. case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID BETWEEN ' #39 edit1.text #39 ' and ' #39 edit2.text #39 ' order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID BETWEEN ' #39 edit1.text #39 ' and 'v #39 edit2.text #39 ' order by COURSE.CRS_ID'); end;

引言: case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID >=:start_id and STUDENT_COURSE.STU_ID <=:end_id order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID >=:start_id and COURSE.CRS_ID <=:end_id order by COURSE.CRS_ID'); end; ParamByName('start_id').asstring:=edit1.text; ParamByName('end_id').asstring:=edit2.text;

miga你好: 你有試過between start_id and end_id 嗎?     

引言: case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID >=:start_id and STUDENT_COURSE.STU_ID <=:end_id order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID >=:start_id and COURSE.CRS_ID <=:end_id order by COURSE.CRS_ID'); end;

除非是Local Database(如.dbf或paradox),Recordcount並不可靠,因為被選取之資料若量很大,並不會一次全進入buffer, 這是Delphi考慮效率的結果, 並不是bug. 除非你用last去到最後一筆, recordcount並不可靠 剛open之dataset可用 EOF或isEmpty檢查是否有資料, 不要用Recordcount

[quote] 底下改成這樣試看看.. case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID BETWEEN ' #39 edit1.text #39 ' and ' #39 edit2.text #39 ' order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID BETWEEN ' #39 edit1.text #39 ' and 'v #39 edit2.text #39 ' order by COURSE.CRS_ID'); end; 我試過了…還是不行，只會排序，而且也不會出現訊息告知說沒抓到變數 真是奇怪

引言: miga你好: 你有試過between start_id and end_id 嗎?

嗯…我也試了，跟上面問題一樣說…><

[quote] Don't know if it is related. I remember encountering a BUG in using BDE with Access DB back in Delphi 2.0: RecordCount will be zero when FIRST called. So I used to call it twice, e.g.

Query1.RecordCount; { it fixed a BUG???}
if Query1.RecordCount<>0 then begin
    {....}
end;

我不太懂哎，要把這段程式加在那做判斷呢 你的意思是先判斷query1裡面有沒有值嗎

引言: 這段sql語法我在sql下測試過了，是沒問題的 只是拿到delphi中，要丟變數進去，sql就抓不到變數，只會幫我排序， 並不會幫我找出介於這區間的資料， 請大家幫我看看好嗎…謝謝 with DM_MT.Query_MT_choose do begin close; sql.Clear; sql.LoadFromFile('sql\Dchice.sql'); case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID >=:start_id and STUDENT_COURSE.STU_ID <=:end_id order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID >=:start_id and COURSE.CRS_ID <=:end_id order by COURSE.CRS_ID'); end; ParamByName('start_id').asstring:=edit1.text; ParamByName('end_id').asstring:=edit2.text; prepare; open; if recordcount=0 then showmessage('找不到符合的資料!!'); bitbtn2Click(nil); end; < face="Verdana, Arial, Helvetica"> 這應該不是參數傳不進的問題, SQL資料庫本身並不支援RECORDCOUNT用法, 以下截取DELPHI HELP說明 an application should only use RecordCount with Paradox and dBASE tables. 可以看出, RECORDCOUNT 只支援 DB, DBF格式, 如果你只是要判斷資料是否存在, 有兩個做法 1. if (DM_MT.Query_MT_choose.eof) and (DM_MT.Query_MT_choose.bof) then showmessage('記錄不存在') 2.另一種(舉例) DM_MT.Query_MT_choose.sql.text:= 'select count(*) from ..... where STUDENT_COURSE.STU_ID >=:start....'; DM_MT.Query_MT_choose.sql.execsql; DM_MT.Query_MT_choose.fieldbyname('COUNT').Asinteger=0 then showmessage('記錄不存在');

因為判斷有沒有資料庫中的資料是否存在 對我並不是太重要， 所以我就先把他註解掉 但是重點是… 我所輸入的區間，資料庫中確實是有資料存在的， 但是他卻出不來…    到底為何因哩…

引言: case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID BETWEEN ' #39 edit1.text #39 ' and ' #39 edit2.text #39 ' order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID BETWEEN ' #39 edit1.text #39 ' and 'v #39 edit2.text #39 ' order by COURSE.CRS_ID'); end;

紅色部分確定沒錯嘛? 改成 case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID BETWEEN :start_id and :end_id order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID BETWEEN ':start_id and :end_id order by COURSE.CRS_ID'); ParamByName('start_id').asstring:=edit1.text; ParamByName('end_id').asstring:=edit2.text; OPEN;...以下都一樣 end;

引言:

引言: case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID BETWEEN ' #39 edit1.text #39 ' and ' #39 edit2.text #39 ' order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID BETWEEN ' #39 edit1.text #39 ' and 'v #39 edit2.text #39 ' order by COURSE.CRS_ID'); end;

紅色部分確定沒錯嘛? 改成 case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID BETWEEN :start_id and :end_id order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID BETWEEN ':start_id and :end_id order by COURSE.CRS_ID'); ParamByName('start_id').asstring:=edit1.text; ParamByName('end_id').asstring:=edit2.text; OPEN;...以下都一樣 end;

嗯…100%的確定哦… 第二個方法我也試過了… 結果是一樣 我想要的是只show出在區間的資料 但是全部的資料都會出來， 只有做排序而已

引言: 因為判斷有沒有資料庫中的資料是否存在 對我並不是太重要， 所以我就先把他註解掉 但是重點是… 我所輸入的區間，資料庫中確實是有資料存在的， 但是他卻出不來… 到底為何因哩… < face="Verdana, Arial, Helvetica"> 嗯! 1.請先把 sql.text內容寫在 query中proerty的SQL內容, 成為固定寫法, 來確認你的 loadformfile的內容是否有問題, 然後檢查一下 query的property中的 parameter 是否有 start... , end..這兩個參數, 如果沒有, 則表示語法基本上有不對 另外， 我曾碰到一個狀況, 雖然不可思議, 但確實發生過 2.把 STUDENT_COURSE.STU_ID >=:start.... 改為 STUDENT_COURSE.STU_ID >= :start.... , 請在 :start.. 前加一個空白 good luck! 發表人 - P.D. 於 2002/12/17 01:11:36

嗯! 1.請先把 sql.text內容寫在 query中proerty的SQL內容, 成為固定寫法, 來確認你的 loadformfile的內容是否有問題, 然後檢查一下 query的property中的 parameter 是否有 start... , end..這兩個參數, 如果沒有, 則表示語法基本上有不對    另外， 我曾碰到一個狀況, 雖然不可思議, 但確實發生過 2.把 STUDENT_COURSE.STU_ID >=:start....  改為 STUDENT_COURSE.STU_ID >= :start.... , 請在 :start.. 前加一個空白    good luck!        發表人 - P.D. 於 2002/12/17  01:11:36 [/quote]    哇~~~~~ 我是先把 >

我覺得問題點應該是出在sql.LoadFromFile('sql\Dchice.sql');這一段.. 我原來POST那一段是沒有問題的....可以Run... 我看你原來的寫法是>= 跟<=...這樣好像是SELECT出全部的資料喔... 如果你Dchice.sql的語法SELECT出來就是沒有資料... 那你在加條件也沒有用... 要不要把Dchice.sql POST上來讓大家幫你看ㄋ??

引言: 這段sql語法我在sql下測試過了，是沒問題的 只是拿到delphi中，要丟變數進去，sql就抓不到變數，只會幫我排序， 並不會幫我找出介於這區間的資料， 請大家幫我看看好嗎…謝謝 with DM_MT.Query_MT_choose do begin close; sql.Clear; sql.LoadFromFile('sql\Dchice.sql'); case choose_item.ItemIndex of 0: sql.add('and STUDENT_COURSE.STU_ID >=:start_id and STUDENT_COURSE.STU_ID <=:end_id order by STUDENT_COURSE.STU_ID'); 1: sql.add('and COURSE.CRS_ID >=:start_id and COURSE.CRS_ID <=:end_id order by COURSE.CRS_ID'); end; ParamByName('start_id').asstring:=edit1.text; ParamByName('end_id').asstring:=edit2.text; prepare; 在這一行之前加個 ShowMessage(sql.Text); 或 Memo1.Lines.Add(sql.Text); 看看 SQL 內容結果到底為何？ open; if recordcount=0 then showmessage('找不到符合的資料!!'); bitbtn2Click(nil); end; < face="Verdana, Arial, Helvetica"> -- Everything I say is a lie.

引言: Don't know if it is related. I remember encountering a BUG in using BDE with Access DB back in Delphi 2.0: RecordCount will be zero when FIRST called. So I used to call it twice, e.g.

Query1.RecordCount; { it fixed a BUG???}
if Query1.RecordCount<>0 then begin
    {....}
end;

我不太懂哎，要把這段程式加在那做判斷呢 你的意思是先判斷query1裡面有沒有值嗎< face="Verdana, Arial, Helvetica"> As ccchen said, you cannot trust RecordCount in all cases. I find callinf RecordCount twice in an application I developed using Delphi 2 will return the correct count (strange, eh?). If possible using 'select count(*) .......' first to return the count or simply use query1.Eof right after open instead of quert1.RecordCount=0 to test if the query is empty.

引言: 我覺得問題點應該是出在sql.LoadFromFile('sql\Dchice.sql');這一段.. 我原來POST那一段是沒有問題的....可以Run... 我看你原來的寫法是>= 跟<=...這樣好像是SELECT出全部的資料喔... 如果你Dchice.sql的語法SELECT出來就是沒有資料... 那你在加條件也沒有用... 要不要把Dchice.sql POST上來讓大家幫你看ㄋ??

這是我的sql\dchice.SQL select STUDENT_COURSE.STU_ID,STUDENT_COURSE.CRS_ID,STUDENT.STU_CNAME,COURSE.CRS_NAME,COURSE.CRS_POINT,TEACHER.TEA_CNAME,DEPARTMENT.DEP_SCNAME FROM STUDENT_COURSE LEFT JOIN STUDENT ON STUDENT_COURSE.STU_ID=STUDENT.STU_ID LEFT JOIN COURSE ON STUDENT_COURSE.CRS_ID=COURSE.CRS_ID LEFT JOIN COURSE_DETAIL ON COURSE.CRS_ID=COURSE_DETAIL.CRS_ID LEFT JOIN TEACHER ON COURSE_DETAIL.TEA_ID=TEACHER.TEA_ID LEFT JOIN DEPARTMENT ON COURSE_DETAIL.DEP_ID=DEPARTMENT.DEP_ID 謝謝大家撥空幫我回答問題 另外，我有加shomessage(DM_MT.Query_MT_choose.sql.text); 出來的訊息就是dchice.sql再加上我另外加 的那些sql語法喲~~

你sql裡頭where怎麼不見了 天行健 君子當自強不息~~@.@

------
天行健
君子當自強不息~~@.@

引言: [quote] 我覺得問題點應該是出在sql.LoadFromFile('sql\Dchice.sql');這一段.. 我原來POST那一段是沒有問題的....可以Run... 我看你原來的寫法是>= 跟<=...這樣好像是SELECT出全部的資料喔... 如果你Dchice.sql的語法SELECT出來就是沒有資料... 那你在加條件也沒有用... 要不要把Dchice.sql POST上來讓大家幫你看ㄋ??

今天我利用本機上資料庫去測這段語法， 我發現我真的沒辦法去把資料SELECT出來， 也就是說，這段語法真的有錯誤囉， 我也有改成BETWEEN 但是好像一樣 我用的是MYSQL哦 大家幫我看看我的語法吧 另外，我會用LEFT JOIN，是因為我用WHERE的話 好像多於兩個TABLE做關聯，他就會變成空集合，完全沒資料 麻煩大家了

不過 不管你是用 leftjoin 還是rightjoin sql裡頭where關鍵字是不能拿掉的 因為where是固定要用的 天行健 君子當自強不息~~@.@ 發表人 - T.J.B 於 2002/12/17 09:42:53

------
天行健
君子當自強不息~~@.@

引言: 不過 不管你是用 leftjoin 還是rightjoin sql裡頭where關鍵字是不能拿掉的 因為where是固定要用的 天行健 君子當自強不息~~@.@ 發表人 - T.J.B 於 2002/12/17 09:42:53

啊~~ 可能之前大家以為我用WHERE，所以叫我用and就可以了， 結果我用的是left join，我也忽略了這點… 謝謝大家了，呼…弄了好幾天…竟然是錯在這…< > 不過還是謝謝大家，終於解決了…< >