Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

AccessÊý¾Ý¿â¡°×Ô¶¯±àºÅ¡±×ֶιéÁã


Ô­ÎÄ£ºhttp://blog.sina.com.cn/s/blog_5fdcf5c90100fher.html
AccessÊý¾Ý¿â“×Ô¶¯±àºÅ”×ֶιéÁã
AccessÊý¾Ý¿â“×Ô¶¯±àºÅ”Êý¾ÝÀàÐÍÊÇÒ»¸ö·Ç³£ÊµÓõÄÀàÐÍ£¬Ëü¿ÉÒԺܷ½±ãµØ°ïÖúÎÒÃÇÍê³É±êʶ²»Í¬¼Ç¼IDµÄ¹¤×÷¡£µ«ÊÇÓÉÓÚJETÒýÇæµÄÌØÐÔ£¨SQL serverʹÓÃT-SQL£©£¬µ±ÎÒÃÇÔÚAccessÊý¾Ý¿âijÕűíÖÐÖ´ÐÐÁËɾ³ýËùÓÐÊý¾ÝµÄ²Ù×÷ºó£¬±»ÓÃÀ´±êʶΨһIDµÄ×ֶν«²»ÔÙ¹éÁ㣨´ÓÍ·¿ªÊ¼¼ÆÊý£©£¬¶øÊÇ»á¼ÌÐøÑÓÐøÉÏ´ÎIDµÝÔö¼ÆÊý£¬ÎÒÃÇ¿ÉÒÔÓÃÈô¸ÉÖÖ·½·¨½â¾öÕâÑùµÄÎÊÌ⣬ÒÔϽáºÏASPÍÆ¼öÁ½ÖÖ·½·¨£¨ÒÔÏ·½·¨¶¼Êǽ¨Á¢ÔÚ¿ÕÊý¾Ý±íµÄ“×Ô¶¯±àºÅ”¹éÁãµÄǰÌáÏ£©£º
µÚÒ»ÖÖ£ºÑ¹ËõÊý¾Ý¿â
ÓùýAccessµÄÅóÓÑÓ¦¸Ã¶¼ÖªµÀÔÚAccessµÄ¹¤¾ßÀ¸ÉÏÎÒÃÇ¿ÉÒÔͨ¹ý£º
µã»÷“¹¤¾ß”=>“Êý¾Ý¿âʵÓù¤¾ß”=>“ѹËõºÍÐÞ¸´Êý¾Ý¿â”À´Íê³É¶ÔÊý¾Ý¿âµÄѹËõºÍÐÞ¸´¹¤×÷£¬µ±ÕâÏ×÷Íê³Éʱ£¬Access¸÷¿ÕÊý¾Ý±íµÄ“×Ô¶¯±àºÅ”×Ö¶ÎÒ²»á×ö¹éÁã²Ù×÷¡£
¶øÎÒÃÇÒ²¿ÉÒÔÓÃASPÀ´Íê³ÉÕâÏ×÷£¬ÒÔÏÂÊÇѹËõÊý¾Ý¿âÖ÷ÒªSUB£º
<%
Sub CompactDB(strDBFileName)
  Set fso = CreateObject("Scripting.FileSystemObject")
  Dim strOldDB
  strOldDB = Server.MapPath(strDBFileName)
  Dim strNewDB
  strNewDB = Server.MapPath("New" & strDBFileName)
  If fso.FileExists(strOldDB) Then
    'ѹËõÊý¾Ý¿â
    Set jro= Server.CreateObject("JRO.JetEngine")
    strPvd = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
    jro.CompactDatabase strPvd & strOldDB , strPvd & strNewDB
    set jro= Nothing
    'ɾ³ý¾ÉµÄÊý¾Ý¿âÎļþ
    fso.DeleteFile strOldDB
    ' ½«Ñ¹ËõºÃµÄÊý¾Ý¿âÎļþ¿½±´»ØÀ´
    fso.MoveFile strNewDB, strOldDB
    Response.Write "Êý¾Ý¿âѹËõÍê±Ï!"
  Else
    Response.Write "ÕÒ²»µ½Ö¸¶¨µÄÊý¾Ý¿âÎļþ!"
  End If
  Set fso = Nothing
End Sub
%>
ÎÒÃÇ¿ÉÒÔºÜÇáËɵØÊ¹ÓÃ<%Call CompactDB("yourdb.mdb")%>Íê³Éµ÷Óá£


Ïà¹ØÎĵµ£º

ÓÃTSQL°ÑAccessµÄ±íµ¼Èëµ½Ô¶³ÌSql Server

ÓÃTSQL°ÑAccessµÄ±íµ¼Èëµ½Ô¶³ÌSql Server£º
°Ñaccess µÄ.mdbÀït_itemList ±íµÄÊý¾Ý²åÈëµ½Ô¶³ÌSqlServerµÄt_itemL1111111±íÀï¡£
SELECT  top 10 *  INTO  t_itemL1111111 IN [ODBC] 
[ODBC;Driver=SQL Server; UID=jyb;PWD=jyb;Server=10.1.18.49;DataBase=ËùÓкϲ¢;]
    &nb ......

¡¾×ª¡¿ACCESSÖÐÈçºÎÔÚSQLÓï¾äµÄWHEREÌõ¼þÖмÓÈÕÆÚÌõ¼þ

ת×Ô
http://topic.csdn.net/t/20050110/09/3711952.html
accessÖÐʱ¼äÒªÓÃ#,²»ÊÇË«ÒýºÅ  
  select   *   from   kc   where   rq   <   #2000-01-01#   and   rq>#2002-01-01#  
  ²»ÒªÓÃbetween,ËüµÄЧÂÊÌ©µÍ  
ʹÓÃ# ¶ø²»ÊÇ ......

ACCESSºÍMSSQL ÈçºÎËæ»ú¶ÁÈ¡Êý¾Ý¿â¼Ç¼

²éѯÓï¾äÖ»ÒªÕâÑùд,¾Í¿ÉÒÔËæ»úÈ¡³ö¼Ç¼ÁË
SQL="Select top 6 * from Dv_bbs1 where isbest = 1 and layer = 1 order by newID() desc"
ÔÚACCESSÀï
SELECT top 15 id from tablename order by rnd(id)
SQL Server£º
Select TOP N * from TABLE Order By NewID()
Access£º
Select TOP N * from TABLE Order By Rnd(ID ......

VB´´½¨ACCESSÊý¾Ý¿âÈ«½â

VB´´½¨ACCESSÊý¾Ý¿âÈ«½â ¶¯Ì¬´´½¨Êý¾Ý¿â¡¢´´½¨±í£¬´´½¨¼Ç¼ ADO¡¢ADOX2009Äê04ÔÂ20ÈÕ ÐÇÆÚÒ» 10:17ÕªÒª£º ±¾ÎIJûÊöÁËÔÚVB³ÌÐòÖÐÀûÓÃADO¶ÔÏó¶¯Ì¬´´½¨Êý¾Ý¿âºÍÊý¾Ý±íµÄ·½·¨£¬ÕâЩ·½·¨ÔÚ¿ª·¢VBÊý¾Ý¿âÓ¦ÓóÌÐòÖкÜÓÐʵÓüÛÖµ£¬Ëü¿ÉÒÔÌá¸ßÊý¾Ý¿â³ÌÐòÁé»îÐÔ¡£
¡¡¡¡¹Ø¼ü´Ê£ºÊý¾Ý¿â¡¢Êý¾Ý±í¡¢ADO¡¢ADOX
¡¡¡¡1: ÎÊÌâµÄÌá³ö
¡¡¡¡Ô ......

asp.netÁ¬½ÓSQL ºÍACCESSÊý¾Ý¿â

ASP.NETÈçºÎÁ¬½ÓAccess»òSQL ServerÊý¾Ý¿â 
Ê×ÏÈ¿´Ò»¸öÀý×Ó´úÂëÆ¬¶Ï:
³ÌÐò´úÂë: 
--------------------------------------------------------------------------------
using System.Data;
using System.Data.OleDb;
......
string strConnection="Provider=Microsoft.Jet.OleDb.4.0;";
strConnection+ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ