I am running an agent in the domino server that connects to a database in Postgresql through odbc dsn.
I am getting an error "Error Creating product object" at the line Set con = New ODBCConnection
Here is the code :
Option Public
Uselsx "*LSXODBC"
Sub Initialize
Dim con As ODBCConnection
Dim qry As ODBCQuery
Dim result As ODBCResultSet
Dim id As Integer
Dim nam As String,job As String
Am getting Error here
Set con = New ODBCConnection
Set qry = New ODBCQuery
Set result = New ODBCResultSet
Set qry.Connection = con
Set result.Query = qry
status = con.ConnectTo("debug")
qry.SQL = "select * from testtable"
result.Execute
Do
result.NextRow
id = result.GetValue("a", id)
nam = result.GetValue("b", nam)
Loop Until result.IsEndOfData
result.Close(DB_CLOSE)
con.Disconnect
End Sub
I guess it is an error related to Domino.But not sure..... may be related to the ODBC driver also.
Is there any way to solve it. Kallol Nandi,
Systems Analyst,
Indus Software - A Division of R Systems International Ltd.,
Tidel Park, Taramani, Chennai-600113, India.
Phone: +91-44-22540014/6 Extn: 209
Fax: +91-44-22540017
Email: Kallol.Nandi@indussoft.com
Visit us @ http://www.indussoft.com/
"The information in this email is confidential, and intended solely for the addressee. Access to this email by anyone else is unauthorized. If you are the addressee, the contents of this email are intended for your use only and it must not be forwarded to any third party, without first obtaining written authorization from the originator, or Indus Software. It may contain information, which is confidential and legally privileged, and the same shall not be used, or dealt with, by any third party, in any manner whatsoever, without the specific consent of Indus Software.
The opinions expressed are those of the sender, and do not necessarily reflect those of the Indus Software."