ÇóÖúaccessÎÊÌâ
ÒòΪϵͳÉý¼¶£¬ÐèÒª°Ñaccess²éѯÓï¾äÀïµÄA±íÌæ»»³ÉB±í£¬µ«ÊÇÓкܶàaccess³ÌÐò£¬Ã¿¸öaccessÀïÃæ²éѯ¶¼ÓÐ100¶à¸ö£¬ÎÒÏë°ÑÕâ100¶à¸ö²éѯµ¼³öÀ´£¬È»ºóÓòéÕÒÌæ»»¹¦ÄܰÑA±íÌæ»»³ÉB±í£¬ÇëÎÊÔõôʵÏÖ£¿»òÕß´ó¼ÒÓÐûÓÐÆäËüºÃµÄ·½·¨¡£Ã¿Ò»¸ö²éѯµã¿ª½øÐÐÌæ»»£¬ÊDz»¿ÉÄÜÍê³ÉµÄÈÎÎñ
ÕæµÄºÜ¼±°¡£¬ÇóÖúÄÄλºÃÐÄÈ˰ï°ïæ°¡
²»¶®,°ï¶¥.
ÀûÓÃÕâ¶Î´úÂ룬Äã¿ÉÒÔÌæ»»ËùÓеÄtable1 Ϊtable2
VB code:
Public Sub t()
Dim q As QueryDef
For Each q In CurrentDb.QueryDefs
q.SQL = Replace(q.SQL, "table1", "table2")
Next
End Sub
ÕâÁ½¶Î´úÂë¼Óµ½access³ÌÐòʲôλÖã¿
Ä£¿éÖС£
лл£¬²»¹ýºÃÏñÔÚÁ¢¼´´°¿ÚÖÐÏÔʾµÄ²»ÊÇËùÓвéѯ£¬Ö»Óв¿·Ö°¡
ÊDz»ÊÇÎҵIJéѯÓï¾äÌ«¶àÁË£¬Ò»¸ö´°¿ÚÏÔʾ²»¿ª£¿
Public Sub t()
Dim q As QueryDef
For Each q In CurrentDb.QueryDefs
q.SQL = Replace(q.SQL, "table1", "table2")
Next
End Sub
ÎÒÖ´ÐÐÕâ¸öº¯ÊýûÓÐÆä×÷Óð¡
Replace(q.SQL, "table1", "table2")
ÄãµÄ±íÃû¾ÍÊÇÕâ¸ö£¿
²»ÊÇ£¬Replace(q.SQL, "LEANV3_SAL_ORDERROW", "LEANVIEW_SAL_ORDERROW"£©£¬ÆäʵֻÐèÒªÌæ»»LEANV3ΪLEANVIEW¾Í¿ÉÒÔ£¬µ«ÊÇÎÒд³ÉReplace(q.SQL, "LEANV3", "
Ïà¹ØÎÊ´ð£º
ÎÒ½«Ò»¶Î4000À´×ÖµÄÎı¾¸³Öµ¸øËüÔõô¾Í³ö´íÁË,ÌáʾÔËÐÐʱ´íÎó2176 Õâ¸öÊôÐÔµÄÉèÖÃֵ̫³¤?
ÄãÊÇÔõÑù¸³ÖµµÄ£¿
²âÊÔÁËһϣ¬Óñ¸×¢×ֶθøÎı¾¿ò×öÊý¾ÝÔ´£¬Ã»ÓÐÌáʾÉèÖÃֵ̫³¤,14893×Ö·û
ÒýÓÃÎÒ½«Ò»¶Î4000À´×ÖµÄÎ ......
jsp¿ª·¢µÄʱºòÄܹ»µ¼³öwordºÍexcel£¬µ«ÊÇÊÇ·ñÄܹ»Ö±½Óµ¼³öΪacess¸ñʽ¡¢dbf¸ñʽµÄÎļþ£¿
¸ßÊÖÖ¸µãÏ£¬×îºÃÄܹ»¸ø¸öÀý×Ó£¬Ð»Ð»£¡£¡£¡
javadbfÕâ¸öjarÒ»ÇÐÎÊÌâ½â¾öÁË¡£
ÏÂÔØµØÖ·Îª£ºhttp://sarovar.org/projects/ ......
×î½üѧϰasp£¬µ±Á·Ï°µ½Á¬½ÓÊý¾Ý¿âµÄʱºò£¬ÆµÆµ³ö´í£¬¿É¾ÍÊDz»ÖªµÀ´íÔÚÔõôµØ·½£¬Çë¸ßÊÖ°ïæ¿´¿´£¡£¡Ð»Ð»£¡
°üº¬Îļþxx.asp¡¢xxsave.asp¡¢conn.aspÒÔ¼°student1.mdbºÍ±íxxgl¡¡
xx.aspΪ£º
<html>
<hea ......
ÎÒдÁËÒ»¸öÈí¼þ£¬ÒªÓõ½ACCESSÊý¾Ý¿â£¬ÎÒÔÙ·ÃÎÊACCESSµÄʱºò£¬ÎÒÐèÒª´Ó±íÀï¶Á³öÒ»ÐÐÊý¾Ý£¬ÎҵijÌÐòÊÇÕâÑùдµÄ£¬SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......
ÎÒÔÚÇ°Ì¨Ò³ÃæÊäÈë¿òÊäÈë 20091208 µã»÷Ìá½»Ö®ºó±¨´í,˵ÀàÐͲ»Æ¥Åä.
Êý¾Ý¿âÀï Õâ¸ö×ֶεĸñʽӦ¸ÃÊÇ 2009-12-8 14:27:40
ÊDz»ÊÇÒª°Ñ 20091208 ת»»³É¸ñʽ 2009-12-8 14:27:40
ÇëÎÊÎ ......