全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:840
推到 Plurk!
推到 Facebook!

有沒有人遇過降子的情況?

尚未結案
Mecer
初階會員


發表:15
回覆:30
積分:29
註冊:2002-10-25

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-08 01:58:06 IP:61.229.xxx.xxx 未訂閱
大家好~~ 目前資料庫用的是Oracle 8.1.7,開發了一個專案,結果我寫了一小段SQL Script居然查不到資料? 我用了一個TDataBase, 一個TQuery,Query內的Script如下: Select * From cust Where custno = :custno 程式如下: with Query1 do begin Close; ParamByName('custno').asString := 'A0001'; Open; if NOT Eof then ... else ... Close; end; 當我無論傳什麼資料給:custno這個變數,得到的結果都是Eof,大小寫的資料都試過了,怎麼傳都沒用,可是如果我在程式裡動態的把SQL Script組起來,再丟給Query去執行,就沒問題?!怎麼會降子?我確定給的資料沒問題...
Fishman
尊榮會員


發表:120
回覆:1949
積分:2163
註冊:2006-10-28

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-08 08:45:44 IP:210.65.xxx.xxx 未訂閱
Hi Mecer,    1.建議你改用 IsEmpty 屬性來判定 TQuery 是否有值回傳
with Query1 do
    begin
        Close;
        ParamByName('custno').asString := 'A0001';
        Open;
        if NOT IsEmpty then
            ...
        else
            ...
        Close;
    end;
2.開啟 SQL Monitor 確認該 Query 確實有值回傳 ---------------------------------- 小弟才疏學淺,若有謬誤尚請不吝指教 ----------------------------------
------
Fishman
kevin622
一般會員


發表:0
回覆:22
積分:9
註冊:2003-10-16

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-08 13:58:26 IP:61.221.xxx.xxx 未訂閱
你可以檢查一下 Query1 的 Params 的 Datatype ,把它設為 ftString 看看。 或是先將值直接加入 SQL 內的方式看看是否抓得到值。
Chance36
版主


發表:31
回覆:1033
積分:792
註冊:2002-12-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-03-09 02:09:40 IP:203.204.xxx.xxx 未訂閱
引言: with Query1 do begin Close; ParamByName('custno').asString := 'A0001'; Open; if NOT Eof then ... else ... Close; end;
Mecer 你好 好像看過Oracle的Char型態會將內容填滿空白到所設定的欄位寬度,你可以試試如下程式:
with Query1 do
begin
  Close;
  ParamByName('custno').asString := 'A0001   '; // 假設欄位寬度為8個字元寬
  Open;
  if NOT Eof then
    ...
  else
...
我用Paradox及MSSQL及MySQL從沒發生過這種現象。
m510011
一般會員


發表:18
回覆:18
積分:7
註冊:2002-05-16

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-03-10 19:29:06 IP:218.163.xxx.xxx 未訂閱
Chance36您說的對,通常我處理這種情形,多用 with Query1 do begin   Close;   ParamByName('custno').asString := Format('%-8S',['A0001']); // 假設欄位寬度為8個字元寬   Open;   if NOT Eof then     ...   else ...    
m510011
一般會員


發表:18
回覆:18
積分:7
註冊:2002-05-16

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-03-10 19:29:18 IP:218.163.xxx.xxx 未訂閱
Chance36您說的對,通常我處理這種情形,多用 with Query1 do begin   Close;   ParamByName('custno').asString := Format('%-8S',['A0001']); // 假設欄位寬度為8個字元寬   Open;   if NOT Eof then     ...   else ...    
系統時間:2024-11-25 16:21:27
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!