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

Access Êý¾Ý±íÊý¾Ý¸³Öµ¸ø¶þάÊý×鸳ÎÊÌâ

ÓÐÈçϹ¤×÷±í

¸ÚλÃû³Æ,Éú²úÏß
  AD      JBC
  AD      JBC
  AR      BLD
  AP      BLD

Ï뽫¸Ã±íµÄËùÓÐÊý¾Ý¸³Öµ¸øÒ»¸ö¶þάÊý×é Ч¹ûÈçÏÂÇóÓï¾ä
SA (500,2)

SA(1,1)=AD

SA(1,2)=JBC

SA(2,1)=AD

SA(2,2)=JBC



ÎÒÒÔ³¢ÊÔ¹ýһϷ½·¨
Set cn = CurrentProject.Connection

Set Rs = cn.Execute("Select * from Table_Name", 50, adCmdText)

For i = 0 To Rs.RecordCount
   
    S(i, 1) = Rs(i)
   
Next i

ÎÒÓÃÒÔÉÏÓï¾äÏ뽫һÕÅÊý¾Ý±íµÄÊý¾ÝÕûÌ帳ֵ¸øÒ»¸ö¶þάÊý×鵫ÊÇRs.RecordCountµÄÖµ×ÜΪ -1
ÎÞ·¨¼ÌÐøÔËÐÐ
S(i,1)=Rs(10)Ö±½Ó¸³ÖµÒ²ÎÞ·¨¶Á³öÊý¾Ý±íÖеÄÊý¾Ý


Ò²³¢ÊÔ¹ýÈçÏ·½·¨~
  Dim  rstEmployees,  strMessage 
  Dim  intRows,  avarRecords 
  Dim  intRecord,  intField 
  Dim  intRecCount,  intFieldCount 
   
Set rstEmployees = CreateObject("ADOCE.Recordset.3.1") Access2000Õâ¾äÀඨÒå×ÜÊDz»³É¹¦
  rstEmployees.Open  "myTable" 
   
  strMessage  =  "Enter  number  of  rows  t


Ïà¹ØÎÊ´ð£º

Vb.net Access CrystalReport - .NET¼¼Êõ / VB.NET

µÚÒ»´Î½Ó´¥CrystalReport
¼±Ñ°ÕÒVb.net Access ͨ¹ý²éѯ³öµÄÊý¾ÝÊä³öµ½CrystalReportµÄÀý×Ó.
ÓеÄÅóÓÑÂé·³·¢À´Ñ§Ï°.¶àл!
¸úÄãµÄÒªÇó²î²»¶à£¬²Î¿¼Ò»Ï£º
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......

VCÁ¬½ÓACCESSÊý¾Ý¿âÎÊÌâ - VC/MFC / Êý¾Ý¿â

ÎÊÌ⣱
ÎÒÓÃADOÁ¬½ÓÉèÁËÓû§ÃûÃÜÂëµÄÊý¾Ý¿â
µ«ÊÇÎÒ·¢ÏÖÎÒ²»ÊäÈë Óû§ÃûºÍÃÜÂë ¶¼¿ÉÒÔÁ¬½Ó³É¹¦ ¶øÇÒ»¹ÄܰÑÊý¾Ý¶Á³öÀ´
¼ôÁËÒ»¸öÃûΪtestÊý¾Ý¿â ½¨ÁËÒ»¸öÃûΪpeopleµÄ±í 
¼ûÁËÒ»¸ö Óû§Ãû1234 ÃÜÂë1234 µÄ ......

ÔõÑù×°ACCESS - VC/MFC / Êý¾Ý¿â

ÎÒ»ú×ÓÀïÃæÃ»ÓÐACCESS,ÇëÎÊÔÚ²»ÖØ×°ÏµÍ³µÄÇé¿öϸÃÈçºÎ°ÑËü×°ÉÏ,֮ǰÎÒÊÔ×°¹ýÆäËü°æ±¾µÄSP3 OFFICE,µ«»¹ÊÇ×°²»ÉÏ,
ÇëÎÊÓÐʲôºÃ°ì·¨Âð?

°²×°OFFICE £¬Ñ¡Ôñ°²×°ACCESS¾Í¿ÉÒÔѽ ¡£

ÒýÓÃ
°²×°OFFICE £¬Ñ¡Ôñ°²×° ......

VC ADO ACCESS sql ²éѯ - VC/MFC / Êý¾Ý¿â

´ó¼Ò°ïÏÂæÁË
Çë½ÌÒ»¸öSQL²éѯµÄÎÊÌâ
±ÈÈçÎÒÏÖÔÚ²éѯ
SELECT * from XS WHERE רҵÃû='¼ÆËã»ú'
²éѯÍê³ÉÖ®ºóÎҿɲ»¿ÉÒÔÔÚÉϴβéѯµÄ»ù´¡Ö®ÉÏÔÚ½øÐÐÏà¹Ø²éÑ¯ÄØ£¿
±ÈÈçÎÒÔÚ²éÍê¼ÆËã»úרҵµÄËùÓÐѧÉúÖ®ºó£¬Ïë²é³ö¼ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ