ʹÓÃaspÁ¬½Óaccess2007×¢ÒâÊÂÏî
ǰ¼¸ÌìÔÚ×Ô¼ºµÄ±Ê¼Ç±¾Éϰ²×°ÁËOFFICE2007¡£½ñÌì×öÁËÒ»¸ö°Ù¶ÈÓÑÇéÁ´½Ó¼ì²éµÄ¹¤¾ß£¬ ÔÚÁ¬½ÓACCESS2007Êý¾Ý¿âµÄʱºò£¬Ê¹ÓõÄÇý¶¯´úÂëΪ£º"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("queryrecord.mdb") ¡£È··¢ÏÖÌáʾ£º
Microsoft JET Database Engine ´íÎó ''80004005''
²»¿Éʶ±ðµÄÊý¾Ý¿â¸ñʽ
µ«ÊÇÒÔǰûװOFFICE2007ǰ½¨Á¢ºÃµÄÊý¾Ý¿â£¨ÒÔǰÓõÄACCESS2003£©£¬Ê¹ÓÃÕâ¸ö´úÂë¿ÉÒÔÕý³£ÔËÐС£ÏëÁËÒ»Ï룬¹À¼ÆÊÇÒòΪACCESS2007µÄÇý¶¯´úÂëÒѾ·¢Éú±ä»¯¡£½øÈëhttp://www.connectionstrings.com/£¨×¢Ò⣺¸ÃÍøÕ¾ÌṩÁËÏÖÓÐËùÓÐÊý¾Ý¿âµÄÁ¬½Ó·½Ê½£¬½¨Òé´ó¼ÒÊղظÃÍøÖ·£©Ò»¿´£¬¹ûÕæACCESS2007µÄÊý¾Ý¿âÁ¬½Ó·½Ê½ÒѾ·¢Éú±ä»¯¡£ÒѾ¸ü¸ÄΪ£º
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myFolder\myAccess2007file.accdb;Persist Security Info=False;
ÓÚÊǸü¸ÄÁËÏ´úÂ룬³ÌÐòÔËÐÐÕý³£¡£
Ëæºó½«´úÂë¸üÐÂÖÁ·þÎñÆ÷http://baiduquery.newbooks.com.cn ,È··¢ÏÖ³ÌÐò»¹ÊDz»ÄÜÔËÐУ¬Ìáʾ“Çý¶¯Ã»Óа²×°”£¬ÓÚÊǰÑÇý¶¯´úÂë¸ü¸ÄΪmicrosoft.jet.oledb.4.0£¬Ìáʾ“²»¿Éʶ±ðµÄÊý¾Ý¿â¸ñʽ”£¬¿´À´ÔÚ±¾»ú½¨Á¢µÄÊý¾Ý¿âΪACCESS2007µÄ»°£¬´«µ½·þÎñÆ÷ÉÏÈÔ¾ÉΪACCESS2007¡£ÓÚÊÇÍøÉÏËÑË÷ÁËÒ»ÏÂACCESS2007µÄÇý¶¯£¬°²×°£¬³ÌÐòÔËÐÐÕý³£¡£
ACCESS2007µÄÇý¶¯ÏÂÔØµØÖ·£ºhttp://www.microsoft.com/downloads/details.aspx?FamilyID=7554f536-8c28-4598-9b72-ef94e038c891&DisplayLang=zh-cn
Ïà¹ØÎĵµ£º
Çë¿´ÈçÏÂÔ´´úÂ룺
<%
'ÏòÊý¾Ý¿âдÈëÊý¾Ý
SUB writeData()
dim recCnt,i
dim fieldName1,fieldName2,fieldName3
dim conn
dim sqlStr,connStr
connStr="Provider=SQLOLEDB.1;Initial Catalog=myDatabase;Data Source=myhon;User Id=sa;PASSWORD="
set conn=Server.CreateObject("ADODB.Connection")
c ......
±¾ÎĵĴ´ÔìÐÔÔÚÓÚcookies_to_array(c) Ö±½Ó¼òµ¥¿ì½Ýת»¯×Ö·û´®ÎªÊý×éµÄ·½·¨
ÁíÍâ ±¾ÎIJÙ×÷µÄÊý×é ²»ÊÇ aspÆÕͨµÄ¶àάÊý×é ¶øÊǾâ³ÝÐ͵Ä
ÕâÖÖÊý×é ¸üÒײÙ×÷ ¸üÒ×ÔĶÁ ÐÐÁÐÇåÎú ºÜÏñÊý¾Ý¿âÖеıí
¿ÉÒÔÀà±ÈΪ datatable
class myarray
'±ØÐëΪ¾â³ÝÊý×éarray(array(1,2,3))
function array_to_cookies(a)
......
·ÅÈëconn.aspÖÐ(¾Ü¾ø¹¥»÷ ÍòÄÜAsp·À×¢Èë´úÂë)
·ÅÈëconn.aspÖÐ(¾Ü¾ø¹¥»÷ ÍòÄÜAsp·À×¢Èë´úÂë)
µÚÒ»ÖÖ£º
squery=lcase(Request.ServerVariables("QUERY_STRING"))
sURL=lcase(Request.ServerVariables("HTTP_HOST"))
SQL_injdata =":|;|>|<|--|sp_|xp_|\|dir|cmd|^|(|)|+|$|'|copy|format|and|exec| ......
<%@ Language=VBScript %>
<SCRIPT id=DebugDirectives runat=server language=javascript>
// Set these to true to enable debugging or tracing
@set @debug=false
@set @trace=false
</SCRIPT>
<HTML>
<HEAD>
<META name=VI60_defaultClientScript content=VBScript>
< ......
н¨Á¢Ò»¸öASPÎļþ °Ñ ÒÔÏ´úÂë¸´ÖÆ½øÈ¥
<%
ip=request.ServerVariables("REMOTE_ADDR") '»ñÈ¡À´·ÃµÄIPµØÖ·
dim conn
set conn=server.CreateObject("ADODB.connection")
conn.open "Dbq="&server.MapPath("yb/dat/data.mdb")&";Driver={Microsoft Access Driver (*.mdb)}" '½¨Á¢Êý¾Ý¿âÁ¬½Ó ÕâÀïÄã¿ ......