Uselsx "*lsxlc" Error creating product object

HCL Domino Domino Forum
1

Okay I have made connections using lsxodbc with no problems, now I am trying to use lsxlc to connect to an oracle external database. I am getting the error “Error creating product object”

Here is my code:

Dim src As New LCConnection (“Oracle8”)

Dim fldLst As New LCFieldList

Dim fld As LCField

Dim keyLst As New LCFieldList

Dim count As Integer

src.server = “LMS_PRODUCTION”

src.Userid = “LMS”

src.Password = “LMS”

src.Metadata = “Applicant”

src.Connect

The error is in the first line Dim src As New LCConnection (“Oracle8”)

I have oracle client loaded on my pc which I am using also a test server to test. I did the ndctest which was sucessfull.

Any help would be appreciated.

I am not using odbc so I am assuming that I do not need a DSN set up correct? This really is harder than the lsxodbc connection

Thanks

2

Subject: Uselsx “*lsxlc” Error creating product object

Did you check these postings? http://www-10.lotus.com/ldd/nd6forum.nsf/Search?SearchView&Query=lcconnection%20and%20"error%20creating"&SearchOrder=0&Start=1&Count=100

3

Subject: Example with odbc…it works!

Option PublicUselsx “*lsxlc”

Dim s As New NotesSession

Dim db As NotesDatabase

Dim v As NotesView

Dim docdel As NotesDocument

Set db = s.CurrentDatabase

'Declare Oracle variables

Dim LCsession As New LCSession 

Dim connect As New LCConnection("oracle8") 

Dim fldLst As New LCFieldList 

Dim fld As LCField 

Dim strServer As String, strUserName As String, strPassword As String 

Dim count As Long 

Dim x As Integer 



Dim empnum As Variant



Set empnum = doc.num(0)



LCsession.ClearStatus 

connect.Server = "servername" 

connect.Userid = "userid" 

connect.Password = "password" 



connect.connect



If( connect.execute(|select EMPLOYEE from LAWSON.EXEMPT_EMP where EMPLOYEE = empnum;|, fldLst) = 0) Then 

	Msgbox "You cannot submit a request for an employee that is not salaried"

	End

Else

	Msgbox "Worked"

	

	

End If 



connect.disconnect