Code: Select all
Dim conn As New UniConnection("Provider=Oracle;Data Source=XE;User Id=IDM;Password=password")
Dim cmd As New UniCommand("", conn)
conn.Open()
cmd.CommandType = CommandType.Text
cmd.CommandText = "CREATE TABLE Account(RecID int,AccountNo varchar(255),CreatedBy int,OpenDate date,CloseDate date,AccountTypeID int,LastUpdateDT timestamp)"
cmd.ExecuteNonQuery()
cmd.CommandText = "Insert Into Account (RecID, AccountNo, CreatedBy, OpenDate, CloseDate, AccountTypeID, LastUpdateDT) Values(1635205,'0050400923356002',Null,{date '2007-04-02'},Null,5390,{timestamp '2008-10-15 05:48:00.123'})"
cmd.ExecuteNonQuery()
Code: Select all
{timestamp '2008-10-15 05:48:00'}
Code: Select all
Insert Into Account (RecID, AccountNo, CreatedBy, OpenDate, CloseDate, AccountTypeID, LastUpdateDT) Values(1635205,'0050400923356002',Null,TO_DATE('2007-04-02', 'YYYY-MM-DD'),Null,5390,TO_DATE('2008-10-15 05:48:00', 'yyyy-mm-dd hh:mi:ss'))
Code: Select all
Insert Into Account (RecID, AccountNo, CreatedBy, OpenDate, CloseDate, AccountTypeID, LastUpdateDT)Values(1635205,'0050400923356002',Null,TO_DATE('2007-04-02', 'YYYY-MM-DD'),Null,5390,TO_TIMESTAMP('2008-10-15 05:48:00.123', 'yyyy-mm-dd hh:mi:ss.ff'))
P.S. Although I got this far, I would still like a reply to my earlier generic question about UniSQL as it will still shed light on what I need to do. Thanks.