excel vba sql语句返回一个string

我正在编写一个访问数据库的SQL语句，将返回一个唯一的值，无论input。 我正在使用这段代码，但是我得到了执行语句的types不匹配。

strSQL = "SELECT FilePath " _ & "FROM ToolFiles " _ & "WHERE Project_Num = '" & theSelectedProj & "'" _ & "AND Tool_Name = '" & theSelectedProjName & "'" filePath = cn.Execute(strSQL) 

有没有办法从一个SQL语句返回一个string？

谢谢

Answer 1

快速答案是否定的。ADO Execute()方法返回一个logging集对象，您需要将其读入stringvariables中。 像这样的东西应该这样做：

 Dim rs As ADODB.Recordset .... Set rs = cn.Execute(strSQL) If Not (rs Is Nothing) Then With rs If Not (.BOF) And Not (.EOF) Then strFilePath = Format$(.Fields(1).Value) End If End With End If