excel連接外部數(shù)據(jù)庫

1、Excel中ADO連接幾種數(shù)據(jù)庫的格式及字符串拼寫方法ADO參考摘要：在OLEDB（建立于低層ODBC之上，是一個(gè)針對(duì)SQL數(shù)據(jù)源和非SQL數(shù)據(jù)源，如郵件和目錄等進(jìn)行操作的應(yīng)用程序接口）的基礎(chǔ)上，Microsoft推出了另一個(gè)數(shù)據(jù)訪問對(duì)象模型：ADO（ActiveXDataObject：ActiveX數(shù)據(jù)對(duì)象）。ADO采用基于DAO和RDO的對(duì)象，并提供比DAO和RDO更簡(jiǎn)單的對(duì)象模型，它包含一些簡(jiǎn)化對(duì)數(shù)據(jù)存儲(chǔ)區(qū)數(shù)據(jù)的訪問任務(wù)的內(nèi)置對(duì)象。同時(shí)ADO具有強(qiáng)大的功能和靈活性，它可以使用相同的編程模式連接到不同的數(shù)據(jù)庫，為我們提供了數(shù)據(jù)庫訪問接口。ADO對(duì)象ADO模型中定義了六個(gè)常用的對(duì)象：Conn

2、ection、Command、Recordset、Error、Field和Parameter對(duì)象，通過這些對(duì)象的屬性和方法，我們可以很方便地建立數(shù)據(jù)庫連接，執(zhí)行SQL查詢以及存取操作。下圖直觀地描述了對(duì)象之間的關(guān)系：Connection對(duì)象代表打開的、與數(shù)據(jù)源的連接。一般使用Connection對(duì)象的集合、方法、和屬性執(zhí)行下列操作：1、在打開連接前使用ConnectionString、ConnectionTimeout和Mode屬性對(duì)連接進(jìn)行配置。2、使用DefaultDatabase屬性設(shè)置連接的默認(rèn)數(shù)據(jù)庫。3、使用Provider屬性指定OLEDB提供者。4、使用Open方法建立到數(shù)據(jù)源的

3、物理連接。使用Close方法將其斷開。5、使用Execute方法執(zhí)行對(duì)連接的命令，并使用CommandTimeout屬性對(duì)執(zhí)行進(jìn)行配置。6、使用BeginTrans、CommitTrans和RollbackTrans方法以及Attributes屬性管理打開的連接上的事務(wù)（如果提供者支持則包括嵌套的事務(wù)）。7、使用Errors集合檢查數(shù)據(jù)源返回的錯(cuò)誤。Command對(duì)象定義了對(duì)數(shù)據(jù)源執(zhí)行的命令，我們可以使用Command對(duì)象的集合、方法、屬性進(jìn)行下列操作：1、使用CommandText屬性定義命令（例如，SQL語句）的可執(zhí)行文本。2、通過Parameter對(duì)象和Parameters集合定義參數(shù)化

4、查詢或存儲(chǔ)過程參數(shù)。3、使用Execute方法執(zhí)行命令并在適當(dāng)?shù)臅r(shí)候返回Recordset對(duì)象。4、執(zhí)行前使用CommandType屬性指定命令類型以優(yōu)化性能。5、使用CommandTimeout屬性設(shè)置等待命令執(zhí)行的秒數(shù)。6、通過設(shè)置ActiveConnection屬性關(guān)聯(lián)打開的連接。7、設(shè)置Name屬性將Command標(biāo)識(shí)為與Connection對(duì)象關(guān)聯(lián)的方法。8、將Command對(duì)象傳送給Recordset的Source屬性以便獲取數(shù)據(jù)。Recordset對(duì)象執(zhí)行命令返回的記錄集。任何時(shí)候，Recordset對(duì)象所指的當(dāng)前記錄均為集合內(nèi)的單個(gè)記錄。通過Recordset對(duì)象可對(duì)幾乎所有數(shù)

5、據(jù)進(jìn)行操作。它由記錄（行）和字段（列）構(gòu)成。ADO連接EXCEL2003表Conn.Openprovider=microsoft.jet.oledb.4.0;extendedproperties=excel8.0;datasource=&文件全路Cnn.Openprovider=microsoft.jet.oledb.4.0;Extendedproperties=excel8.0;hdr=no;datasource=&路徑設(shè)置“HDR=NO應(yīng)該表示所選區(qū)域首行不做為標(biāo)題，如果不設(shè)置該項(xiàng)，系統(tǒng)默認(rèn)將首行非空記錄做為ADO記錄集的標(biāo)題行ADO連接txt文件ActiveSheet.Cells.Cle

6、armyText=學(xué)生成績(jī).txtmyPath=ThisWorkbook.PathCnnStr=Driver=MicrosoftTextDriver（*.txt;*.csv）;&DBQ=&myPathCnn.OpenCnnStrrs.OpenmyText,cnn,adopenkeset,adLockOptimisticADO連接ACCESS2003的數(shù)據(jù)庫strAccess=Provider=Microsoft.Jet.OLEDB.4.0;DataSource=+_ThisWorkbook.Path+data數(shù)據(jù)庫檔案.MDB+_;JetOLEDB:DatabasePassword=&123定

7、義連接字符串?dāng)?shù)據(jù)源密碼（最長(zhǎng)20個(gè)字符）SetADOcn=NewADODB.Connection賦值變量為對(duì)象引用ADOcn.OpenstrAccess打開連接ADO連接FOXPRO6.0的數(shù)據(jù)庫setconn=createobject(adodb.connection)setrs=createobject(adodb.recordset)sql=select*fromaa.dbfconn.opendriver=microsoftvisualfoxprodriver;sourcetype=dbf;excelusive=no;sourcedb=&文件路徑rs.opensql,connmsgbox

8、rs.recordcountrs.closeconn.closeconn=nothingrs=nothing需要安裝foxpro的odbc驅(qū)動(dòng)ADO連接SQLSERVER的數(shù)據(jù)庫Dimcnn1AsADODB.ConnectionDimstrCnnAsString打開連接。strCnn=Provider=sqloledb;&_DataSource=srv;InitialCatalog=pubs;UserId=sa;Password=;cnn1.OpenstrCnnADO連接ACCESS2007的數(shù)據(jù)庫con.OpenProvider=Microsoft.ACE.OLEDB.12.0;DataSo

9、urce=&Access2007數(shù)據(jù)源&_;JetOLEDB:DatabasePassword=&密碼con.OpenProvider=Microsoft.ACE.OLEDB.12.0;DataSource=&Excel2007數(shù)據(jù)源&_;JetOLEDB:DatabasePassword=&密碼ADO連接oracle數(shù)據(jù)庫Subconnect_數(shù)據(jù)庫()DimstrconntAsStringSetconnt=NewADODB.ConnectionDimrsAsObjectSetrs=NewADODB.RecordsetDimsevip,Db,user,pwdAsString設(shè)服務(wù)器地址、所連數(shù)據(jù)，及登錄用戶密碼sevip=*Db=*user=*pwd=*strconnt=DRIVER=MicrosoftODBCforOracl