我有很多 SQL 脚本，其中很多都使用了各种不同的变量，我希望能够将结果直接放入 Excel。希望尽可能“顺利”地做到这一点，以便当有人给我一个新的 SQL 脚本（可能相对复杂）时，设置收集其结果的电子表格相对干净。
目前正在尝试使用 ADODB 命令对象参数使其工作，但我什至无法获得一个非常基本的示例来工作。我有以下 VBA：
Dim oConnection As ADODB.Connection
Set oConnection = New ADODB.Connection
oConnection.ConnectionString = "MyConnectionString"
oConnection.Open
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
cmd.ActiveConnection = oConnection
到这里只是建立连接，这似乎工作正常。
cmd.CommandText = "DECLARE @DateID integer;" & _
"SELECT TOP 10 * FROM dbo.SomeRecords " & _
"WHERE DateID = @DateID"
cmd.CommandType = adCmdText
Dim DateID As ADODB.Parameter
Set DateID = cmd.CreateParameter("@DateID", adInteger, adParamInput)
cmd.Parameters.Append DateID
DateID.Value = 20120831
Dim rst AS ADODB.RecordSet
Set rst …