遺漏等號 |
答題得分者是:st33chen
|
lovemari
中階會員 發表:134 回覆:224 積分:76 註冊:2005-08-18 發送簡訊給我 |
小弟寫了有關UPDATE TABLE的程式
但執行之後卻發生以下狀況 能請各位大大幫我看那裡錯了嗎?? 錯誤訊息 "ORA-00927" 遺漏等號 csTemp4 是 ClientDataSet [code delphi] procedure TForm1.Button3Click(Sender: TObject); begin If Application.MessageBox('你確定要換版嗎?', '確認?', MB_YESNO MB_DEFBUTTON2) = IDYES then begin With csTemp4 do begin Close; Params.Clear; Params.CreateParam(ftString ,'ITEM_SN', ptInput); CommandText := 'Update G_SN_KEYPARTS ' 'SET (ITEM_PART_SN) ' 'Values (:ITEM_SN) ' 'WHERE ITEM_PART_SN = ''' ComboBox3.Items.Strings[ComboBox3.Itemindex] ''' '; Params.ParamByName('ITEM_SN').AsString := Edit1.Text; Execute; showmessage ('修改資料成功'); end; end; end; [/code]
------
Program : Delphi 7 DataBase : Oracle 9i Client : ClientDataSet |
st33chen
尊榮會員 發表:15 回覆:591 積分:1201 註冊:2005-09-30 發送簡訊給我 |
但執行之後卻發生以下狀況 能請各位大大幫我看那裡錯了嗎?? 錯誤訊息 "ORA-00927" 遺漏等號 csTemp4 是 ClientDataSet [code delphi] procedure TForm1.Button3Click(Sender: TObject); begin If Application.MessageBox('你確定要換版嗎?', '確認?', MB_YESNO MB_DEFBUTTON2) = IDYES then begin With csTemp4 do begin Close; Params.Clear; Params.CreateParam(ftString ,'ITEM_SN', ptInput); CommandText := 'Update G_SN_KEYPARTS ' 'SET (ITEM_PART_SN) ' 'Values (:ITEM_SN) ' 'WHERE ITEM_PART_SN = ''' ComboBox3.Items.Strings[ComboBox3.Itemindex] ''' '; Params.ParamByName('ITEM_SN').AsString := Edit1.Text; Execute; showmessage ('修改資料成功'); end; end; end; [/code]
------
IS IT WHAT IT IS 我是 李慕白 請倒著唸. 又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦); 都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
編輯記錄
st33chen 重新編輯於 2008-10-11 07:58:42, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |