Ò»ÌõSQLÓï¾ä
ÏÖÔÚÊÇ:ÓÐ2¸ö±í:tables tablebook
Set EF = New ADODB.Recordset
Set oRs = New ADODB.Recordset
sCmd = "Select * from Tables" & sWhere & " Order By TableName "
sPD = EF.Fields("TableName") 'TableName´Ó1-20ºÅ,ÓиöFORÓï¾ä
sTmp = "select A.TableName,A.cName,A.Tel from tablebook A left join tables B on A.tableName=B.tableName"
sT = oRs.Fields("TableName") 'TableName(4 5 2 8..)ÕâÑùÅÅÁÐ
ÎÒÒªµÄÊǵ±SPDµÄÖµÔÚtablebook±íʱ,Êä³ötablebookÖеÄcname¸útel.
關×¢
Äã¶ÔÎÊÌâµÄÃèÊö£¬ÒªÈÃÆäËûÈË¿´µÃ¶®£¬Ò»Ñ۾Ϳ´µÃÃ÷°×£¬×î¶à²»³¬¹ý3ÑÛ£¬ÕâÑù²ÅÄÜÓÐЧ½â¾öÎÊÌâ¡£
ÎÒ¿´ÁË20¶àÑÛÁË£¬ÊDz»ÊÇ2¸ö±í¼¶Áª²éѯµÄÎÊÌâѽ£¿£¿
9494
ÊÇFORÓï¾äÖÐtablesÖеÄtablename´Ó1-20Ñ»·,µ±tablename(±ÈÈç´Ó1Ñ»·µ½5ʱ)ÔÚtablebookÖÐÓÐÒ»¸ötablename(5),Êä³ötablebookÖеÄcnameÓëTel.
ÓïÑÔ±í´ï²»ÊǺܺÃ,ÇëÔÁÂ.
Ïà¹ØÎÊ´ð£º
´ó¼Ò°ïæ¿´¿´Õâ2¸ösqlÓï¾äÄĸö²éѯµÄËٶȸü¿ìµã¡£Ð»Ð»°ïæ¡£±È½Ï׿±¡£ÔÚ×öÐÔÄܲâÊÔ¡£
select * from
±íA LEFT OUTER JOIN ±íB ON (±íA.id || ' ' =±íB.id) ,±íC , ±íD, ±íE
WhereÆäËûÌõ¼þ
select * ......
ÒÑÖª´ÓB,±íÖÐÕÒ³öID, NAMEÁ½ÏîÓëC±íÏàͬµÄÊý¾Ý£¬ÔÙÒÀ¾ÝB±íÖо¹ý²éѯ³öÀ´µÄID,CODEÁ½ÏîÊý¾Ý²éѯÓëA±íID,CODEÁ½ÏîÏàͬµÄÊý¾ÝÖжÔÓ¦µÄEMAILÀ´£¬²¢ÁгöÈçÏÂD±íµÄÐÎʽ£¬²»ÖªÎÒÊÇ·ñ±íʾÇå³þ£¿Âé·³°ïÎÒÁÐһϹ«Ê½ºÃÂð£¿Íò· ......
£¨1£©string ConnString = "server=localhost;integrated security=sspi;database=pubs;";
£¨2£©string strConnection="user uid=sa;pwd=123456;Database=test;Server=test;Connect ......
ÒòΪƽʱÕâÖÖ²Ù×÷±È½Ï¶à£¬Ö±½ÓÔÚÊý¾Ý¿âÉÏÊÖ¶¯ÉèÖÃΣÏÕÐԽϴó£¬ËùÒÔÏëÓÃSQLÓï¾äʵÏÖ¡£
ÔÚÍøÉÏʵÔÚËѲ»µ½½á¹û£¬ÕâÀï¸ßÊֶ࣬ϣÍûÄܵõ½´ð°¸¡£
лл¡£
ÄãÏëÔõ麼設ÖÃ?
SQL code:
--´´½¨²âÊÔ±í
......