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")%>Íê³Éµ÷Óá£
Ïà¹ØÎĵµ£º
ÔÒò£ºIISûÓÐ×¢²á
½â¾ö°ì·¨£º
·½·¨Ò»£º
ÔÚCMDÖнøÈëĿ¼C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727£¬ÔËÐÐaspnet_regiis
1¡¢aspnet_regiis -ga administrator£¨administratorΪµ±Ç°Óû§£©
2¡¢aspnet_regiis -i £¨×¢²áIIS£©
3¡¢iisreset /noforce £¨ÖØÆôIIS£©
²Ù×÷Ïêϸ£º
C:\Documents and Settings\ ......
Access¡¢SQLServer¡¢Oracle³£¼ûSQLÓï¾äÓ¦ÓÃÇø±ð
¹Ø¾¢ËÉ PMP
Èç¹ûÒª¼æÈÝAccess¡¢SQL Server¡¢OracleÈý¸öÊý¾Ý¿â°æ±¾£»ÎÒÃÇÔÚ±àдSQLÓï¾äµÄ¹ý³ÌÖУ¬¾¡Á¿Ê¹ÓÃһЩͨÓõÄÓï¾ä£¬µ«»¹ÊÇÓÐЩ·½ÃæÓÐÐ©Çø±ð±ÜÃâ²»ÁË£¬ÏÖ¼òµ¥×ܽáһϡ£
ÒÔÏÂA´ú±íAccess,S´ú±íSQL Server,O´ú±íOracle
1¡¢È¡µ±Ç°ÏµÍ³Ê±¼ä
A:Select Now()
S:Selec ......
VB´´½¨ACCESSÊý¾Ý¿âÈ«½â ¶¯Ì¬´´½¨Êý¾Ý¿â¡¢´´½¨±í£¬´´½¨¼Ç¼ ADO¡¢ADOX2009Äê04ÔÂ20ÈÕ ÐÇÆÚÒ» 10:17ÕªÒª£º ±¾ÎIJûÊöÁËÔÚVB³ÌÐòÖÐÀûÓÃADO¶ÔÏó¶¯Ì¬´´½¨Êý¾Ý¿âºÍÊý¾Ý±íµÄ·½·¨£¬ÕâЩ·½·¨ÔÚ¿ª·¢VBÊý¾Ý¿âÓ¦ÓóÌÐòÖкÜÓÐʵÓüÛÖµ£¬Ëü¿ÉÒÔÌá¸ßÊý¾Ý¿â³ÌÐòÁé»îÐÔ¡£
¡¡¡¡¹Ø¼ü´Ê£ºÊý¾Ý¿â¡¢Êý¾Ý±í¡¢ADO¡¢ADOX
¡¡¡¡1: ÎÊÌâµÄÌá³ö
¡¡¡¡Ô ......
void ModifyDBCode()
{
CString strPath;
::GetModuleFileName(GetModuleHandle(NULL),strPath.GetBuffer(256),256);
strPath.ReleaseBuffer();
int flag=strPath.ReverseFind('\\');
int size=strPath.GetLength();
strPath.Delete(flag,size-flag);
strPath= strPath+ ......