Thread: GetConnection
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
ina ina is offline
external usenet poster
 
Posts: 120
Default GetConnection

Hello guys,

I have this connection how to get several recordset from this
connection

Sub GetconnectionADOBD()

Dim cndb As ADODB.Connection, cndb1 As ADODB.Connection


Set cndb = New ADODB.Connection
Set cndb1 = New ADODB.Connection


cndb.ConnectionString = CONNECTION
cndb.Open

If cndb.State = adStateOpen Then
End If


End Sub

How can I define my Sub. I would to call this function and they ask for
a connection

Sub recordsetMacro1()


Sub RecordSetMacro2 ()
Ina