Thank you for Visiting my Blog

Friday, 18 August 2017

How SQLClose works in VBA


SQLClose

SQLClose closes a connection to an external data source.This function is contained in the Xlodbc.xla add-in.

Before use of this  function, one must establish a reference to the add-in by using the References command .

Syntax

SQLClose(ConnectionNum)

ConnectionNum   Required. The unique connection ID of the data source you want to disconnect from.

Output -Value

If the connection is successfully closed, this function returns 0 (zero) and the connection ID is no longer valid.
If ConnectionNum is not valid, this function returns Error 2015.
If SQLClose is unable to disconnect from the data source, it returns Error 2042.


This example runs a query on the Northwind database. The result of the query, displayed on Sheet1, is a list of all products that are currently on order.


databaseName = "Northwind"
queryString = _
    "SELECT * FROM product.dbf WHERE (product.ON_ORDER<>0)"
chan = SQLOpen("DSN=" & databaseName)
SQLExecQuery chan, queryString
Set output = Worksheets("Sheet1").Range("A1")
SQLRetrieve chan, output, , , True
SQLClose chan

No comments:

Post a Comment