REcordset wont work

tatendatiffany

Board Regular
Joined
Mar 27, 2011
Messages
103
someone please help me i have created a recordset which is suppose to run an sql but it is giving me an error "duplicate declaration in current scope".
all i have done is used: adodb.recordset again but what can i change it because i need abother recordset??

Public Sub Queries()
Dim rst As ADODB.Recordset
Dim rst As ADODB.Connection
Dim strSQL1 As String
strSQL1 = "SELECT COUNT (INUNACPT) FROM AIS3AM4.KTPT80T WHERE CDPRODCO=RETAIL_MAP"
.Open strSQL
Sheet1.range("AC2").CopyFromRecordset
.Close
End Sub
 

Excel Facts

How can you turn a range sideways?
Copy the range. Select a blank cell. Right-click, Paste Special, then choose Transpose.
You need to change the name of one of the variables here:

Rich (BB code):
Dim rst As ADODB.Recordset
Dim rst As ADODB.Connection
 
Upvote 0
You are declaring 'rst' as both a recordset object and as a connection object and Excel is confused. Just change one of the 'rst' to something else.

Code:
Dim [B][COLOR=red]rst[/COLOR][/B] As ADODB.Recordset
Dim [COLOR=red][B]rst [/B][/COLOR]As ADODB.Connection
 
Upvote 0
Hi

Try -

Code:
Dim rst As ADODB.Recordset
Dim conn As ADODB.Connection

Also, you need to define where the database is and then Open the database through the connection to retrieve your recordset.

hth
 
Last edited:
Upvote 0
Ohh thank you guys for your help it works but anotherf quick question
so on

.openstrSQL1

it gives me the error "invalid or unqualified reference" i am thinking it is because is is not yet connected to the database or is it a syntax code error.:confused:
 
Upvote 0
"invalid or unqualified reference"

Because you're giving an Open command without saying [qualifying] what it is you wan to open.

If you renamed your connection object as advised by 'ukmikeb' you could use:

conn.open strSQL1
 
Upvote 0
I have changed it and now that part works but now i am getting "object required" on that line.
But i dont understand becuase when i hover over it it shows the sql query its suppose to run??

any ideas
 
Upvote 0
I'm sorry but i am really really confused and i dont seem to understand.
What do you mean put something in from of .open i change it to

cnn.Open strSQL but it is giving me object required.
So do you mean put another query??

(i'm sorry i am beginner and i just cant seem to get a grasp of this)

Thank you
 
Upvote 0
Don't be sorry or get frustrated. We've all been there. You seem to be trying and that's the most important thing.

Please post your full code exactly as you have it now. And PLEASE use code tags.
 
Upvote 0

Forum statistics

Threads
1,224,520
Messages
6,179,266
Members
452,902
Latest member
Knuddeluff

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top