¸ßÊÖ¿ìÀ´¾È¾ÈÎÒ¡£MSSQL²éѯÎÊÌâ
Dim Rs:Set rs=key28.exe("select [id],[big],[class] from lm_small")
Do while not rs.eof
Dim rs1:Set rs1=key28.exe("select [class] from [lm_class] where id="&rs("big"))
ΪʲôÎÒʹÓÃRS£¨¡°big¡±£©¾Í»á³ö´í¡£¶øÖ±½ÓʹÓÃÈçid=1ÕâÑùµÄ²éѯÌõ¼þ¾Í²»»á´í°¡¡£ÒÔǰÓõÄÊÇACCESSû´í¡£½ñÌìÎҸĻ»³ÉMSSQL¾Í³ö´í°¡¡£ºÃ¼¸¸öµØ·½¶¼ÊÇÕâÑùµÄÎÊÌ⣡
°ÑIDת»»Ï ת»»³É×Ö·û´®¸ñʽµÄ
IDºÍBIGµÄ¸ñʽ¶¼ÊÇINTµÄ°¡
Dim rs1:Set rs1=key28.exe("select [class] from [lm_class] where id="& rs("big") &")
Ïà¹ØÎÊ´ð£º
mssqlÈçºÎÖ»ÏÔʾÓÐÖØ¸´µÄÊý¾ÝÄØ£¿
ÓÐÖØ¸´µÄÊý¾Ý¾ÍÏÔʾһÌõÖØ¸´µÄÊý¾Ý£¬Ã»Öظ´µÄ²»ÏÔʾ£¬²éѯÓï¾ä¸ÃÔõÃ´Ð´ÄØ£¿Ð»Ð»
SQL code:
select distinct *
from tablename
where id in (
selec ......
±íµÄ½á¹¹ÈçÏ£º
±í1£ºtb_big
×ֶΣºfalseid Öµ£º1£¬2£¬
×ֶΣºbigtype Öµ£ºA£¬B£¨ÓëfalseidµÄÖµµÄλÖÃÒ»Ò»¶ÔÓ¦£¬¼´1¶ÔÓ¦A£¬2¶ÔÓ¦B£©
±í2£ºtb_small
×ֶΣºfalseid£¨Óëtb_bigµÄfalseid_1¹ØÁªµ ......
±íµÄ½á¹¹ÈçÏ£º
±í1£ºtb_big
×ֶΣºfalseIDÖµ£º1£¬2
×ֶΣºbigtype Öµ£ºA£¬B£¨ÓëfalseIDµÄÖµµÄλÖÃÒ»Ò»¶ÔÓ¦£¬¼´1¶ÔÓ¦A£¬2¶ÔÓ¦B£©
±í2£ºtb_small
×ֶΣºfalseID£¨Óëtb_bigµÄfalseID¹ØÁªµÄ ......
cÓïÑÔÖеÄ&ºÍ&&£¬ÆäÖÐ&&¾ßÓжÌ·ÅжϹ¦ÄÜ£¬ÔÚmssqlÖÐÓжÌ·ÅжÏÂÎÒÓÃand²»ÐУ¬°Ñand»»³É&&±¨´íÁË
MSSQLÖÐûÓÐ&&
½«nvarchar Öµ '1g' ת»»ÎªÊý¾ÝÀàÐÍΪ int µÄÁÐ ......