Access Insert 問題? |
缺席
|
lee5100954
一般會員 發表:15 回覆:10 積分:5 註冊:2005-11-22 發送簡訊給我 |
我若在Access執行下啊的sql語法是可以跑的
[code sql] Insert into table3(txt1, txt2, txt3) IN "" [;database=C:\Documents and Settings\wang\Access\data2.mdb] select txt1, txt2, txt3 from table1 where no1 = 1 [/code] 但我在Delphi 執行時,會出現 '提供不一致或不完全的資訊導致參數物件不適當地被拒。' 請問我該怎麼改呢? [code delphi] ADOQuery5.Close; ADOQuery5.SQL.Clear; ADOQuery5.SQL.Text := ''; ADOQuery5.SQL.Add('Insert into table3(txt1, txt2, txt3)'); ADOQuery5.SQL.Add(' IN "" [;database=C:\Documents and Settings\wang\Access\data2.mdb]'); ADOQuery5.SQL.Add(' select txt1, txt2, txt3 from table1 where no1 = :no1'); ADOQuery5.Parameters[0].Value := ADOQuery3.FieldByName('no1').Value; ADOQuery5.ExecSQL; [/code] |
christie
資深會員 發表:30 回覆:299 積分:475 註冊:2005-03-25 發送簡訊給我 |
請使用
ADOConnection 屬性Properties: ConnectionString 參考: Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Documents and Settings\wang\Access\data2.mdb;Mode=Share Deny None;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False ===================引 用 lee5100954 文 章=================== 我若在Access執行下啊的sql語法是可以跑的 但我在Delphi 執行時,會出現 '提供不一致或不完全的資訊導致參數物件不適當地被拒。' 請問我該怎麼改呢?
------
What do we live for if not to make life less difficult for each other? |
lee5100954
一般會員 發表:15 回覆:10 積分:5 註冊:2005-11-22 發送簡訊給我 |
這是我的ConnectionString
Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data Source=Data1.mdb;Mode=Share Deny None;Extended Properties="";Persist Security Info=True;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False |
christie
資深會員 發表:30 回覆:299 積分:475 註冊:2005-03-25 發送簡訊給我 |
抱歉誤會您的意思了.
若是這: Insert into table3(txt1, txt2, txt3) IN "" [;database=C:\Documents and Settings\wang\Access\data2.mdb] select txt1, txt2, txt3 from table1 where no1 = 1: 語法Delphi不接受, 建議您就一筆一筆寫囉^_^ ===================引 用 christie 文 章=================== 請使用 ADOConnection 屬性Properties: ConnectionString 參考: Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Documents and Settings\wang\Access\data2.mdb;Mode=Share Deny None;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False ===================引 用 lee5100954 文 章=================== 我若在Access執行下啊的sql語法是可以跑的 但我在Delphi 執行時,會出現 '提供不一致或不完全的資訊導致參數物件不適當地被拒。' 請問我該怎麼改呢?
------
What do we live for if not to make life less difficult for each other? |
lee5100954
一般會員 發表:15 回覆:10 積分:5 註冊:2005-11-22 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |