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

³ÌÐòÖдò¿ªAccessÎļþÅ×Òì³££¡ - .NET¼¼Êõ / VB.NET

Dim appAccess As Access.Application
  '´ò¿ªD:DB1.MDBÎļþ²¢´´½¨Ò»¸ö´°ÌåÖ®ºó¹Ø±Õ
  Const strConPathToSamples = "D:"
  Dim frm As Form, strDB As String
  '°ÑÎļþ·¾¶¸³¸ø±äÁ¿
  strDB = strConPathToSamples & "\db1.mdb"
  ' ´´½¨Ò»¸öеÄAccess¶ÔÏó
  appAccess = CreateObject("Access.Application")
  ' ´ò¿ªÖ¸¶¨µÄAccessÎļþ
  appAccess.OpenCurrentDatabase(strDB) ---- Ö´Ðе½Õâ¾äÊdzöÏÖÒì³££º
  ¸ÃÎļþ±»±£»¤£¬ ²»ÄܽøÐжÁд²Ù×÷£¡
ÊDz»ÊÇÄãÒѾ­ÓÃoffice ´ò¿ªÁËaccess?

²»¿ÉÄܰ¡£¬ ûÓÐ

ÒýÓÃ
ÊDz»ÊÇÄãÒѾ­ÓÃoffice ´ò¿ªÁËaccess?

Ó¦¸ÃÊÇAccessÊý¾Ý¿â±»´ò¿ªÁË£¬¹Ø±ÕAccess¾Í¿ÉÒÔÁË¡£
{{


Ïà¹ØÎÊ´ð£º

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / »ù´¡Àà

ÎÒÏë°ÑwordÁí´æÎªxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

vb - VB / »ù´¡Àà

xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£

hÊÇxml¸ñʽµÄ×Ö·û´®

ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ