J
jamesmc
Guest
Does something like the below work... cmd = NEW System.Data.Odbc.OdbcCommand("UPDATE table SET [image] = ? WHERE [document] = ?", connection). cmd
arameters:Add("image", OdbcType:VarBinary). cmdarameters:Add("document", OdbcType:VarChar). cmdarameters["image"]:Value = oReturn. cmdarameters["document"]:Value = "xyz". cmd:ExecuteNonQuery(). I have successfully used the below through a reader... DEFINE VARIABLE cmd AS CLASS System.Data.Odbc.OdbcCommand NO-UNDO. DEFINE VARIABLE conn AS CLASS System.Data.Odbc.OdbcConnection NO-UNDO. DEFINE VARIABLE rdr AS CLASS System.Data.Odbc.OdbcDataReader NO-UNDO. conn = NEW System.Data.Odbc.OdbcConnection("Driver=Sql Server;Server= ;Database= "). conn:OPEN(). cmd = NEW System.Data.Odbc.OdbcCommand(). cmd:commandText = "SELECT * FROM table WHERE Company = ? AND AcctPrefix = ?". cmdarameters:Add("CompId", System.Data.Odbc.OdbcType:Int). cmdarameters:Add("AcctNo", System.Data.Odbc.OdbcType:VarChar). cmdarameters["CompId"]:Value = "1". cmdarameters["AcctNo"]:Value = "12345". cmd:connection = conn. rdr = cmd:ExecuteReader(). DO WHILE (rdr:Read()): MESSAGE rdr[0] rdr[1] rdr[2] rdr[3] rdr[4] VIEW-AS ALERT-BOX INFORMATION BUTTONS OK. END.
Continue reading...
arameters:Add("image", OdbcType:VarBinary). cmdarameters:Add("document", OdbcType:VarChar). cmdarameters["image"]:Value = oReturn. cmdarameters["document"]:Value = "xyz". cmd:ExecuteNonQuery(). I have successfully used the below through a reader... DEFINE VARIABLE cmd AS CLASS System.Data.Odbc.OdbcCommand NO-UNDO. DEFINE VARIABLE conn AS CLASS System.Data.Odbc.OdbcConnection NO-UNDO. DEFINE VARIABLE rdr AS CLASS System.Data.Odbc.OdbcDataReader NO-UNDO. conn = NEW System.Data.Odbc.OdbcConnection("Driver=Sql Server;Server= ;Database= "). conn:OPEN(). cmd = NEW System.Data.Odbc.OdbcCommand(). cmd:commandText = "SELECT * FROM table WHERE Company = ? AND AcctPrefix = ?". cmdarameters:Add("CompId", System.Data.Odbc.OdbcType:Int). cmdarameters:Add("AcctNo", System.Data.Odbc.OdbcType:VarChar). cmdarameters["CompId"]:Value = "1". cmdarameters["AcctNo"]:Value = "12345". cmd:connection = conn. rdr = cmd:ExecuteReader(). DO WHILE (rdr:Read()): MESSAGE rdr[0] rdr[1] rdr[2] rdr[3] rdr[4] VIEW-AS ALERT-BOX INFORMATION BUTTONS OK. END.Continue reading...