Re: Large Objects...ODBC/VB6/ADO...& PostgreSQL

First, try upgrading to ADO 2.5 There was an error like that for MS SQL
that was fixed in the 2.5 version.

Also, why are you using JET? You should use the OLE DB provider for ODBC.
By using JET, you are adding another level of abstraction that you don't
need.

As for using Shpe, I never have, so I can't help much there, but what I
would recommend then is trying your code without shape and see if you still
get connection problems. That way you can see if it is shape or not that is
causing it.

Adam Lang
Systems Engineer
Rutgers Casualty Insurance Company
----- Original Message -----
From: "Sanjay Arora" <sk(at)pobox(dot)com>
To: "Adam Lang" <aalang(at)rutgersinsurance(dot)com>
Sent: Thursday, November 23, 2000 6:24 PM
Subject: Re: [INTERFACES] Large Objects...ODBC/VB6/ADO...& PostgreSQL

At 07:05 PM 11/21/00 , you wrote:
>What version of ADO are you using?
>
>Adam Lang
>Systems Engineer
>Rutgers Casualty Insurance Company

ADO Ver 2.1, postgreSQL 7.0.3 on RH Linux 6.2, ODBC 6.50, Visual Basic 6,
Win NT SP3 client

Seems I can't reproduce that catastrophic failure error...came quite a few
times.....am working on it....took the update out of transactions and the
catastrophic failure stopped but by then other changes were also there in
the project....can I take a raincheck ? ;-((

Another prob, if you can help me...

' Shape Query Creating Trouble
getting error "parser cannot understand near or after shape"......is this
due to MS extensions in the shape data control & should I chuck it out or is
there a byepass?

strShape = "SHAPE ( SHAPE {SELECT Act_Id FROM `TbAccountMaster` Where Act_Id
IN (" & mCodes & ") And Act_Specification <> 'CASH'} AS Command2 APPEND
({SELECT Transaction_Date AS VOUCHER_DATE,iif(Transaction_Table =
4,iif(Entry_Id <> '" & GetOpeningId & "','JOURNAL ENTRY','YEAR
OPENINGS'),'BY CASH A/C') AS PARTICULARS,iif(DRCR =
'DR',Transaction_Amount,' ')AS DEBIT,iif(DRCR = 'CR',Transaction_Amount,' ')
AS CREDIT,DRCR,Account_Code AS BALANCES ,Entry_Id FROM `TbAccountTransact`
ORDER BY Transaction_Date,Entry_Id,DRCR} AS Command1 RELATE 'Act_Id' TO
'BALANCES') AS Command1) COMPUTE Command2 BY Act_Id"

If conTmp.State = adStateClosed Then
With conTmp
.Provider = "MSDataShape.1"
Select Case Command()
Case "access"
.Open "Data Source=" & sDbPath & ";Data
Provider=Microsoft.Jet.OLEDB.4.0"
Case "postgres"
.Open conAct.ConnectionString
End Select
End With
End If

If rsTmp.State = adStateOpen Then
rsTmp.Requery
Else
With rsTmp
Set .ActiveConnection = conTmp
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Source = strShape

----> .Open (Error happening here)

End With
End If