Á¬½Ó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+VB½¨Á¢Ò»¸öÈí¼þ£¨¾ÖÓòÍø£©£¬ÏÖÔÚÓÉÓڰ칫µØµãÓб䶯£¬Ïà»»³ÉINTERNATµÄ£¬ÓÐûÓа취½â¾ö£¬
ÏóÕâÑùµÄÇé¿ö£¬Èç¹ûÊǹãÓòÍø£¬×îºÃ¸Ä³É£ºB\SµÄ
Èç¹ûÊǾÖÓòÍøµÄ£¬×îºÃ¸Ä³É£ºC\SµÄ
http://downlo ......
ÎÊÌâÈçÏ£º
ÓòéѯÓï¾ä
select * from tab where fil like 'CK090902'ÄܲéÕÒ³öÒ»Ìõ¼Ç¼²¢ÏÔʾ³öÀ´
¸ÄΪ
select * from tab where fil = 'CK090902'
¾Í²»ÄܲéÕÒµ½£¬Ò²ÏÔʾ²»³öÀ´ ......
ÄÄÀï³ö´íÁË£¬Êä³öÕâÑùµÄ½á¹û£¿£¿
<%@ Page Language="VB" AutoEventWireup="false" aspcompat="true" CodeFile="Default.aspx.vb" Inherits="_Default" %&g ......
ÎÒÐèҪͨ¹ýµ¥¸ö²éѯÌõ¼þ°´ÄêÔÂ,²éѯµ½accessÊý¾Ý¿âÀïµÄÊý¾ÝΪ (ÈÕÆÚÀàÐÍ2008-02-02)
Dim DDTP1 As String
Dim date1 ......
×î½ü×¼±¸Îª¹«Ë¾ÍøÕ¾ÓÃVB×ö¸ö²úƷչʾÉú³É£¬Éú³É²¿·Ö»ù±¾Ã»ÎÊÌ⣬
ÎÊÌâ³öÏÖÔÚ²éѯ²¿·Ö£¬Ê¹ÓÃÁËMSHFelxGrid(DATAGrid²»ÄÜÂú×ã²Ù×÷ÐèÇó)£¬±¾À´ÒÔΪÊÕ¹¤ÁË£¬×òÌìÔٴβâÊÔµÄʱºò·¢ÏÖÁËÒÔÏÂÎÊÌâ
µ±Êý¾Ý¿â×Ö¶ÎÎ ......