ÇóÖú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", "
Ïà¹ØÎÊ´ð£º
Âé·³¸÷λ°ïæ¿´¿´°¡
´úÂëÈçÏ£º
CoInitialize(NULL);
_ConnectionPtr pConn(__uuidof(Connection));
_RecordsetPtr pRst(__uuidof(Recordset));
pConn->ConnectionString="Provider ......
CREATE TABLE Product(model integer,
maker varchar(20),
CONSTRAINT SAND PRIMARY KEY (model),
CONSTRAINT PANDA FOREIGN KEY (model) REFERENCES PC (model)
ON DELETE CASCADE ......
ÈçºÎÐÞ¸Ämsysobjects±íÖеÄÊý¾ÝÄØ£¿Ð»Ð»
ɶ¶¼Ã»ÓÐ,Òâ˼²»Ã÷È·,ÔÙÏêϸµã°É
²»Òª¸ÄsysobjectsÀïµÄ¶«Î÷¡£
ÓÃÆäËü·½·¨¸Ä£¬±íÃû»òÆäËû¡£
ÒªÔÚACCESS»·¾³ÏÂÅäÖÃȨÏÞ£¬²ÅÄÜ·ÃÎÊϵͳ±í...
лл´ó¼Ò¡£
ÊÇÕâÑù£¬¿´ ......
ÎÒÔÚÇ°Ì¨Ò³ÃæÊäÈë¿òÊäÈë 20091208 µã»÷Ìá½»Ö®ºó±¨´í,˵ÀàÐͲ»Æ¥Åä.
Êý¾Ý¿âÀï Õâ¸ö×ֶεĸñʽӦ¸ÃÊÇ 2009-12-8 14:27:40
ÊDz»ÊÇÒª°Ñ 20091208 ת»»³É¸ñʽ 2009-12-8 14:27:40
ÇëÎÊÎ ......
accessÖеÄtextÐ͵ÄÊý×Ö£¬Ôõô±È½Ï´óС°¡£¿
´ó¼ÒÖªµÀÂð?
ÒòΪÎÒÏë¸ù¾ÝÕâÒ»ÁÐÊý¾ÝµÄ´óС²éѯһЩ¶«Î÷
¾Ù¸öÀý×Ó£º
¾ÍÊÇ£¬ÎÒÓÐÒ»ÁÐÊý¾ÝΪ±àÂ룺
ÊÇtextÐ͵ÄÊý×Ö£ºÈç
1101
1102
1103
µÈ£¬
ÎÒÏÖÔÚҪȡ³ö±àÂë±È ......