Oracle Objects for OLE 0040 Automation Server [message #101473] |
Wed, 20 October 2004 06:50 |
T. Michael Seaman
Messages: 1 Registered: October 2004
|
Junior Member |
|
|
I am running Release 8.1.7 of 0040 against a 9i Oracle database. The following query gives the min value rather than the max value. This is happening in Excel XP VBA:
Dim oraSession As Object
Dim db As Object
Dim rs As Object
Dim rtn
Dim sql$
'connect...
Set oraSession = CreateObject("oracleinprocserver.XOraSession")
Set db = oraSession.OpenDatabase(sPlant, "Advisor3/" & Evaluate("Advisor3PWD"), 0&)
sql = "select max(dbindex) dbindex from dlorecon"
Set rs = db.CreateDynaset(sql, &H0&)
rtn = rs!dbindex
dbindex is a long.
Thanks,
Michael
|
|
|