Error in MySQL
in [Visual Objects]
|
Prev: TE Edit Control
Next: Fixedtext with AlphaBlendRatio
From: TW on 16 Apr 2010 13:03 On Apr 15, 8:23 pm, Jorge <jorgeaccine...(a)dextrasistemas.com.ar> wrote: > On 15 abr, 14:32, TW <TYRON...(a)LIVE.COM> wrote: > > > > > > > Hi, > > > I am using VO2.7B and MySQL 5.1. I have some problem in using MySQL > > and hope that someone can help me about it. I downloaded the ODBC > > drive of MySQL 5.1 inwww.MySQL.comandthe configuration and > > installation works fine. > > > I wrote coding as follows: > > > LOCAL oConn AS SQLConnection > > LOCAL oSelect AS SQLSelect > > > oConn := SQLConnection{ "MySQL", "root", "password" } > > oSelect := SQLSelect{ "SELECT * FROM SQL_TABLE", oConn } > > > oSelect:GoTop() > > > Igot an error at the GoTop line > > > Error Code:4[numeric overflow] > > Subsystem BASE > > Function => WORD > > Argument:65536 > > > Do not understand what this error means. > > I also tried to use FieldGet to read a field and it also have the same > > error. > > I use debugger to check the Connection and the Select statment and > > it's seems fine. > > oConn return a SQLConnection object and oSelect return SQL_TABLE. > > > I also tried to FabMySQL but it has error when I test run the > > application. > > > I also downloaded mySQL4VO. This one works in FiedGet but do not in > > FieldPut. Is this a trial version for read only ??? > > > Hope someone can help me. Thanks. > > > TW > > Hello > > I recommend you try ODBC 3.51 > and avoid ODBC 5.1 > > Regards > Jorge Accinelli- Hide quoted text - > > - Show quoted text - Hi Jorge, ODBC 3.51 works. Thanks a lot. Also thanks for Steve. TW
From: diskbit on 17 Apr 2010 12:11 1. table must possess variable of Id oConn: (SqlConnection = "MySQL", "root", "hasÅo") oSelect: = SQLSelect ("SELECT * FROM SQL_TABLE", oConn) IF !( oSelect == null_object ) IF !( oSelect:EOF ) iforec:= oSelect:FCount IF ( iforec > 0 ) IF !( oSelect:Id == NIL ) Do While !(oSelect:EOF) ................ ................ ................ ApplicationExec( EXECWHILEEVENT ) EmptyWorkingSet(GetCurrentProcess()) SetProcessWorkingSetSize(GetCurrentProcess(), 0xffffffff, 0xffffffff) oSelect:Skip(1) Enddo oSelect:close() oSelect:FreeStmt(SQL_DROP) Endif Endif Endif oSelect :=null_object
From: diskbit on 17 Apr 2010 12:11
1. table must possess variable of Id oConn: (SqlConnection = "MySQL", "root", "hasÅo") oSelect: = SQLSelect ("SELECT * FROM SQL_TABLE", oConn) IF !( oSelect == null_object ) IF !( oSelect:EOF ) iforec:= oSelect:FCount IF ( iforec > 0 ) IF !( oSelect:Id == NIL ) Do While !(oSelect:EOF) ................ ................ ................ ApplicationExec( EXECWHILEEVENT ) EmptyWorkingSet(GetCurrentProcess()) SetProcessWorkingSetSize(GetCurrentProcess(), 0xffffffff, 0xffffffff) oSelect:Skip(1) Enddo oSelect:close() oSelect:FreeStmt(SQL_DROP) Endif Endif Endif oSelect :=null_object |