You might want to try posting your code inside <code> </code> tags. It'll look like this:

$rs->RecordCount. my $rs = Win32::OLE->new('ADODB.Recordset');
$rs->Open("Select * from $SQLTABLE", $conn);
if ($rs->RecordCount > 0) {...}
[download]

It's a little easier to read and thus a little bit more likely to get a good response to your question. Also, <code> tags allow others to easily download your code. You be amazed at how many fellow members of the Monastery will actually try out your code in order to better help you.

You might also want to check out Writeup Formatting Tips.

Cheers!

Brent