用在Excel的VBA中用ADO怎样连接带密码的ASSCEE文件?

显示全部楼层 · 2010-9-26 14:19:46

千问 · 2010-9-26 14:19:46

Public mcnn
As New ADODB.ConnectionSet mcnn = Nothingmcnn.ConnectionString = "Provider=MSDASQL.1;Password=mima;Persist Security Info=True;User ID=yonghu;Data Source=MS Access Database"mcnn.CursorLocation = adUseClientmcnn.Open其中MS Access Database为定义访问acess的odbc数据源，yonghu为用户，mima为密码

千问 · 2010-9-26 14:19:46

Set conn = New ADODB.Connectionconn.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;" & _
"Data Source=" & ThisWorkbook.Path & "\" & WN & ";Jet OLEDB:Database P