delphi ²åÈëÊý¾Ý¿âÅжÏÊÇ·ñ´æÔڼǼ£¬´æÔÚ¸üеÄÎÊÌâ
insertsql2:='insert into A (a,b,c) values () where a='''+s+'''';
con1.Open;
qry2.SQL.Clear;
qry2.SQL.Add(insertsql2);
qry2.ExecSQL;
Application.MessageBox('²åÈë³É¹¦£¡','Ìáʾ',0+64);
ÔÚ½øÈë²åÈë¼Ç¼²Ù×÷ʱ£¬ÈçºÎÅжϱíÖÐÊÇ·ñ´æÔÚÏàͬ¼Ç¼£¬Èç¹ûÏàͬÔò¸üУ»Èç¹û²»´æÔÚ£¬¾Í²åÈë¡£
1,²åÈëǰѡͨ¹ýÖ÷¼ü²éѯһÏÂ
2£¬Ö±½Ó½«ÄãµÄ²åÈë¹ý³Ì·Åµ½
try
// insert
except
// Òì³£µÄ»°£¬Í˳ö
end;
ÏÈselect³öÄǸöidµÄ¼Ç¼£¬È»ºóÅжÏÊý¾Ý¼¯ÊÇ·ñΪ¿Õ£¬Èç¹û²»Îª¿Õ£¬¾ÍÖ¤Ã÷´æÔÚ
sql:
'if not exists(select a from A where a='+quotedstr(s)
+' insert into A (a,b,c) values ('+...+')'
ͬÒâ2Â¥µÄ¿´·¨
if select then
update
else
insert into
»¹Êǰ´ÀÏÃÏ·½·¨Ã»Óдí
ÏàͬҲ¸üоÍÏԵöàÓàÁË,²»´æÔÚ¾ÍÖ±½Ó²åÈë
if not exists(select 1 from A where a='k' and b='k' and c='k') insert into A(a,b,c) values ('k','k','k')
ÏȲéѯ£¬¿´ÄãËùÒª²åÈëµÄÄǸö×÷ΪÖ÷¼üµÄ¼Ç¼ÊÇ·ñ´æÔÚ¡£
´æÔÚ£¬²»²åÈë¡£
ÓÃadoqueryDelphi(Pascal) code:
adoquery.recordcount
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()
¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...
Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!
(ÔÚA ......
delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......
ÈçÌ⣬ µã»÷DelphiµÄFile²Ëµ¥µÄExitÍ˳öDelphi£¬ Delphi²¿·Ö¹Ø±Õ--¼´²»ÄÜÔÙ²Ù×÷Delphi£¬µ«ÈÎÎñÀ¸ºÍ½ø³ÌÀDelphi»¹ÔÚÔËÐУ¬Ã»ÓÐÕæÕýµÄÍ˳ö¡£ÊDz»Êǰ²×°ÁËjre¸Ä±äÁËijЩ»·¾³±äÁ¿µ¼Ö£¬ÇëÎʸßÊÖÈçºÎ½â¾ö£¿ ×¢£ºÃ»°²×° ......
hongqi162¡¢windindance
´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ³£ÉÏÀ´×ª×ªµÄ
ÒýÓÃ
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔÒò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É
¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......