Win32 Com + ADO: How to compare the result of a recordset to 'nothing'

[Felix McAllister]

Hi,
When using win32com.client , how do you test for a 'nothing' com object as you can in VB? I have an example here when using ADO to loop over multiple recordsets returned from a query. I get the following error:

Traceback (most recent call last):
File "C:\dev\python\ MySamples\dbtes t.py", line 14, in ?
rs.MoveFirst()
File "C:\Python23\li b\site-packages\win32c om\client\dynam ic.py", line 460, in __getattr__
raise AttributeError, "%s.%s" % (self._username _, attr)
AttributeError: <unknown>.MoveF irst

I'm assuming that after the result of rs.NextRecordSe t is invalid somehow (it shouldn't be, BTW, as a similar loop runs fine in VB).

In Perl, I'd just use : if (defined($rs).. ..

Any help appreciated,

Felix.

The code is as follows:
############### ############3
import win32com.client
conn = win32com.client .Dispatch("ADOD B.Connection")
conn.Connection String = "Driver={SQ L Server};Server= (local);Databas e=Test;Trusted_ Connection=yes; "
conn.Open()
rs = conn.Execute("T estSPXML")[0]
xmlString = ""
while rs != None:
rs.MoveFirst() # FAILS HERE ON THE SECOND ITERATION OF THE LOOP
while not rs.EOF:
xmlString = xmlString + rs.Fields[0].Value
rs.MoveNext()
rs = rs.NextRecordSe t()
print xmlString
conn.Close()

[Bob Gailer]

At 07:53 AM 9/15/2003, Felix McAllister wrote:

[snip]
The code is as follows:
############## #############3
import win32com.client
conn = win32com.client .Dispatch("ADOD B.Connection")
conn.Connectio nString = "Driver={SQ L
Server};Server =(local);Databa se=Test;Trusted _Connection=yes ;"
conn.Open()
rs = conn.Execute("T estSPXML")[0]
xmlString = ""
while rs != None:
rs.MoveFirst() # FAILS HERE ON THE SECOND ITERATION OF THE LOOP
while not rs.EOF:
xmlString = xmlString + rs.Fields[0].Value
rs.MoveNext()
rs = rs.NextRecordSe t()
print xmlString
conn.Close()

I am learning how to use ADODB with SQL Server, so your example is very
timely. I know that I have to change the ConnectionStrin g, as I get this
error when running your example: "'Microsoft OLE DB Provider for ODBC
Drivers', '[Microsoft][ODBC SQL Server Driver][Shared Memory]SQL Server
does not exist or access denied.'"

What do I have to change?

Bob Gailer
bg*****@alum.rp i.edu
303 442 2625
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.506 / Virus Database: 303 - Release Date: 8/1/2003

[Felix McAllister]

Bob,
You need to change the (local) part of the connection string to a SQL Server instance on your machine or network. You might also have to change the Trusted Connection=yes part to use a SQL Server login name and password, if that instance isn't set up for trusted connections.
Felix.

[logistix at cathoderaymission.net]

"Felix McAllister" <fe************ **@hotmail.com> wrote in message news:<tv******* ************@ne ws.indigo.ie>.. .

Hi,
When using win32com.client , how do you test for a 'nothing' com object as you can in VB? I have an example here when using ADO to loop over multiple recordsets returned from a query. I get the following error:

Traceback (most recent call last):
File "C:\dev\python\ MySamples\dbtes t.py", line 14, in ?
rs.MoveFirst()
File "C:\Python23\li b\site-packages\win32c om\client\dynam ic.py", line 460, in __getattr__
raise AttributeError, "%s.%s" % (self._username _, attr)
AttributeError: <unknown>.MoveF irst

I'm assuming that after the result of rs.NextRecordSe t is invalid somehow (it shouldn't be, BTW, as a similar loop runs fine in VB).

In Perl, I'd just use : if (defined($rs).. ..

Any help appreciated,

Felix.

The code is as follows:
############### ############3
import win32com.client
conn = win32com.client .Dispatch("ADOD B.Connection")
conn.Connection String = "Driver={SQ L Server};Server= (local);Databas e=Test;Trusted_ Connection=yes; "
conn.Open()
rs = conn.Execute("T estSPXML")[0]
xmlString = ""
while rs != None:
rs.MoveFirst() # FAILS HERE ON THE SECOND ITERATION OF THE LOOP
while not rs.EOF:
xmlString = xmlString + rs.Fields[0].Value
rs.MoveNext()
rs = rs.NextRecordSe t()
print xmlString
conn.Close()

Recordsets have a .BOF property that is similar to .EOF, but indicates
that your cursor is before the first record. If both .BOF and .EOF
are true, you have a null recordset. So something like:

if not(rst.BOF and rst.EOF):
rst.MoveFirst()

should work.

[Graham Breed]

logistix at cathoderaymissi on.net wrote:

Recordsets have a .BOF property that is similar to .EOF, but indicates
that your cursor is before the first record. If both .BOF and .EOF
are true, you have a null recordset. So something like:

if not(rst.BOF and rst.EOF):
rst.MoveFirst()

should work.

Maybe should, but frequently doesn't. Although the books tell you to do
this, I've never found it to be any use. SQL Server, at any rate,
always sets the cursor to the first record, so rst.EOF is enough to test
for no records. The problem comes when nothing is returned, which is
different to no records being returned. (In Query Analyser, you see
nothing, instead of column names with nothing underneath.) In that
case, I find checking for rst.State==1 does the trick. I think BOF
fails the same way as EOF in this case (if the record set's closed, it's
an error to even ask where the cursor is).

From the error message, I don't think this is the OP's problem, though.
You would see something telling you not to do that on a closed record
set. I suggest poking the object in an interpreter, and looking in
pywintypes, if nobody has any better ideas.
Graham

[Giles Brown]

"Felix McAllister" <fe************ **@hotmail.com> wrote in message news:<tv******* ************@ne ws.indigo.ie>.. .

Hi,
When using win32com.client , how do you test for a 'nothing' com object as you can in VB? I have an example here when using ADO to loop over multiple recordsets returned from a query. I get the following error:

Traceback (most recent call last):
File "C:\dev\python\ MySamples\dbtes t.py", line 14, in ?
rs.MoveFirst()
File "C:\Python23\li b\site-packages\win32c om\client\dynam ic.py", line 460, in __getattr__
raise AttributeError, "%s.%s" % (self._username _, attr)
AttributeError: <unknown>.MoveF irst

I'm assuming that after the result of rs.NextRecordSe t is invalid somehow (it shouldn't be, BTW, as a similar loop runs fine in VB).

In Perl, I'd just use : if (defined($rs).. ..

Any help appreciated,

This is just a guess, but is it anything to do with NextRecordset
returning a tuple (recordset, records affected)?

(Don't think that should end up being wrapped in a
win32com.client .dynamic
wrapper though?)

You could try putting some print statements into
win32com.client .dynamic
to see exactly what you're getting back.

Good luck,
Giles Brown

[Felix McAllister]

Thanks to all who replied to my posting.

There were a number of things wrong with my code.

1. Giles Brown was correct in stating that the NextRecordset method returns a tuple. I should have seen this in the debugger when I printed the value out:
[Dbg]>>> rs.NextRecordse t()
(<COMObject NextRecordset>, -1)

2. There was a typo in the call to NextRecordset - I had "NextRecord Set" [capital S]. I didn't know that case mattered.

The correct loop code is as follows:
while rs != None:
rs.MoveFirst()
while not rs.EOF:
xmlString = xmlString + rs.Fields[0].Value
rs.MoveNext()
rs = rs.NextRecordse t()[0]
Felix.

Hi,
When using win32com.client , how do you test for a 'nothing' com object as you can in VB? I have an example here when using ADO to loop over multiple recordsets returned from a query. I get the following error:

Traceback (most recent call last):
File "C:\dev\python\ MySamples\dbtes t.py", line 14, in ?
rs.MoveFirst()
File "C:\Python23\li b\site-packages\win32c om\client\dynam ic.py", line 460, in __getattr__
raise AttributeError, "%s.%s" % (self._username _, attr)
AttributeError: <unknown>.MoveF irst

I'm assuming that after the result of rs.NextRecordSe t is invalid somehow (it shouldn't be, BTW, as a similar loop runs fine in VB).

In Perl, I'd just use : if (defined($rs).. ..

Any help appreciated,

Felix.

The code is as follows:
############### ############3
import win32com.client
conn = win32com.client .Dispatch("ADOD B.Connection")
conn.Connection String = "Driver={SQ L Server};Server= (local);Databas e=Test;Trusted_ Connection=yes; "
conn.Open()
rs = conn.Execute("T estSPXML")[0]
xmlString = ""
while rs != None:
rs.MoveFirst() # FAILS HERE ON THE SECOND ITERATION OF THE LOOP
while not rs.EOF:
xmlString = xmlString + rs.Fields[0].Value
rs.MoveNext()
rs = rs.NextRecordSe t()
print xmlString
conn.Close()