Frustrating LO problem - Mailing list pgsql-admin

From Sean Murphy
Subject Frustrating LO problem
Date
Msg-id 4595B018.3090600@equipoint.com
Whole thread Raw
Responses Re: Frustrating LO problem
List pgsql-admin
I have two databases, one from a pre-merger company, and one from a
post-merger company (the company otherwise being the same). The
post-merger database was created as an empty replica of the old. I have
a VB application (no, VB was not *my* choice) that's used by employees
to (sometimes simultaneously) access the old and new dbs, on the same
server, with the same encoding and configuration and ODBC drivers. At
login the user chooses which db to connect to, and the application
proceeds to establish an ODBC connection using ADO to the appropriate
db. All of it is working fine, except a form that uploads templates as
los - same app, same code, different db works on old crashes on new.

Running PostgreSQL 8.2 on Win2K server, connecting via psql ODBC Unicode
8.2.2.0, psqlodbc35w.dll

using a text file containing "testfile.contents" as the lo:

The logfile lines when it works:
{
LOG:  statement: BEGIN
LOG:  fastpath function call: "lo_creat" (OID 957)
LOG:  fastpath function call: "lo_open" (OID 952)
LOG:  fastpath function call: "lo_lseek" (OID 956)
LOG:  fastpath function call: "lowrite" (OID 955)
LOG:  fastpath function call: "lo_close" (OID 953)
LOG:  statement: COMMIT
LOG:  statement: insert into doc.templates (description, last_update,
template) values ('testing', '12/29/2006', '51661751'::lo)
}

The logfile lines when it doesn't:
{
WARNING:  nonstandard use of \\ in a string literal at character 94
HINT:  Use the escape string syntax for backslashes, e.g., E'\\'.
LOG:  statement: insert into doc.templates (description, last_update,
template) values ('test', '12/29/2006', 'testfile\\056contents')
ERROR:  invalid input syntax for type oid: "testfile\056contents"
STATEMENT:  insert into doc.templates (description, last_update,
template) values ('test', '12/29/2006', 'testfile\\056contents')
}

Clearly the 5 lo_ functions are being invoked in the old db, but not in
the new, although I'm certainly not manually coding anything to invoke
them. Did I miss a configuration step when I set up the newer db? Which one?

The lo type was created using lo.sql from the contrib directory on both dbs.

the table definition:
(identical between the two dbs)
{
CREATE TABLE doc.templates
(
  templid serial NOT NULL,
  last_update date,
  description character varying(100),
  "template" lo,
  CONSTRAINT templates_pkey PRIMARY KEY (templid)
)
WITH OIDS;

CREATE TRIGGER template_lo
  BEFORE UPDATE OR DELETE
  ON doc.templates
  FOR EACH ROW
  EXECUTE PROCEDURE lo_manage('template');
}

the vb connection code for the new db where it doesn't work
(both dbs connect via Windoze Registry ODBC DSN definitions that are
identical except for the user and catalog)
{
Dim dc As New CRijndael
output = dc.DecryptData(pcode, pw)

Dim connparam As String
connparam = "Provider=MSDASQL.1;Persist Security Info=False;Data
Source=[newdbODBCname];Initial Catalog=[newdbcatalog];Password=" &
CStr(output)
On Error GoTo noConn
    Core_functions.conn.Open connparam
On Error GoTo 0
goodLogin = True
GoTo theEnd

noConn:
If InStr(Err.description, "password authentication failed for user") Then
    MsgBox "The database is currently unavailable. Please double-check
your network connection and try again. Please contact corporate IT if
the problem persists."
End If
}

for the old db where it DOES work
{
Dim dc As New CRijndael
output = dc.DecryptData(pcode, pw)

Dim connparam As String
connparam = "Provider=MSDASQL.1;Persist Security Info=False;Data
Source=[olddbODBCname];Initial Catalog=[olddbcatalog];Password=" &
CStr(output)
On Error GoTo noConn
    Core_functions.conn.Open connparam
On Error GoTo 0
goodLogin = True
ADODCstr = "Provider=MSDASQL.1;Persist Security Info=False;Data
Source=celia_corp;Initial Catalog=CELIA;Password="
GoTo theEnd

noConn:
If InStr(Err.description, "password authentication failed for user") Then
    MsgBox "The database is currently unavailable. Please double-check
your network connection and try again. Please contact corporate IT if
the problem persists."
End If
}

the vb code on the upload form calls
{
PutFile "insert into doc.templates (description, last_update, template)
values ('" & description.Text & "', '" & Format(Now(), "mm/dd/yyyy") &
"', ?)", File1.Path & "\" & File1.filename
}

which in turn calls the following sub
{
Public Sub PutFile(queryText As String, theFile As String)
'QueryText should contain the insert query with a question mark where
the file (as data) should go
Dim theQuery As ADODB.command
Dim chunk() As Byte
Dim fileID As Integer
Dim fileLen As Long

'setup the query
Set theQuery = New ADODB.command
theQuery.ActiveConnection = conn
theQuery.CommandText = queryText
theQuery.CommandType = adCmdText

'open the file for reading
fileID = FreeFile
Open theFile For Binary Access Read As fileID
fileLen = LOF(fileID)
If fileLen = 0 Then
    MsgBox "Could not open the specified file"
    GoTo theEnd
End If

'DBFileField parameter
'fourth parameter indicates the memory to allocate to store the object
Set DBFileField = theQuery.CreateParameter("DBFileField",
adLongVarBinary, adParamInput, fileLen + 100)
ReDim chunk(1 To fileLen)
Get fileID, , chunk()

'insert the file into the parameter object
DBFileField.AppendChunk chunk()
theQuery.Parameters.Append DBFileField

'execute
theQuery.Execute

theEnd:

'clean up
Close fileID
Set theQuery = Nothing

End Sub
}

Thanks for anyone who can help (or at least tries to!)

Sean Murphy

pgsql-admin by date:

Previous
From: Guillaume Lelarge
Date:
Subject: Re: table comparison
Next
From: "Andy Shellam (Mailing Lists)"
Date:
Subject: Re: Frustrating LO problem