Home Cart [Log In] About Us Contact Us

Object Reference

Classes
Command Interface
- xf_Command
External
- xf_External_VB6_32bit
- xf_External_VB7_32_64bit
General
System Core
System Library

xf_DbConnectDatabase Access Wrapper

Public Function ReturnKeyAndValColumnAsDictionary (
sqlStr As String,
Optional DebugOn As Boolean = False,
Optional SuppressError As Boolean = False
) As xf_Dictionary

1 Chai 2 Chang 3 Aniseed Syrup 4 Chef Anton 's Cajun Seasoning 5 Chef Anton 's Gumbo Mix

sqlStr as String

The SQL

Optional DebugOn as Boolean = False

Print the SQL statement before attempting to open the Recordset

Optional SuppressError as Boolean = False

Don't print any error message if an error is thrown, just return Null

Call Template:

Dim obj As New xf_Dictionary

Set obj = xf.DbConnect.ReturnKeyAndValColumnAsDictionary(sqlStr)

Set obj = xf.DbConnect.ReturnKeyAndValColumnAsDictionary(sqlStr, DebugOn, SuppressError)

Example 1:

Dim TestDict as xf_Dictionary
Set TestDict = xf.DbConnect.ReturnKeyAndValColumnAsDictionary("SELECT TOP 5 ProductID, ProductName FROM Products")
Debug.Print TestDict.DictionaryDetailsAsString()

Key         Value