delphi²Ù×÷Êý¾Ý¿âÎÊÌâ
ÏÈ˵˵ÒÔǰÓÃasp²éѯµÄ·½·¨
downÊÇÒ»¸ö±í,·Ö±ðÓÐ×Ö¶Îdown_id,down_url,down_text
testdownÊÇÁíÒ»¸ö±í,·Ö±ðÓÐ×Ö¶Îdown_id,test_down_url
sql="select * from down order by down_count desc"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
ÎÒÏÖÔÚÒª²éѯÁíÒ»¸ö±ítestdownµÄ×Ö¶Îtest_down_urlµÄÄÚÈÝ,µ±down_idÓëµÚÒ»¸ö±ídownµÄ×Ö¶Îdown_idÏàͬµÄʱºò
sql1="select * from testdown where down_id="&rs("down_id")
set rs1=server.CreateObject("adodb.recordset")
rs1.open sql1,conn,1,1
µÚ¶þ²éѯ¾ÍʵÏÖÁËÕâ¸öĿ¼,ÔÚÁíÒ»¸ö±íÖвéѯÓëµÚÒ»¸ö±íÖÐÏàͬ×Ö¶ÎÖµµÄÒ»¸öÖµ
ÎÒ²»ÖªµÀÔÚdelphiÔõôʵÏÖ
ÓÃADOQueryµÄ»°
Çë¸÷ÐÅ´óÉñÖ¸µã½É½,СµÜ²»²Å,³õѧdelphi
ÀàËÆ·½·¨ÈçÏ£¬ÓÃinner joinÁ¬½Ó
select * from A inner join B on A.id=B.id where A.id=1
Delphi(Pascal) code:
qry1.Close;
qry1.SQL.Text:='select * from down order by down_count desc';
qry1.Open;
down_id:=qry1.fieldByName('down_id').asstring;//Õâ¸öÖµ²»ÖªµÀÄãÊÇʲôʱºòÈ¡µÄ
qry2.Close;
qry2.SQL.Text:='select * from testdown where down_id='+down_id;
qry2.Open;
ллÁ½Î»ÐÖµÜÏà½Ì,СµÜ·Ö²»¶à,´ÓÐÄÀï¸ÐлÄãÃÇ
Ïà¹ØÎÊ´ð£º
ÈçÌâ¡£
¸Ð¾õÈçºÎ£¿½»Á÷Ï¡£
ûÓÐÑо¿¹ý£¬ºÇºÇ
ÓÐɶÑо¿Í·£¿
ÄǸö¶«Î÷£¬ÊǸö¼¦Àߣ¬£¬Ã»ÓÐʲôÒâ˼£¬·¢ÏÖ£¡£¡
ÓÃÀ´×öB/S¼Ü¹¹µÄMISϵͳµÄ»°Ó¦¸Ã¿ÉÒÔÌá¸ß½çÃæ¿ª·¢µÄЧÂʰɣ¿
ÒòΪ²»ÊìϤDelphi £ ......
ÕâÓïÑÔºÃÄѰ¡ ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøÅ¬Á¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É
Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......
²¿ÃÅȱһµ½Á½¸öDelphi¿ª·¢ÈËÔ±,¾Ý˵×öDelphiºÍC++µÄ¶¼²»ºÃÕÐ,¹«Ë¾ÓÐÒâÕÒÍâ°üÈËÔ±.±¾ÈËÓе㲻̫ÀÖÒâ,Èç¹û·¹ýµÄÅóÓÑ,×Ô¼ºÐèÒªÌø²Û»òÓÐÅóÓÑÐèÒªÌø²ÛµÄ,·½±ãµÄ»°,¿ÉÒÔ·¢¸öÕ¾ÄÚ¶ÌÐÅ,»ò¼ÓQQ 83039548,×¢Ã÷ÇóÖ°/ÍÆ¼ö,лл. ......
delphi Òì²½Ïß³ÌÔõôÔõôʵÏÖ£¿
Çë¸÷λ´óÀаïæ£¡
×îºÃÓиöʵÀý£¡
¶àл
Ä㲻ͬ²½¾ÍÊÇÒì²½ÁË,»¹Ð´É¶
ĬÈÏÇé¿öÏ£¬Ï߳̾ÍÊÇÒì²½µÄ¡¡¡¡*^_^*
¹À¼ÆÂ¥Ö÷ͬ²½ºÍÒì²½¸ÅÄûŪÇå
ÕæÎÞÓï¡£¡£¿É ......
ÎÒÔÚÓÃmainmenu²Ëµ¥¿Ø¼þºÍsavediglog¿Ø¼þÉèÖñ£´æÎļþ¶Ô»°¿òʱ£¬ËäÈ»Äܹ»Ë³Àû±£´æÎļþ£¬µ«ÊÇÎÒ¶ÔÒѾ±£´æ¹ýµÄÎļþ½øÐÐÔٴα£´æµÄʱºò£¬²¢²»ÄܺͺܶàÈí¼þÒ»ÑùÖ±½Ó±£´æ£¬¶øÊÇÈÔÈ»µ¯³ö±£´æ¶Ô»°¿ò£¬¶øÎÒ²»ÏëËü´ò¿ª£¬¶øÊÇ ......