ProductID 2 ProductName Chang CategoryID 1
The SQL
Print the SQL statement before attempting to open the Recordset
Don't print any error message if an error is thrown, just return Null
Dim TestDict as xf_Dictionary
Set TestDict = xf.DbConnect.ReturnSingleRecAsDictionary("SELECT ProductID, ProductName, CategoryID FROM Products WHERE ProductID=2")
Debug.Print TestDict.DictionaryDetailsAsString()
Key Value