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

Access VBA (²»¶Ï¸üÐÂÖÐ...)

1¡¢ÎÊÌâÃèÊö£ºÓÃVBA°ÑÊý¾Ý´ÓExcelµ¼Èëµ½Access£¨ÏµÍ³°æ±¾ºÅ£ºMicrosoft Windows XP Professional °æ±¾ 2002 Service Pack 3£»Office Access°æ±¾ºÅ£º2002/XP£©¡£
     ´úÂëÃèÊö£ºInsert Into [±íÃû]([×Ö¶Î1],[×Ö¶Î2]) " & _
                             "Select [ÁбêÌâ1],[ÁбêÌâ2]" & _
                                     "from [Excel 9.0;Database=" & Îļþ·¾¶ºÍÎļþÃû³Æ & "].[ExcelÒ³Ãû$]"
     ²¹³ä˵Ã÷£º¿É°Ñ“[ÁбêÌâ1]”¸ÄΪһ¸ö±äÁ¿ È磺’“ & temp & ”‘
                    Èç¹û“[ÁбêÌâ1]”ÊÇÓ¢ÎÄ(Óпոñ)¿ÉÓÓ[]” Èç [is ok]
                    Èç¹û“ExcelÒ³Ãû”ÊÇÓ¢ÎÄ(Óпոñ)¿ÉÓÓ[]” Èç [Excal name]
                    ExcelÁбêÌâ²»ÄÜÓГ.”£¬²»ÄÜÓлسµ
     ´íÎóÌáʾ£ºÔËÐÐʱ´íÎó ‘3171’
                    ÕÒ²»µ½¿É°²×°µÄISAM
     ½â¾ö·½·¨£º"from [Excel 9.0;Database=" & Îļþ·¾¶ºÍÎļþÃû³Æ & "].[ExcelÒ³Ãû$]"Õâ¶Î´úÂ룬Excel°æ±¾ºÅ£¨¶ÔÓ¦Office 2002/XP£©Ö»ÄÜÊÇ8.


Ïà¹ØÎĵµ£º

asp.netÁ´½ÓAccessÊý¾Ý¿â×Ö·û´®ÕýÈ··½·¨

ÔÚweb  configÖР ×÷ÈçÏÂÅäÖãº
<connectionStrings>
    <add name="ydycon" connectionString="Provider=Microsoft.Jet.OLEDB.4.0;
Data Source=|DataDirectory|ydy.mdb" providerName="System.Data.OleDb"/>
 
  </connectionStrings>
ÔÚ.netÎļþÖÐÓ¦ÓÃÁ´½Ó ......

¼Ü¹¹B/SËÄ DALFactory Êý¾Ý·ÃÎʲã Data Access Layer

2008-04-10 09:45 //*******FactoryManage.cs using System;
using System.Reflection;
using System.Configuration;
using CoalTraffic.IDAL; namespace CoalTraffic.DALFactory
{
    /// <summary>
    /// ³éÏ󹤳§Ä£Ê½´´½¨DAL¡£
   ......

AccessÊý¾Ý¿â×Ö¶ÎÀàÐÍ˵Ã÷ÒÔ¼°ÓëSQLÖ®¼äµÄ¶ÔÕÕ¹ØÏµ

Îı¾ nvarchar(n)
±¸×¢ ntext
Êý×Ö(³¤ÕûÐÍ) int
Êý×Ö(ÕûÐÍ) smallint
Êý×Ö(µ¥¾«¶È) real
Êý×Ö(Ë«¾«¶È) float
Êý×Ö(×Ö½Ú) tinyint
»õ±Ò money
ÈÕÆÚ smalldatetime
²¼¶û bit
¸½£º×ª»»³ÉSQLµÄ½Å±¾¡£
ALTER TABLE tb ALTER COLUMN aa Byte Êý×Ö[×Ö½Ú]
ALTER TABLE tb ALTER COLUMN aa Long Êý×Ö[³¤ÕûÐÍ]
ALTER T ......

ACCESS¼ÓÃÜ·½·¨


MicrosoftµÄACCESSÊý¾Ý¿â£¬ÊÇÎÒÃdz£ÓõÄ×ÀÃæÊý¾ÝÖ®Ò»£¬´ó¶àÖÐСÆóÒµµÄÊý¾Ý¿â¹ÜÀíϵͳ¶¼¿ÉÒÔ²ÉÓÃËü£¬µ«Æä°²È«ÐÔÒ»Ö±ÁîÈ˵£ÓÌ£¬ÊÔÏ룬һÌײÆÎñ¹ÜÀíϵͳ£¬Óû§Ö±½Ó´ò¿ªÊý¾Ý¿âÈ¥¸ü¸ÄÊý¾Ý£¬ºó¹û»áÈçºÎ£¿ÓÐЩϵͳ¶ÔACCESSÊý¾Ý¿â¿ÉÄÜÖ»ÊǸü¸ÄÀ©Õ¹Ãû£¬»ò¼Ó¸öÃÜÂ룬ÖÚËùÖÜÖª£¬ÆÆ½âACCESSÃÜÂëµÄ·½·¨ºÍ¹¤¾ßÍøÉ϶àµÄÊÇ£¡ËùÒÔÕâÑùµÄ¼Óà ......

ACCESSÖлñÈ¡ËùÓÐ×é¼þ´úÂë

 Private Sub cmdListProperties_Click()
    ListControlProps Me
End Sub
Public Sub ListControlProps(ByRef frm As Form)
    Dim ctl As Control
    Dim prp As Property
    On Error GoTo props_err
    For Each ctl In ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ