我刚入门,啥都不懂,请大家帮忙我的代码是这样的:
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection Dim str As String
Dim myConn As New ADODB.Connection
With cn
.Provider = "MSDASQL"
.ConnectionString = ("Server=(local)\LocalServer;" &
"uid=sa;pwd=;database=master")
.Open
End With
运行后说找不到数据源
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection Dim str As String
Dim myConn As New ADODB.Connection
With cn
.Provider = "MSDASQL"
.ConnectionString = ("Server=(local)\LocalServer;" &
"uid=sa;pwd=;database=master")
.Open
End With
运行后说找不到数据源
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货