Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ÈçºÎ²é¿´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



¿´Ò»ÏÂϵͳ±í°É


Ïà¹ØÎÊ´ð£º

ÈçºÎͨ¹ýADOʹÓþۺϺ¯ÊýÀ´²éѯ(Êý¾Ý¿âΪACCESS)

_RecordsetPtr CMyAdo::SelectRecord(string &where, string &tablename,string &field, int way )
{
    int ret = 0;
  _RecordsetPtr pset;
CString  sql;
& ......

access²»ÄÜÐÞ¸ÄÄÚÈÝ

ÈçÌâÔÚÎÒ´ò¿ªaccessÐ޸ĵÄʱºò±¨´í
ÎÒ×°µÄGhost µÄXP°æ sp3µÄ²¹¶¡
´íÎóÇ©Ãû
AppName: msaccess.exe      AppVer: 11.0.8166.0    AppStamp:46437912
ModName: pintlgnt.ime&n ......

MSHFelxGrid Óë ACCESS MEMOÀàÐÍ×ֶεÄÒÉÎÊ

×î½ü×¼±¸Îª¹«Ë¾ÍøÕ¾ÓÃVB×ö¸ö²úƷչʾÉú³É£¬Éú³É²¿·Ö»ù±¾Ã»ÎÊÌ⣬
ÎÊÌâ³öÏÖÔÚ²éѯ²¿·Ö£¬Ê¹ÓÃÁËMSHFelxGrid(DATAGrid²»ÄÜÂú×ã²Ù×÷ÐèÇó)£¬±¾À´ÒÔΪÊÕ¹¤ÁË£¬×òÌìÔٴβâÊÔµÄʱºò·¢ÏÖÁËÒÔÏÂÎÊÌâ

µ±Êý¾Ý¿â×Ö¶ÎΪ¡ ......

´íÎóÐÅÏ¢Access violation....

ÕâÁ½Ììѧϰ¡¶Delphi¼¼Êõ·½°¸±¦µä¡·Ò»ÊéÖеÚÈýÕ¹ØÓÚÓû§µÇ¼·½°¸µÄÀý×Ó£¬ÀûÓõÄÊÇSQl ServerÊý¾Ý¿âʵÏÖÓû§µÇ¼£¬±àÒëÔËÐж¼Ã»ÎÊÌ⣬¸ÃʵÏֵŦÄÜÒ²¶¼ÊµÏֵĺܺ㬵«ÊÇÆæ¹ÖµÄÊÇ£¬·´¸´ÔËÐÐÒ»¶Îʱ¼äºó£¬ÓÐʱÔڹرÕÕû¸ö ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ