You'll need to replace those named constans with their actual values. Look them up in the ObjectBrowser (with a reference to ADO
added temporarily)

Eg:
adOpenKeyset = 1
adLockOptimistic = 3
adCmdTable = 2



rs.Open "table1", cn, 1, 3, 2


--
Tim Williams
Palo Alto, CA


"Brent" wrote in message ...
I am still having to select the library, otherwise the VBA project will not
run and stops at:

rs.Open "table1", cn, adOpenKeyset, adLockOptimistic, adCmdTable


"Jim Thomlinson" wrote:

You want to use Late Binding as demonstrrated by Tim. Early binding binds the
dll at design time where as Late Binding binds the dll at run time. So use...

'late binding - does not require VBA Project reference to ADO library
Dim oRS as Object
set oRS = CreateObject("ADODB.Recordset")
--
HTH...

Jim Thomlinson


"Brent" wrote:

Okay I already have it as the lazy way, but I still have to go to
Tools-References and pick A.D.O. 2.8 library. Is there a way that I don't
have to go to Tools-References and do this for each new workbook?

Brent


"Tim Williams" wrote:


'Early binding
Dim oRS as New ADODB.Recordset '(the lazy way using New)


vs

'late binding - does not require VBA Project reference to ADO library
Dim oRS as Object
set oRS = CreateObject("ADODB.Recordset")

--
Tim Williams
Palo Alto, CA


"Brent" wrote in message ...
Can you "#include" a dll file in an Excel routine using VBA or ADO? I am
trying to make a routine that a user can copy and paste, without any other
efforts. Right now they have to select two references for the routine to
work. I can not find the equivalent of #include for VBA/ADO. Thank you.

Brent