Hi everyone,

I have an Oracle data write question. I want to write some information to an Oracle 8.1.7 database, as per the code below.

When I call test() - the information written to the table is corrupt.

Its a VB6 program, running under WinXp. Can anyone suggest a way of resolving this problem - any help would be much appreciated!

Thanks,
Jon.

Code:
-----

Public Sub test()

Dim dynaX As Object
Dim odoSesX As Object
Dim odoDbX As Object

Set odoSesX = CreateObject("OracleInProcServer.XORASession")
Set odoDbX = odoSesCLT.OpenDatabase("DEVX", "DEVXUSRNM" & "/" & "DEVXPWD", 1)

Set dynaX = odoDbX.CreateDynaset("select * from table_x where status_ind = 'x'", 0)

dynaX.MoveFirst

odoSesX.BeginTrans
dynaX.Edit
dynaX("brand_code") = "TEST"
dynaX("id_num") = "123456"

dynaX.Update
odoSesX.CommitTrans

End Sub

__________________
Jon Buckham