Delphi SQL ÅúÁ¿²åÈë - Delphi / Êý¾Ý¿âÏà¹Ø
ÓÐÈý¸ö±í£º
a(ID1,Name1);
b(ID2,Name2);
c(ID1,ID2);
aÖÐID1¶ÔÓ¦µÄÊý¾ÝÓУº
a1,a2,...,am
bÖÐID2¶ÔÓ¦µÄÊý¾ÝÓУº
b1,b2,...bn
ÔÚDelphiÖÐÈçºÎд¸ßЧµãµÄÓï¾ä£¬Ê¹µÃÄܹ»½«ÏÂÃæµÄÊý¾Ý²åÈëµ½c±íÖУº
a1,b1
a1,b2
...
a1,bn
...
a2,b1
a2,b2
...
a2,bn
...
...
am,b1
am,b2
...
am,bn
ÎÒÓõÄÊÇADOQueryÁ¬½ÓÊý¾Ý¿âµÄ¡£
ÏÈÓòéѯÉú³Éa¡¢b¹ØÁªµÄ±í£¨·ûºÏÄã¸ñʽҪÇóµÄ£©£¬È»ºóÓòåÈëÓï¾ä£¬½«²éѯ½á¹û²åÈëµ½c±íÖС£
ÏÈÓòéѯÉú³Éa¡¢b¹ØÁªµÄ±í£¨·ûºÏÄã¸ñʽҪÇóµÄ£©£¬È»ºóÓòåÈëÓï¾ä£¬½«²éѯ½á¹û²åÈëµ½c±íÖС£
{{
Ïà¹ØÎÊ´ð£º
³ÌÐòʹÓõÄÊÇOrcalÊý¾Ý¿â£¬Ï붨ÆÚ£¨Ã¿¼¾¶È£©¶ÔÊý¾Ý¿â½øÐб¸·Ý£¬Ã»É¶Í·Ð÷£¬ÇëÎÊÓ¦¸ÃÔõôŪ£¿
ÓÐÊ²Ã´ÌØÊâÒªÇóÂ𣬱ÈÈçҪǰ¶Ë½çÃæ£¿
Ò»°ãÓÃÊý¾Ý¿â×Ô´øµÄ¡°¼Æ»®ÈÎÎñ¡±ÅäÖÃһϾ͹»ÁË
ûÓÐÊ²Ã´ÌØÊâÒªÇó¡£ÀýÈ磬ֻҪµ ......
1¡£ÔõÑùʹxp_cmdshellÄÜÍêÕûÊä³ö³¬¹ý255¸ö×Ö·ûµÄ×Ö·û´®¡£
2¡£select ʱ£¬¼ìË÷ËÙ¶ÈÊÇÓëfromºóµÄ TABLE˳ÐòÓйأ¬»¹ÊÇÓëwhereÌõ¼þµÄ˳ÐòÓйØ(TABLEÊý¾Ý¶àÉÙ )
ÔÚϵͳÊôÐÔÉ趨ÀïÓиöÑ¡Ïî,¿ÉÒÔÐ޸ĵ¥×Ö¶ÎÊä³ö×ÖÊýÏÞÖÆ. ......
Àý×Ó³ÌÐò¼û¸½¼þ£¬ÓÃDelphi 7½øÐбàÒë
ÎÊÌâ´úÂëΪ
Delphi(Pascal) code:
if Node.ChildNodes <> nil then
begin
for i := 0 to Node.ChildNodes.Count - 1 do
begin
cNode := N ......
ÎÒÏë²éѯ³öÿÌìÊý¾ÝµÄ×î´óµÄÒ»¸öÖµ¡£±íµÄ¸ñʽÈçÏÂ
±íÃû: hisdata
×Ö¶Î ±àºÅ Öµ ״̬ ʱ¼ä
Id value state dattime
101 32.3 0 ......
ÏÂÃæÊÇXML³õʼÎļþÄÚÈÝ
XML code:
<upd:Update xmlns:lar="http://schemas.microsoft.com/msus/2002/12/LogicalApplicabilityRules" xmlns:cmd="http://schemas.microsoft.com/msus/2002/12/Up ......