Home  Fees/Services  Access Examples  Programming Tutorials  Access Download  Articles  Search  Contact  Privacy  Links

Website to Database Connections
ODBC Database Connection Example

SQL Server ODBC Connection Method Database Connection Methods

 Microsoft Access Tutorials>DB Connection>SQL/Server ODBC Method



Connect to Access DSN

Connect to OLEDB Provider for Jet

Connect to Remote Database

ADO File-DSN Database Connection

DSN-Less Connection String

SQL/Server ODBC Database Connection Method

OLE DB UDL Database Connection

Connection Open Method Defined


Website to Database ADO Connectivity Tools
Microsoft Activex Data Object - ADO

Using the SQL Server ODBC Connection String Method

Here are two common connection methods for SQL/Server, one for standard security and one for Trusted Connections.

Dim conn as ADODB.Connection
Dim rst as ADODB.Recordset
Dim sql as string
'---------------

Regular/standard security:
Conn.Open "Driver={SQL Server};" & _
                   "Server=your_sqlserver_name;" & _
                   "Database=your_database_name;" & _
                   "UID=username;" & _
                   "PWD=password;"

Trusted connection security:
Conn.Open "Driver={SQL Server};" & _
                   "Server=your_sqlserver_name;" & _
                   "Database=your_database_name;" & _
                   "UID=;" & _
                   "PWD=;"

To have the computer ask for username and password:
Conn.Properties("Prompt") = adPromptAlways
Conn.Open "Driver={SQL Server};" & _
                   "Server=your_sqlserver_name;" & _
                   "Database=your_database_name;" & _

Where:
your_sqlserver_name = Name of the SQL Server instance.

your_database_name = The name of your database, such as Customer_Orders.

username = the username you have identified in the database, or the default 'Admin' username.

password = the password you have setup in the database or nothing  "Pwd=;" for no password.

'--------------  here we use the connection

sql = "select sales_rep, dollars from sales_by_rep_chart"

Set rst = Server.CreateObject("ADODB.Recordset")
rst.Open sql, conn, 3, 3
Set Session("mysession") = rst
rst.movefirst
response.write rst!sales_rep

'--------------

Where mysession is any name for the session.

When done with the recordset don't forget to close it:

Conn.close
set conn=nothing
 



Contact Information

Microsoft Access Developers
Microsoft Access 2003 2000 2002(XP) 97 All Windows Versions