Hmmmm ... just guessing here, as I still don't have all the puzzle pieces ... is your connection a shared connection? It should be ....

~~Bonnie




>Sorry,
>
>How's this:
>
>Before:
>
>From inside cmdButton.Click()
>Local nConnVal
>oConnVal = NewObject("SQLConn","ClassLib","AppName")
>nConnVal = oConnVal.nConn
>
>If nConnVal > 0
>oBuildSQLSelectClause = NewObject("BuildSQLSelectClause","ClassLib","AppName",;
>nConnVal)
>Blah
>Blah
>EndIf
>
>Now:
>
>Local nConnVal
>oConnVal = NewObject("SQLConn","ClassLib","AppName")
>nConnVal = oConnVal.nConn
>
>If nConnVal > 0
>oBuildSQLClauses = NewObject("BuildSQLClauses","ClassLib","AppName",;
>nConnVal)
>EndIf
>
>BuildSQLClauses.Init() has:
>oBuildSQLSelectClause = NewObject("BuildSQLSelectClause","ClassLib","AppName",;
>nConnVal) as well as the other NewObject(BuildxClause..) calls that were once in the cmdButton.Click() method.
>
>
>The value is still 1 at the point of failure, but I get the "Invalid..." message
>
>Hope this helps...
>
>Keith