原标题:Excel 访问Sql 数据库的连接字符串
SQL Server数据库的OLE DB连接方法和sql连接字符串
Excel使用OLE DB或OleDbConnection (.NET)方式 (使用SQL Server的Microsoft OLE DB提供程序)读取数据。
连接字符串会经常比较迷糊,网上有些写的不是很清楚,还是自己一步步建把:
先创建一个数据库,创建一个登陆用户名和密码,比如vip,vip;登陆
连接后如下图:
在VBA中使用字符串如下:
连接字符串= "Provider=SQLOLEDB;Initial Catalog=HTMDB;User ID=vip;Password=VIP;Data Source=KKKKKK"
下面为一个简单的VBA读取数据的例子:
Public Sub DBConnect()
Dim cnn As New ADODB.Connection, sh As Worksheet
Dim rs As New ADODB.Recordset
Dim cnnStr As String, SQL As String
Dim i
'建立与SQL Server数据库服务器的连接
cnnStr = "Provider=SQLOLEDB;Initial Catalog=HTMDB;User ID=vip;Password=vip;Data Source=KKKKKK"
cnn.ConnectionString = cnnStr
cnn.Open
SQL = "SELECT ValueID FROM t_ValueID WHERE (ValueID LIKE '%12%')"
Set rs = cnn.Execute(SQL)
i = 2
While Not rs.EOF
Cells(i, 1) = rs("ValueID")
i = i + 1
rs.MoveNext
Wend
rs.Close
Set rs = Nothing
cnn.Close
Set cnn = Nothing
End Sub
Excel中添加引用。
免责声明:本文系网络转载或改编,版权归原作者所有。如涉及版权,请联系删除!
涉及版权请联系admin@qichengplc.com 谢谢!
责任编辑: