ADOQuery的應用問題 |
|
尚未結案
|
|
Code168
一般會員   發表：16 回覆：11 積分：5 註冊：2003-02-11 發送簡訊給我 |
|
|
Justmade
版主  發表：94 回覆：1934 積分：2030 註冊：2003-03-12 發送簡訊給我 |
1.
ADOQuery.SQL.Text := 'Insert into TableName (Field1,Field2,Field3) values (''' Var1 ''',''' Var2 ''',''' Var3 ''')'; 2.
ADOQuery.SQL.Text := 'Insert into TableName (Field1,Field2,Field3) values (:Var1,:Var2,:Var3)';
ADOQuery.Parameters.ParamByName('Var1').AsString := Val1;
ADOQuery.Parameters.ParamByName('Var2').AsString := Val2;
ADOQuery.Parameters.ParamByName('Var3').AsString := Val3; 發表人 - Justmade 於 2003/05/15 20:14:06
|
|
wnhoo
高階會員  發表：75 回覆：443 積分：198 註冊：2003-04-22 發送簡訊給我 |
VAR
STR:STRING;
INTT:INTEGER;
MYDATE:TDATE;
begin
//字符串型
STR:='字符串';
//整型
intt:=99;
//日期型
mydate:=date;
{方法一}
ADOQuery1.SQL.Clear ;
ADOQuery1.SQL.Add('SELECT * FROM tablename WHERE AA='''+str+''' and bb='+inttostr(intt)+' and cc='''+datetostr(mydate)+'''');
showmessage(ADOQuery1.SQL.Text ); {方法二}
ADOQuery1.SQL.Clear ;
ADOQuery1.SQL.Add('inser into tablename (AA,bb,cc) values (:a1,:b1,:c1)');
ADOQuery1.Parameters.ParamByName(':a1').Value:=intt;
ADOQuery1.Parameters.ParamByName(':b1').Value:=intt;
ADOQuery1.Parameters.ParamByName(':c1').Value:=mydate; showmessage(ADOQuery1.SQL.Text ); end; 供参考！！！ 风花雪月 e梦情缘
------
风花雪月 e梦情缘 |
|
Justmade
版主 發表：94 回覆：1934 積分：2030 註冊：2003-03-12 發送簡訊給我 |
發表時間：2003-05-15 19:35:01
IP:202.175.xxx.xxx 未訂閱
系統時間：2024-06-29 15:46:47
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |