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

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

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

µ±Êý¾Ý¿â×Ö¶ÎΪ¡°Memo(Access±¸×¢)¡±µÄʱºò£¬Ê¹ÓÃMSHFlexGrid1.TextMatrixÈ¡µÃµÄÖµ²¢²»ÍêÈ«£¬Ö»ÓÐ999¸ö×Ö·û¡­¡­À§ÈÅÁËÒ»Ì죬Çë¸ßÈËÃÇÀ´²âÊÔ²¢ËµËµ½â¾ö·½°¸¡£ÓÉÓÚÏ൱ԭÒò£¬ÅųýµôÐÞ¸ÄÊý¾Ý¿â×Ö¶ÎÀàÐ͵ķ½°¸¡£

Ô´ÂëÈçÏ£º
°üÀ¨¿Ø¼þ   textbox   x   1,MSHFlexGrid   x   1,Label   x   1
Êý¾Ý¿âΪAccess,±íProductÄÚµÄSmallClassName×Ö¶ÎΪMemoÀàÐÍ£¬¼Ç¼Êý¾Ý³¬¹ý2000×Ö·û

Dim   con   As   New   ADODB.Connection
Dim   Gs   As   New   ADODB.Recordset

Private   Sub   Form_Load()
con.ConnectionString   =   "Provider=Microsoft.Jet.OLEDB.4.0;Data   Source= "   &   App.Path   &   "/DB.mdb;Persist   Security   Info=False "
con.Open
Gs.CursorLocation   =   adUseClient
Gs.Open   "select   *   from   product   where   smallClassName   like   '% ' ",   con,   1,   1
Set   MSHFlexGrid1.DataSource   =   Gs
Gs.Close
Text1.Text   =   MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row,   1)
Label1.Caption   =   Len(MSHFlexGrid1.TextMatrix(M


Ïà¹ØÎÊ´ð£º

asp¸úAccessÊý¾ÝÁ¬½ÓÎÊÌâ¡£

IsSqlDataBase = 0 'Ö÷Êý¾Ý¿âÀàÐÍ(1=SQL£¬0=AC)

'===========================================================================
SqlDatabaseName = "ads365" 'Ö÷Êý¾Ý¿âÃû
S ......

ACCESSÊý¾Ý¿âÓëVB¿ª·¢µÄÈí¼þ½øÐл¥Á¬ÍøÁ¬½Ó

±¾À´ÎÒÊÇÓÃACCESS+VB½¨Á¢Ò»¸öÈí¼þ£¨¾ÖÓòÍø£©£¬ÏÖÔÚÓÉÓڰ칫µØµãÓб䶯£¬Ïà»»³ÉINTERNATµÄ£¬ÓÐûÓа취½â¾ö£¬

ÏóÕâÑùµÄÇé¿ö£¬Èç¹ûÊǹãÓòÍø£¬×îºÃ¸Ä³É£ºB\SµÄ
Èç¹ûÊǾÖÓòÍøµÄ£¬×îºÃ¸Ä³É£ºC\SµÄ
http://downlo ......

ADOXΪaccessÌí¼ÓÓû§(VC)

ÈçºÎÔÚvcÖÐʹÓÃADOXΪaccessÊý¾Ý¿âÌí¼ÓÒ»¸öÓû§?
лл!
ßí?ÔõôûÈËÀ´¿´¿´Ñ½?
ÎÒŪ ÁË ºÃ¾ÃÁË,¶¼Ã»Ò»µãÍ·Ð÷!
ÄÇλ´ó´óÀ´¾È¾È¼±Ñ½!

ллÁË!

Ìí¼ÓÒ»¸öÓû§ÊÇʲôÒâ˼£¿£¿Ìí¼ÓÒ»ÕÅ±í£¿£¿»¹ÊÇ´´½¨Ò» ......

ÇóÒ»¸öACCESS²éѯͳ¼ÆÓï¾ä

ÎÒÓÐ2¸ö±í¸ñ£¬±í¸ñ1×Ö¶ÎÈçÏÂ
id  name email

±í¸ñ2×Ö¶ÎÈçÏÂ
id ip email

ÆäÖУ¬2¸ö±í¸ñµÄemailÊÇÏàͬµÄ

ÎÒÏÖÔÚÏëͨ¹ý2¸ö±í¸ñµÃµ½ÈçϵÄÏÖʵЧ¹û

count(id)  name
......

accessÖÆ×÷ÏÂÀ­²Ëµ¥

access¿ÉÒÔÖÆ×÷ÄÇÖÖÏÂÀ­²Ëµ¥Â𣿾ÍÏñFile£¬È»ºóÏÂÃæÓÐOpen£¬Save,Save asµÈÑ¡Ïî¡£µ«ÊÇ£¬Ó¦¸Ã½«Êó±ê·ÅÉÏÈ¥¾ÍÖ±½Ó¿ÉÒÔ´ò¿ª°É£¬²»ÊÇcombo box¡£Õâ¸öÓÃʲôÀ´×ö£¿
×Ô¶¨Ò幤¾ßÀ¸

´°ÌåÉè¼ÆÄ£Ê½
²Ëµ¥--ÊÓͼ--¹¤¾ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ