如何将多个结果（2个表）从sql-query返回到Excel工作表？

Question

我有SQL查询返回2结构不同的结构表。 我需要以某种方式在VBA/VSTO中编写代码以从该sql查询中获取这2个表。 我该从哪里开始？ 有没有可能？

Answer 1

简短的回答是肯定的，这是可能的。你需要使用代码有点像下面：

Sub ConnectionExample6() 
    Dim cnn As ADODB.Connection 
    Dim rs As ADODB.Recordset 

    Set cnn = New ADODB.Connection 

    ' Open a connection by referencing the ODBC driver. 
    cnn.ConnectionString = "driver={SQL Server};" & _ 
     "server=MySqlServer;uid=MyUserName;pwd=MyPassword;database=pubs" 
    cnn.Open 

    ' Create a Recordset by executing an SQL statement. 
    Set rs = cnn.Execute("Select * From authors") 

    ' Show the first author. 
    MsgBox rs("au_fname") & " " & rs("au_lname") 

    ' Close the connection. 
    rs.Close 

End Sub 

来源是在这里：

https://msdn.microsoft.com/en-us/library/ms807027.aspx

尝试使用这个，然后回来告诉我们，如果你有问题。