Microsoft KB Archive/141510

= Using SQLOpen with User ID and Password =

Article ID: 141510

Article Last Modified on 10/11/2006

-

APPLIES TO


 * Microsoft Excel 97 Standard Edition
 * Microsoft Excel 95 Standard Edition
 * Microsoft Excel 5.0 Standard Edition

-



This article was previously published under Q141510





SUMMARY
When you use the SQLOpen statement in Microsoft Visual Basic for Applications, you can specify the user name and password.



MORE INFORMATION
Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. To use SQLOpen and specify the user name and password, include the appropriate information in the Connection String argument. The following example gives the syntax for retrieving data from a SQL Server database. To use the SQL functions, you must include a reference to the ODBC add-in.

To include a reference to the ODBC add-in:  With a module sheet active, click References on the Tools menu. Select Xlodbc.xla, and then click OK.

NOTE: If you do not see Xlodbc.xla, click Browse to search for the file. The file is located in the MSQuery folder. In Microsoft Excel versions 5.0 and 7.0, the folder is a subfolder of the Microsoft Excel folder. In Microsoft Excel 97, the folder is a subfolder of the Library folder located under the Office folder. Select the Xlodbc.xla file, and then click OK.

 In the References dialog box, click OK.

Sample Visual Basic Procedure
' Dimension the variable. Dim Chan as Integer

' Establish a connection to the data source specifying the user ID and ' password. chan = SQLOpen("dsn=my datasource;uid=myuid;pwd=password")

' Execute a SQL statement. SQLExecquery chan, "select * from customer"

' Retrieve the query results and place them on the worksheet. SQLRetrieve chan, Range("sheet2!a1")

' Close the connection. SQLClose chan

End Sub

