Á¬½ÓACCESSÓÐ´í£¿
´úÂ룺Dim ConnStr
connstr="Provider = Microsoft.Jet.OLEDB.4.0;Data Source=c:\a\xueziArticle.mdb;"
Const sCacheName="NB743969143"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnStr
-------------------------------------------------------------------------------------
IE´íÎóÌáʾ£º´íÎóÀàÐÍ£º
ADODB.Connection (0x800A0E78)
¶ÔÏ󹨱Õʱ£¬²»ÔÊÐí²Ù×÷¡£
/a/Include/Function.asp, µÚ 612 ÐÐ
ä¯ÀÀÆ÷ÀàÐÍ£º
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
ÍøÒ³£º
GET /a/index.asp
---------------------------------------------------------------------
²é¿´Include/Function.aspµÄ µÚ 612 ÐÐÊÇÕâ¾ä£ºSet Rs=Conn.Execute(SQL)
ûÈ˰¡£¿
<%
dim db,conn,connstr
db="Êý¾Ý¿â·¾¶"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
%>
½á¹û»¹ÊÇÒ»ÑùµÄ£¬Ôõô¿´ÎÒÓÐûÓÐ×°OLEDBÇý¶¯°¡
×öÅжϰÉ
VBScript code:
dim db,conn,connstr
db="Êý¾Ý¿â·¾¶"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microso
Ïà¹ØÎÊ´ð£º
access ÖÐÖ´ÐÐsql updateÓï¾äʱÓÐʱºò³É¹¦ÓÐʱºò²»³É¹¦£¬µ«ÊÇaccessÖв»³ö´íÎóÐÅÏ¢£¬²»ÖªµÀÊÇʲôÔÒò£¬ÓÐÄÄλ´óÏÀÖªµÀ£¬Çë°ïæ°¡
ÌùSQLÓï¾ä£¬¼ì²é±í¡¢×ֶεÄÓÐЧÐÔÉèÖÃ
sql ÔÚ²éѯ·ÖÎöÆ÷ÀïÃæ Ö´ÐкÜÕý³£
ÊÇ ......
ÎÒдÁËÒ»¸ömfc³ÌÐò£¬ÊÇsdiµÄ¡£ÊÓͼÊÇCformviewµÄÅÉÉúÀà¡£
ÎÒÏëʵÏÖÈÎÒâÁ¬½ÓÊý¾Ý¿âµÄ¹¦ÄÜ¡£ËùÒÔÔÚÊÓͼÉÏÌí¼ÓÁËÒ»¸ö°´Å¥¡£µã»÷°´Å¥£¬´ò¿ª¶Ô»°¿òÑ¡ÔñÊý¾Ý¿â½øÐÐÁ¬½Ó¡£´úÂëÈçÏÂËùʾ:
ÎÒÏÈÔÚstdafx.hÎļþÖмÓÁË ......
Çë½Ì¸ßÊÖ2¸öÎÊÌ⣺
1¡¢¹ØÓÚ²éѯACCESSÒ»¸ö×ֶεÄËùÓмǼÎÊÌ⣻ÔõôÏÂÃæ´úÂëÎÞ·¨´ò¿ªÊý¾Ý¿âѽ£¿
2¡¢ÏÂÃæµÄ´úÂë¿ÉÒÔ·ÃÎÊ¡°¹ú±êÂ롱×Ö¶ÎÖеÄËùÓмǼֵÂð£¿
¼±¼±£¡£¡£¡£¡£¡£¡£¡£¡
vbÓïÑÔ´úÂëÈ ......
ÈçÏÂÓï¾ä
Select [Name] as sUnit, count(*) as sTime from Cl_BreakRecord inner join Cl_Group On GroupID = Cl_Group.ID and DepartmentID = 3 group by [Name] order by sTime desc
ÔÚsqlÀï²âÊÔʱûÓÐ ......
Ò»¶Î´úÂ룬ֱ½ÓÔËÐÐûÓÐÎÊÌ⣬µ«ÊÇÔÚvcÀïÃæ±àÒëÔËÐоͻáÅ׳öÒì³£¡£ÕâÊÇÒ»¸ö¶Ô»°¿ò¹¤³Ì£¬ÏÂÃæÊǹؼü´úÂ룺
"StdAfx.h"ÖУº
#import "C:\program files\common files\system\ado\msado15.dll ......