ÈçºÎ²é¿´accessÖÐÒÑÓбí¼ä¹ØϵµÄÃû³Æ
ÈçºÎ²é¿´accessÖÐÒÑÓбí¼ä¹ØϵµÄÃû³Æ£¬
ÎÒÒªÓôúÂëɾ³ýÕâ¸ö¹Øϵ£¬±ØÐëÒªÖªµÀ¹ØϵµÄÃû³Æ¡£
ÎÒÕâÀïÓиö°ïÖú
ÓÃADOX°É
VB code:
'ÒýÓÃMicrosoft ActiveX Data Objects 2.X Library
'ÒýÓÃMicrosoft ADO EXT. 2.8 For DDL and Security
Dim con As New ADODB.Connection
con.Open "provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\123.mdb;Persist Security Info=False"
Dim ado As New adox.Catalog
Set ado.ActiveConnection = con
Dim xx As Long, yy As Long
For xx = 0 To ado.Tables.Count - 1
For yy = 0 To ado.Tables.Item(xx).Keys.Count - 1
Debug.Print ado.Tables.Item(xx).Keys.Item(yy).Name
Next
Next
con.Close
Set con = Nothing
¿´Ò»ÏÂϵͳ±í°É
Ïà¹ØÎÊ´ð£º
×î½ü×¼±¸Îª¹«Ë¾ÍøÕ¾ÓÃVB×ö¸ö²úƷչʾÉú³É£¬Éú³É²¿·Ö»ù±¾Ã»ÎÊÌ⣬
ÎÊÌâ³öÏÖÔÚ²éѯ²¿·Ö£¬Ê¹ÓÃÁËMSHFelxGrid(DATAGrid²»ÄÜÂú×ã²Ù×÷ÐèÇó)£¬±¾À´ÒÔΪÊÕ¹¤ÁË£¬×òÌìÔٴβâÊÔµÄʱºò·¢ÏÖÁËÒÔÏÂÎÊÌâ
µ±Êý¾Ý¿â×Ö¶ÎΪ¡ ......
accessÊý¾Ý¿â£¬Ö±½ÓʹÓà select ×ֶΠfrom ±í ¶ÁÈ¡Êý¾Ý
È»ºóÔÚÒ³ÃæÖÐʹÓÃRepeaterÀ´ÏÔʾ
ÕâÕűíÓÐ2000ÌõÊý¾Ý£¬ËùÒÔÒ³Ãæ´ò¿ªµÄºÜÂý
Çë½Ì¸÷λÅóÓÑ£¬ÓÐûÓа취½â¾ö£¬Ìá¸ßµãËٶȣ¡
Ò»´ÎÈ«²¿¶ÁÍê ......
ÎÒÄ¿Ç°±íµÄÅÅÁÐÊÇÉÏÃæÕâÕÅͼÕâÇé¿ö£º
ÎÒÏ£Íûµ÷Õû³É£º
ÈçºÎ×öÄØ£¿
¸Õ²ÅÊÔÁËÏ£¬µã¡°¿ªÊ¼¡±--¡°ÊÓͼ¡±--¡°Éè¼ÆÊÓͼ¡±²»ÐÐ
PS£ºÎÒÓõÄÊÇaccess 2007£¬ÉÏÃæÕâ¸ö±íÊÇmdb¸ñʽµÄ
Ö÷²Ëµ¥£¬ ÊÓͼ ......
ÕâÁ½Ììѧϰ¡¶Delphi¼¼Êõ·½°¸±¦µä¡·Ò»ÊéÖеÚÈýÕ¹ØÓÚÓû§µÇ¼·½°¸µÄÀý×Ó£¬ÀûÓõÄÊÇSQl ServerÊý¾Ý¿âʵÏÖÓû§µÇ¼£¬±àÒëÔËÐж¼Ã»ÎÊÌ⣬¸ÃʵÏֵŦÄÜÒ²¶¼ÊµÏֵĺܺ㬵«ÊÇÆæ¹ÖµÄÊÇ£¬·´¸´ÔËÐÐÒ»¶Îʱ¼äºó£¬ÓÐʱÔڹرÕÕû¸ö ......
°ì¹«ÊҵĵçÄÔ A £¬ ÔÚÉÏÃæÓиöaccess Êý¾Ý¿â£¬·ÅÔÚÒ»¸ö¹²ÏíÎļþ¼Ð¡£
ÆäËüµÄµçÄÔÉ϶¼ÓÐͬÑùµÄ´øÓÐ vba ºêµÄ word Îĵµ×÷Ϊ¿Í»§¶Ë£¬¿ÉÒÔ¶ÔµçÄÔ A É쵀 access Êý¾Ý¿â½øÐвéѯ¡¢Ð޸ġ£ VBA ʹÓà ADO ¶ÔÏóÁ¬½Ó access ......