sub 連線資料庫()
'第一步,引用ado 工具,工具->引用—>microsoft activex data objects 6.1 library
'第二步,建立連線物件
'1 、宣告連線物件的名字(或者給連線物件叫取變數名)
dim con as adodb.connection
'2、建立物件變數並賦值
set con = new adodb.connection
'第三步,建立資料庫的連線
with con
.provider = "microsoft.ace.oledb.12.0;"
.connectionstring = thisworkbook.path & "\學生管理.accdb"
.open
end with
msgbox "成功"
end sub
VBA訪問access資料庫例項
最近,同事要用乙個excel檔案匯出每天郵件的資訊,郵件基本資訊都存在了access資料表中了,要實現這個功能有好幾種方式,例如寫乙個qty檔案,而我直接用了excel自帶的vba功能,寫了乙個巨集,根據輸入的日期直接呼叫,想要哪一天的就導哪一天的!不能白瞎了我這個程式猿的稱號啊,sub daoch...
連線ACCESS資料庫
1 匯入命名空間空間 system.data.oledb 2 建立指向資料庫的連線 建立連線要用到system.data.oledb命名空間中的類 oledbconnection。通過以下語句可以完成對本地資料庫的連線工作 string strconnect provider microsoft.j...
access資料庫連線
string strconnection provider microsoft.jet.oledb.4.0 strconnection data source e accesstest data.mdb 裡用的是?路徑 oledbconnection objconnection new oledbc...