runtime error 3265: item cannot be found in this collection

Hello!

I connected to sqlserver 7 db from vb6.I got one record displayed from my db table as rs.fields(0).If i give rs.fields(1) , it gives me the error, item cannot be found in this collection.When i dispalyed the record count as msgbox rs.recordcount it shows -1.what may be the error, pls help.

LydiaPlease provide your sql statement within vb - and which cursorlocation are you setting (client or server). It sounds like your sql statement is only returning 1 column. When you use rs.fields(1) accesses the 2nd column returned by your sql query - not the next record in the recordset.|||Hello!

Thank you very much, i fixed the error as soon as i written to you.That is the same thing that you replied.It's coz i am quite new to VB and am learning.

Two more issues - i need ur help

1. But still i am getting the record count as -1 . why is it? but i am getting all my records in the record set.

2. I created a function to fill up the list box as

Function FillList(Listitem as Listbox, FieldName as Field, TableName as Table)

--Code--Goes here

End Function

when i tried to call the function as

FillList(List1, m_email,members)

it is returning error as : ByVal ref argument type mismatch

how should i refer the values with the arguments in the function?

Pls help

Lydia|||Which cursorlocation are you using ?|||Originally posted by rnealejr
Which cursorlocation are you using ?

What do you mean by cursor location? i gave the code like this:

--some code here--
opened the record set as AdopenforwardOnly|||Both the connection and recordset objects contain a property called cursorlocation. If you are not setting it, go into debug and view the properties of the object and examine the cursorlocation property.|||Thank you very much, After setting the cursor location, i got the correct record count.|||Happy to help.|||I have a function to fill up list box with a DB Field values as

Public Function FillList(ListItem As ListBox, FieldName As Field,TableName as Table)
Dim i As Integer
i = 0
DbConnect
strSQL = "select FieldName from TableName"

'without using the connection object
ObjRs.Open strSQL, strConn

' Add Items in the list box
ObjRs.MoveFirst
Do While Not ObjRs.EOF
ListItem.AddItem ObjRs(0), i
ObjRs.MoveNext
i = i + 1
Loop

'Be sure you close and destroy your objects.

ObjRs.Close
ObjConn.Close
Set ObjConn = Nothing
Set ObjRs = Nothing
End Function

' Then i called the function as

call FillList(List1,"M_email","Members")

It gives me error as : Type Mismatch

What is the mistake in the code?|||Please post the code before the FillList. How are the Field and Table referenced ( like through adodb ...) ?|||Yes, I connected to the DB as ADODB.Connection|||How are you able to reference "Table" ? Also, you should be explicit in your declarations (Adodb.Field).

The problem is that you are trying to pass a string to a function expecting an object. Both the field/table should be strings - so you would build your sql statement like:

strSQL = "select " & FieldName & " from " & TableName

Runtime error -2147467259(80004005)

Hi all,
I am facing one problem in Excel Pivot Table. This is
happening while i try to drillthrough the data in excel
which is connected to a Database in Analysis manager. The
code is written in Excel as suggested in MSDN
(http://www.msdn.microsoft.com/library/default.asp?
url=/library/en-us/dnexcl2k2/html/odc_xlextendolap.asp)
Most of the time i am getting the results ... some times
i am getting a runtime error as given below
"Runtime error -2147467259(80004005). The operation
requested failed due to Time out. "
This is happening while trying to open the recordset
(Rs.open).
Thanks in advance for any help regarding this...
Thanks & Regards
Sajith SIt's difficult to tell where the problem is based on just the description.
It may be a legitimate timeout based on the amount of data being returned
within whatever timeout period the client has set or defaulted to. Or it
could be the result of another problem such as:
301334 PRB: Connection Timeout Occurs When Connecting to a Remote OLAP
Server
http://support.microsoft.com/?id=301334
294664 FIX: Timeout Error While Browsing Data from Analysis Manager
http://support.microsoft.com/?id=294664
823357 PRB: Connection to Analysis Services Fails After You Install Analysis
http://support.microsoft.com/?id=823357
Check the event logs on the client and server to see if there any
additional clues there.
Cindy Gross, MCDBA, MCSE
http://cindygross.tripod.com
This posting is provided "AS IS" with no warranties, and confers no rights.