³ÌÐòÖдò¿ª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¾Í¿ÉÒÔÁË¡£ {{
Ïà¹ØÎÊ´ð£º
Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔÀ´µÄÊýÖµÁË ´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ ´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£ »Ø¸´ ......
ΪʲôÎÒÓÃform.showºÍform.hide¶à´ÎÁ¬½ÓÁËÁ½¸ö´°¿ÚÖ»ÄÜ»¥»»Á´½ÓÁ½´Î°¡£¿ ´úÂë¿´¿´ ÕÕµÀÀíform.show û´ÎÊýÏÞ¶¨µÄ°É ÎÒÒ²¿ì·èÁË¡£ Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿ ÒýÓà ÎÒÒ²¿ì·èÁË¡£ Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿ Â¥Ö÷Ò² ......
ÎÒÏë°Ñ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 ......
¸÷λ¸ßÊÖ£¬Ð¡µÜ×î½üÅöµ½Ò»¸öÎÊÌ⣺ÔÏÈдµÄ³ÌÐò´ó¸ÅµÄ˼·ÊÇ£ºÊ×ÏÈwebbrowser´ò¿ªÍøÖ·£¬ÍøÖ·ÏÔʾºó£¬µã»÷ÍøÖ·ÉϵÄijһ¸öÁ¬½Ó£¬µ±webbrowser¼ì²âµ½ÍøÖ·ÒѾÁ¬½Óµ½ÏëÒªµÄµØÖ·Ê±ºò¾Í¿ªÊ¼ÏÂÔØÎļþ£¬µ±ÓÃIE6µÄʱºòÏÂÔ ......