線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1495
推到 Plurk!
推到 Facebook!

無法做單一欄位查詢

答題得分者是:pedro
selo
一般會員


發表:3
回覆:5
積分:1
註冊:2008-03-11

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-03-11 10:02:24 IP:220.130.xxx.xxx 訂閱
一個新手問題

當我用ADOQUERY做查詢時

除了用 select * from TABLE可以做所有欄位查詢外

像是 select A from table 他便會出現 ADOQuery1.field "B欄位" not found

但當我下 select B from table 後他反而出現 ADOQuery1.field "A欄位" not found

請問這樣我該在哪邊設定或如何解?

這個困擾使我無法用SUM函數作加總- -

我是使用Delphi 7 access
pedro
尊榮會員


發表:152
回覆:1187
積分:892
註冊:2002-06-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-03-11 10:11:41 IP:210.61.xxx.xxx 未訂閱
您好

有可能您已經把ADOQuery.FieldDefs欄位限制住了
試著把FieldDefs裡面的欄位移除,再下Sql看看
selo
一般會員


發表:3
回覆:5
積分:1
註冊:2008-03-11

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-03-11 10:32:09 IP:220.130.xxx.xxx 訂閱

你好

我把fieldDefs理的欄位移除再下SQL他反而什麼資料都沒有

連欄位名稱都沒有 完全變空空的- -

除了 SELECT * FROM TABLE還是有東西外其他都沒- -
===================引 用 pedro 文 章===================
您好

有可能您已經把ADOQuery.FieldDefs欄位限制住了
試著把FieldDefs裡面的欄位移除,再下Sql看看
selo
一般會員


發表:3
回覆:5
積分:1
註冊:2008-03-11

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-03-11 10:56:56 IP:220.130.xxx.xxx 訂閱

你好

我把fieldDefs理的欄位移除再下SQL他反而什麼資料都沒有

連欄位名稱都沒有 完全變空空的- -

除了 SELECT * FROM TABLE還是有東西外其他都沒- -
===================引 用 pedro 文 章===================
您好

有可能您已經把ADOQuery.FieldDefs欄位限制住了
試著把FieldDefs裡面的欄位移除,再下Sql看看
pedro
尊榮會員


發表:152
回覆:1187
積分:892
註冊:2002-06-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2008-03-11 11:05:50 IP:60.248.xxx.xxx 未訂閱
不清楚你的問題卡在哪裡,
試著從頭來看看你的問題出在哪裡?
我用下面的表單,是OK的
請先用乾淨的(剛置放在表單上)的ADOQuery元件,
資料庫用C:\Program Files\Common Files\Borland Shared\Data\dbdemos.mdb
填上語法select OrderNo,Sum(Qty) as totQty from items group by OrderNo
在DBGrid即可看到效果

[code delphi]
object Form1: TForm1
Left = 192
Top = 114
Width = 783
Height = 540
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 200
Top = 136
Width = 409
Height = 265
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 112
Top = 176
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select OrderNo,Sum(Qty) as totQty from items group by OrderNo')
Left = 80
Top = 104
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Co'
'mmon Files\Borland Shared\Data\dbdemos.mdb;Persist Security Info'
'=False'
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 48
Top = 48
end
end
[/code]
系統時間:2024-05-17 6:06:06
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!