EXCEL´ÓACCESSÖÐȡֵ
ACCESSÊý¾Ý¿â½çÃæ£º
EXCELµÄ´°Ìå½çÃæ£º
´°ÌåÖеĴúÂ룺
Private Sub ComboBox1_Change()
Dim cn As Object, sql$, arr, i&
Set cn = CreateObject("adodb.connection")
cn.Open "provider=Microsoft.jet.OLEDB.4.0;data source=" & ThisWorkbook.Path & "\ºǫ́.mdb"
Me.ListBox1.Clear
sql = "select ³µ¼ä,²úÆ·,¼Û¸ñ from ²úÆ· where ³µ¼ä='" & Me.ComboBox1.Text & "'"
arr = cn.Execute(sql).getrows
Me.ListBox1.BoundColumn = 2
For i = 0 To UBound(arr, 2)
Me.ListBox1.AddItem arr(1, i) & vbTab & arr(2, i)
Next
cn.Close
Set cn = Nothing
End Sub
Private Sub UserForm_Initialize()
Dim arr
Dim cn As Object, sql$
Set cn = CreateObject("adodb.connection")
cn.Open "provider=Microsoft.jet.OLEDB.4.0;data source=" & ThisWorkbook.Path & "\ºǫ́.mdb"
sql = "select distinct ³µ¼ä from ²úÆ·"
arr = cn.Execute(sql).getrows
Me.ComboBox1.List = WorksheetFunction.Transpose(arr)
Me.ComboBox1.Value = arr(0, 0)
cn.Close
Set cn = Nothing
End Sub
ÔÎļþ¿ÉÒÔÈ¥ÏÂÃæµØÖ·ÏÂÔØ£º
http://u.115.com/file/f7df8e035b
Ïà¹ØÎĵµ£º
import java.sql.*;
public class ConnectAccess {
/**
* ³õѧÕßÇë×¢Ò⣺
* 1:ÏȽ¨Á¢Ò»¸öaccessÎļþa1.mdb,²¢·ÅÔÚD:\ÏÂ;
* 2:ÔÚÊý¾Ý¿âÎļþa1.mdbÖн¨Á¢Ò»¸ö±íTable1£»
* 3£ºÎªTable1Ìí¼ÓÒ»ÁУ¬²¢²åÈëÖÁÉÙÒ»Ìõ¼Ç¼£»
* 4£º±¾ÎÄÊÇÒ»¸öÍêÕûµÄÀֱ࣬½ÓÄÃÈ¥ÔËÐоͿÉÒÔ¡£
*/
public static void main(Stri ......
mysql Ã÷Ã÷ÒѾװºÃÁË£¬µ«ÊÇÎÞ·¨·ÃÎÊ¡£Á´½ÓµÄʱºò ×ÜÊÇ˵
Access Denied.
½â¾ö·½·¨£º
ÓÃmysqld --skip-grant-tableÆô¶¯mysql
È»ºóÔÚmysql¿âÖÐÖ´ÐÐÕâ¸ö
INSERT INTO user VALUES ('localhost', 'root', PASSWORD('some_pass'), 'Y','Y','Y','Y','Y','Y','Y','Y','Y','Y','Y','Y','Y','Y','Y', 'Y', ......
±¾ÎĽéÉÜjavascriptÁ¬½ÓaccessÊý¾Ý¿âµÄ·½·¨¡£Õâ¶Î´úÂëÔÚ±¾µØ¿ÉÒÔÕý³£ÔËÐУ¬ÔÚÏßÔòÐèÒª×ã¹»µÄȨÏÞ¡£ÓÉÓÚ²ÉÓÃAccessÊý¾Ý¿â£¬ËùÒÔ²¢²»Ê¹Óñê×¼µÄSQLÓ﷨ʹÓÃʱ¡£ÐèҪעÒâ¡£
Õ⼸Ìì·ÑÁËͦ´óÁ¦ÆøÔÚÍøÉϲéÕÒjavascriptÁ¬½ÓaccessÊý¾Ý¿âµÄ·½·¨£¬¾¹ýÕûÀí×ܽᣬÖÕÓÚд³öÒ»¶ÎÄܹ»ÓÐЧִÐеĴúÂë¡£
µ«ÊÇÕâ¶Î´úÂëÔÚ±¾µØ¿ÉÒÔÕý³£ÔËÐУ ......
¼ò½é
ÔÚÔçÆÚ°æ±¾µÄ Microsoft® Access£¨Microsoft Access 2000 ÒÔǰ£©ÖУ¬Óйذ²È«ÐÔµÄ֪ʶÓÐʱ±»ÈÏΪÊÇÎÞ·¨ÎªÈκÎÈËËùÕÆÎÕºÍÓ¦Óõġ£ÄúÐèÒª°´Ë³ÐòÖ´ÐкܶಽÖ裬һµ©ÒÅ©ij¸ö²½Öè»òÕߵߵ¹ÁË˳Ðò¾Í»á´øÀ´ÔÖÄÑÐԵĺó¹û¡£Ëæ×Å Microsoft Access for Microsoft Windows® 95 µÄ Security Wizard ³öÏÖ£¬ÒÔ¼° Microsoft ......