faustf Posted March 1, 2016 Share Posted March 1, 2016 hi guy i have a little problem i have code in this code i connect to db postgres , and i want extract id of 3 name of city insert a routine in for but i dont know why , execute only one this is my code expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <SQLite.au3> #include <SQLite.dll.au3> #include <Array.au3> #include <Date.au3> #include <String.au3> Global Const $sFilePath_ini = (@ScriptDir & "\config\config.ini") Global $odoo_Input8, $odoo_Input7, $odoo_Input6, $odoo_Input9, $odoo_Input10, $test_odoo, $Test_presta, $Presta_Input1, $Presta_Input2, $Presta_Input3, $Presta_Input4, $Presta_Input5 Global $DBP = 0, $Label7, $Label6, $Ctrl_button = 0, $pic4, $Ctrl_button2 = 0, $DBMy = 0, $pic3, $Test_presta, $Label6, $a, $objConn, $objConnMY Global $rsCustomers_MY, $Presta_to_Odoo ; il global sotto e dell udf Global $ps_Country_ID_array[2], $b = 0, $ps_Count, $z = 0, $v = 0, $odoo_Count Global $ps_Country_code_array[1], $c = 0, $d = 0 Global $tabella, $Form1_1 ; ps_address array tabella 24 posizioni Global $Array_ps_Addres[0][24] Global $Array_ps_Customers[0][31] Global $Form2 ; array formato da mix psaddress ps custumer Global $array_res_partner_exchange[1][67] Global $ab = 0 ; array state odoo Global $res_Country_state_array[1] Global $i,$res_country_state testfunc() Func testfunc() local $arrayfuck[3] $arrayfuck[0] = 'firenze' $arrayfuck[1]= 'new york' $arrayfuck[2]= 'texas' For $zz = 0 to UBound ($arrayfuck) -1 Local $prova = _connector_sql_state_post($arrayfuck[$zz]) Next EndFunc Func _connector_sql_state_post($city_state) Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") _Connetti_DB_Postgre() ; aporo connessione a odoo MsgBox(0,'dentro city ',"SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") ;$rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") $rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '"&$city_state&"'") With $rsCustomers While Not .EOF ConsoleWrite(.Fields("id").Value & " - " & .Fields("code").Value & @LF) ConsoleWrite(.Fields("name").Value & " - " & .Fields("country_id").Value & @LF) ;$res_Country_state_array[0] = (.Fields("id").Value) msgbox(0,'test',(.Fields("id").Value)) ;MsgBox (0,'variabile',$res_country_state) $i += 1 .MoveNext WEnd .Close EndWith ;_ArrayDisplay($res_Country_state_array,'dalla funzione deve esse 61') Return $res_country_state _Close_DB_Postgre() ; chiudo connessione database odoo EndFunc ;==>_connector_sql_country_post Func _Connetti_DB_Postgre() $objConn = ObjCreate("ADODB.Connection") $objConn.Open('Dsn=PostgreSQL35W;database=bitnami_openerp;server=127.0.0.1;port=5432;uid=postgres;pwd=xxxx') If @error Then MsgBox(16, "Errore", "Error Opening Connection") Else $DBP = 1 EndIf EndFunc ;==>_Connetti_DB_Postgre Func _Close_DB_Postgre() $objConn.Close EndFunc ;==>_Close_DB_Postgre in practic execute only one time the with $rscustomers , why ??? Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 Show console output from COM Error Handler. Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 (edited) Show console output from COM Error Handler. EDIT: Sorry for this duplicate - connection problems. Edited March 1, 2016 by mLipok Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 not have nothing error , work strange try with autoit debugger and run step by step , arrive With $rsCustomers and run first time , and second time jump , ( and i dont know why jump ) Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 In your script I do not see Func _ErrFunc(... .... ... EndFunc btw. when you declare: Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") in a local scope then COM Event Handler exists only in this scope, this mean you should declare this in each function using COM objects. Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 (edited) with function error , but do the same expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <SQLite.au3> #include <SQLite.dll.au3> #include <Array.au3> #include <Date.au3> #include <String.au3> Global Const $sFilePath_ini = (@ScriptDir & "\config\config.ini") Global $odoo_Input8, $odoo_Input7, $odoo_Input6, $odoo_Input9, $odoo_Input10, $test_odoo, $Test_presta, $Presta_Input1, $Presta_Input2, $Presta_Input3, $Presta_Input4, $Presta_Input5 Global $DBP = 0, $Label7, $Label6, $Ctrl_button = 0, $pic4, $Ctrl_button2 = 0, $DBMy = 0, $pic3, $Test_presta, $Label6, $a, $objConn, $objConnMY Global $rsCustomers_MY, $Presta_to_Odoo ; il global sotto e dell udf Global $ps_Country_ID_array[2], $b = 0, $ps_Count, $z = 0, $v = 0, $odoo_Count Global $ps_Country_code_array[1], $c = 0, $d = 0 Global $tabella, $Form1_1 ; ps_address array tabella 24 posizioni Global $Array_ps_Addres[0][24] Global $Array_ps_Customers[0][31] Global $Form2 ; array formato da mix psaddress ps custumer Global $array_res_partner_exchange[1][67] Global $ab = 0 ; array state odoo Global $res_Country_state_array[1] Global $i,$res_country_state testfunc() Func testfunc() local $arrayfuck[3] $arrayfuck[0] = 'firenze' $arrayfuck[1]= 'new york' $arrayfuck[2]= 'texas' For $zz = 0 to UBound ($arrayfuck) -1 Local $prova = _connector_sql_state_post($arrayfuck[$zz]) Next EndFunc Func _connector_sql_state_post($city_state) Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") _Connetti_DB_Postgre() ; aporo connessione a odoo MsgBox(0,'dentro city ',"SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") ;$rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") $rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '"&$city_state&"'") With $rsCustomers While Not .EOF ConsoleWrite(.Fields("id").Value & " - " & .Fields("code").Value & @LF) ConsoleWrite(.Fields("name").Value & " - " & .Fields("country_id").Value & @LF) ;$res_Country_state_array[0] = (.Fields("id").Value) msgbox(0,'test',(.Fields("id").Value)) ;MsgBox (0,'variabile',$res_country_state) $i += 1 .MoveNext WEnd .Close EndWith ;_ArrayDisplay($res_Country_state_array,'dalla funzione deve esse 61') Return $res_country_state _Close_DB_Postgre() ; chiudo connessione database odoo EndFunc ;==>_connector_sql_country_post Func _Connetti_DB_Postgre() $objConn = ObjCreate("ADODB.Connection") $objConn.Open('Dsn=PostgreSQL35W;database=bitnami_openerp;server=127.0.0.1;port=5432;uid=postgres;pwd=xxxxxx') If @error Then MsgBox(16, "Errore", "Error Opening Connection") Else $DBP = 1 EndIf EndFunc ;==>_Connetti_DB_Postgre Func _Close_DB_Postgre() $objConn.Close EndFunc ;==>_Close_DB_Postgre Func _ErrFunc($oError) $Form2 = GUICreate("Error", 493, 277, 852, 219) $Edit1 = GUICtrlCreateEdit("", 6, 66, 481, 203, BitOR($ES_AUTOVSCROLL, $WS_HSCROLL, $ES_AUTOHSCROLL, $ES_WANTRETURN, $ES_READONLY)) GUICtrlSetData(-1, @ScriptName & " (" & $oError.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _ @CRLF & _ @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($oError.number) & @CRLF & _ @TAB & "err.windescription:" & @TAB & $oError.windescription & @CRLF & _ @TAB & "err.description is: " & @TAB & $oError.description & @CRLF & _ @CRLF & _ @TAB & "err.source is: " & @TAB & @TAB & $oError.source & @CRLF & _ @TAB & "err.helpfile is: " & @TAB & $oError.helpfile & @CRLF & _ @TAB & "err.helpcontext is: " & @TAB & $oError.helpcontext & @CRLF & _ @TAB & "err.lastdllerror is: " & @TAB & $oError.lastdllerror & @CRLF & _ @TAB & "err.scriptline is: " & @TAB & $oError.scriptline & @CRLF & _ @TAB & "err.retcode is: " & @TAB & "0x" & Hex($oError.retcode)) $Pic1 = GUICtrlCreatePic(@ScriptDir & "\config\white.jpg", -2, -2, 493, 64) $Label1 = GUICtrlCreateLabel("Il Programma ha riscontrato un errore grave", 30, 11, 308, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetBkColor(-1, 0xFFFFFF) GUISetState(@SW_SHOW) MsgBox(16, 'Erore', 'ERRORE GRAVE ADOO ODBC CONNECTORS !!!! ' & @CRLF & 'PREMENDO OK CHIUDI ANCHE IL DUMP DELL ERRORE') EndFunc ;==>_ErrFunc not have nothing error , but extract only one and jump the , after one extract , why ? With $rsCustomers Edited March 1, 2016 by faustf Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 (edited) here you have some modification to test: expandcollapse popup#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w- 4 -w 5 -w 6 -w 7 #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <SQLite.au3> #include <SQLite.dll.au3> #include <Array.au3> #include <Date.au3> #include <String.au3> Global Const $sFilePath_ini = (@ScriptDir & "\config\config.ini") Global $odoo_Input8, $odoo_Input7, $odoo_Input6, $odoo_Input9, $odoo_Input10, $test_odoo, $Test_presta, $Presta_Input1, $Presta_Input2, $Presta_Input3, $Presta_Input4, $Presta_Input5 Global $DBP = 0, $Label7, $Label6 Global $Ctrl_button = 0, $pic4, $Ctrl_button2 = 0, $DBMy = 0, $pic3, $a, $objConn, $objConnMY Global $rsCustomers_MY, $Presta_to_Odoo ; il global sotto e dell udf Global $ps_Country_ID_array[2], $b = 0, $ps_Count, $z = 0, $v = 0, $odoo_Count Global $ps_Country_code_array[1], $c = 0, $d = 0 Global $tabella, $Form1_1 ; ps_address array tabella 24 posizioni Global $Array_ps_Addres[0][24] Global $Array_ps_Customers[0][31] Global $Form2 ; array formato da mix psaddress ps custumer Global $array_res_partner_exchange[1][67] Global $ab = 0 ; array state odoo Global $res_Country_state_array[1] Global $i, $res_country_state testfunc() Func testfunc() Local $arrayfuck[3] $arrayfuck[0] = 'firenze' $arrayfuck[1] = 'new york' $arrayfuck[2] = 'texas' Local $prova For $zz = 0 To UBound($arrayfuck) - 1 $prova = _connector_sql_state_post($arrayfuck[$zz]) Next #forceref $prova EndFunc ;==>testfunc Func _connector_sql_state_post($city_state) Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") #forceref $oErrorHandler _Connetti_DB_Postgre() ; aporo connessione a odoo If @error Then MsgBox($MB_ICONERROR, 'Error Opening Connection', '@error = ' & @error & @CRLF & '@extended = ' & @extended) MsgBox(0, 'dentro city ', "SELECT * FROM res_country_state WHERE name LIKE '%" & $city_state & "%'") ;$rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") Local $rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '" & $city_state & "'") With $rsCustomers While Not .EOF ConsoleWrite(.Fields("id").Value & " - " & .Fields("code").Value & @LF) ConsoleWrite(.Fields("name").Value & " - " & .Fields("country_id").Value & @LF) ;$res_Country_state_array[0] = (.Fields("id").Value) MsgBox(0, 'test', (.Fields("id").Value)) ;MsgBox (0,'variabile',$res_country_state) $i += 1 .MoveNext WEnd .Close EndWith ; CleanUp $rsCustomers = Null ; _ArrayDisplay($res_Country_state_array,'dalla funzione deve esse 61') Return $res_country_state _Close_DB_Postgre() ; chiudo connessione database odoo EndFunc ;==>_connector_sql_state_post Func _Connetti_DB_Postgre() Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") #forceref $oErrorHandler Local $objConn = ObjCreate("ADODB.Connection") $objConn.Open('Dsn=PostgreSQL35W;database=bitnami_openerp;server=127.0.0.1;port=5432;uid=postgres;pwd=kronos123') If @error then Return SetError(@error, @extended, '') $DBP = 1 EndFunc ;==>_Connetti_DB_Postgre Func _Close_DB_Postgre() Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") #forceref $oErrorHandler $objConn.Close EndFunc ;==>_Close_DB_Postgre Func _ErrFunc($oError) Local $Form2 = GUICreate("Error", 493, 277, 852, 219) Local $Edit1 = GUICtrlCreateEdit("", 6, 66, 481, 203, BitOR($ES_AUTOVSCROLL, $WS_HSCROLL, $ES_AUTOHSCROLL, $ES_WANTRETURN, $ES_READONLY)) GUICtrlSetData(-1, @ScriptName & " (" & $oError.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _ @CRLF & _ @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($oError.number) & @CRLF & _ @TAB & "err.windescription:" & @TAB & $oError.windescription & @CRLF & _ @TAB & "err.description is: " & @TAB & $oError.description & @CRLF & _ @CRLF & _ @TAB & "err.source is: " & @TAB & @TAB & $oError.source & @CRLF & _ @TAB & "err.helpfile is: " & @TAB & $oError.helpfile & @CRLF & _ @TAB & "err.helpcontext is: " & @TAB & $oError.helpcontext & @CRLF & _ @TAB & "err.lastdllerror is: " & @TAB & $oError.lastdllerror & @CRLF & _ @TAB & "err.scriptline is: " & @TAB & $oError.scriptline & @CRLF & _ @TAB & "err.retcode is: " & @TAB & "0x" & Hex($oError.retcode)) Local $Pic1 = GUICtrlCreatePic(@ScriptDir & "\config\white.jpg", -2, -2, 493, 64) Local $Label1 = GUICtrlCreateLabel("Il Programma ha riscontrato un errore grave", 30, 11, 308, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetBkColor(-1, 0xFFFFFF) GUISetState(@SW_SHOW) MsgBox(16, 'Erore', 'ERRORE GRAVE ADOO ODBC CONNECTORS !!!! ' & @CRLF & 'PREMENDO OK CHIUDI ANCHE IL DUMP DELL ERRORE') #forceref $Form2, $Edit1, $Pic1, $Label1 EndFunc ;==>_ErrFunc EDIT: and I want to say that your script never close connection like this: Return $res_country_state _Close_DB_Postgre() ; chiudo connessione database odoo Edited March 1, 2016 by mLipok Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 i have this error now dacancellare.au3 (61) : ==> COM Error intercepted ! err.number is: 0x000000A9 err.windescription: Variable must be of type 'Object'. err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: 0 err.scriptline is: 61 err.retcode is: 0x00000000 and why never close like this??? the script?? Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 10 minutes ago, faustf said: why never close like this??? the script?? Because first is Return (exit from function). Try Next modyfication: expandcollapse popup#AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w- 4 -w 5 -w 6 -w 7 #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <MsgBoxConstants.au3> #include <IE.au3> #include <SQLite.au3> #include <SQLite.dll.au3> #include <Array.au3> #include <Date.au3> #include <String.au3> #include "ADO.au3" Global Const $sFilePath_ini = (@ScriptDir & "\config\config.ini") Global $odoo_Input8, $odoo_Input7, $odoo_Input6, $odoo_Input9, $odoo_Input10, $test_odoo, $Test_presta, $Presta_Input1, $Presta_Input2, $Presta_Input3, $Presta_Input4, $Presta_Input5 Global $DBP = 0, $Label7, $Label6 Global $Ctrl_button = 0, $pic4, $Ctrl_button2 = 0, $DBMy = 0, $pic3, $a, $objConn, $objConnMY Global $rsCustomers_MY, $Presta_to_Odoo ; il global sotto e dell udf Global $ps_Country_ID_array[2], $b = 0, $ps_Count, $z = 0, $v = 0, $odoo_Count Global $ps_Country_code_array[1], $c = 0, $d = 0 Global $tabella, $Form1_1 ; ps_address array tabella 24 posizioni Global $Array_ps_Addres[0][24] Global $Array_ps_Customers[0][31] Global $Form2 ; array formato da mix psaddress ps custumer Global $array_res_partner_exchange[1][67] Global $ab = 0 ; array state odoo Global $res_Country_state_array[1] Global $i, $res_country_state testfunc() Func testfunc() Local $arrayfuck[3] $arrayfuck[0] = 'firenze' $arrayfuck[1] = 'new york' $arrayfuck[2] = 'texas' Local $prova _Connetti_DB_Postgre() ; aporo connessione a odoo If @error Then MsgBox($MB_ICONERROR, 'Error Opening Connection', '@error = ' & @error & @CRLF & '@extended = ' & @extended) For $zz = 0 To UBound($arrayfuck) - 1 $prova = _connector_sql_state_post($arrayfuck[$zz]) Next _Close_DB_Postgre() ; chiudo connessione database odoo #forceref $prova EndFunc ;==>testfunc Func _connector_sql_state_post($city_state) Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") #forceref $oErrorHandler MsgBox(0, 'dentro city ', "SELECT * FROM res_country_state WHERE name LIKE '%" & $city_state & "%'") ; $rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") Local $rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '" & $city_state & "'") If @error Then MsgBox($MB_ICONERROR, '$rsCustomers', '@error = ' & @error & @CRLF & '@extended = ' & @extended) If Not IsObj() then MsgBox($MB_ICONERROR, '$rsCustomers Type:', VarGetType($rsCustomers)) Else With $rsCustomers While Not .EOF ConsoleWrite(.Fields("id").Value & " - " & .Fields("code").Value & @LF) ConsoleWrite(.Fields("name").Value & " - " & .Fields("country_id").Value & @LF) ;$res_Country_state_array[0] = (.Fields("id").Value) MsgBox(0, 'test', (.Fields("id").Value)) ;MsgBox (0,'variabile',$res_country_state) $i += 1 .MoveNext WEnd .Close EndWith EndIf ; CleanUp $rsCustomers = Null ; _ArrayDisplay($res_Country_state_array,'dalla funzione deve esse 61') Return $res_country_state EndFunc ;==>_connector_sql_state_post Func _Connetti_DB_Postgre() Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") #forceref $oErrorHandler Local $objConn = ObjCreate("ADODB.Connection") $objConn.Open('Dsn=PostgreSQL35W;database=bitnami_openerp;server=127.0.0.1;port=5432;uid=postgres;pwd=kronos123') If @error then Return SetError(@error, @extended, '') $DBP = 1 EndFunc ;==>_Connetti_DB_Postgre Func _Close_DB_Postgre() Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") #forceref $oErrorHandler $objConn.Close $objConn = Null $DBP = 0 EndFunc ;==>_Close_DB_Postgre Func _ErrFunc($oError) Local $Form2 = GUICreate("Error", 493, 277, 852, 219) Local $Edit1 = GUICtrlCreateEdit("", 6, 66, 481, 203, BitOR($ES_AUTOVSCROLL, $WS_HSCROLL, $ES_AUTOHSCROLL, $ES_WANTRETURN, $ES_READONLY)) GUICtrlSetData(-1, @ScriptName & " (" & $oError.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _ @CRLF & _ @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($oError.number) & @CRLF & _ @TAB & "err.windescription:" & @TAB & $oError.windescription & @CRLF & _ @TAB & "err.description is: " & @TAB & $oError.description & @CRLF & _ @CRLF & _ @TAB & "err.source is: " & @TAB & @TAB & $oError.source & @CRLF & _ @TAB & "err.helpfile is: " & @TAB & $oError.helpfile & @CRLF & _ @TAB & "err.helpcontext is: " & @TAB & $oError.helpcontext & @CRLF & _ @TAB & "err.lastdllerror is: " & @TAB & $oError.lastdllerror & @CRLF & _ @TAB & "err.scriptline is: " & @TAB & $oError.scriptline & @CRLF & _ @TAB & "err.retcode is: " & @TAB & "0x" & Hex($oError.retcode)) Local $Pic1 = GUICtrlCreatePic(@ScriptDir & "\config\white.jpg", -2, -2, 493, 64) Local $Label1 = GUICtrlCreateLabel("Il Programma ha riscontrato un errore grave", 30, 11, 308, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetBkColor(-1, 0xFFFFFF) GUISetState(@SW_SHOW) MsgBox(16, 'Erore', 'ERRORE GRAVE ADOO ODBC CONNECTORS !!!! ' & @CRLF & 'PREMENDO OK CHIUDI ANCHE IL DUMP DELL ERRORE') #forceref $Form2, $Edit1, $Pic1, $Label1 EndFunc ;==>_ErrFunc QUESTION: Why you not use ADO.au3 Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 (edited) dont have ADO.au3 , and for my first release not want use ADO , i wait stable version or , when autoit insert the ADO.au3 in new realease of autoit.exe sorry Edited March 1, 2016 by faustf Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 11 minutes ago, faustf said: dont have ADO.au3 Just download it. and for my first release not want use ADO You are using ADO all the time. I wait stable version Almost here. I just waiting for forum members comments . I can say "THIS IS STABLE VERSION" ......... but I never used it before on other DBMS like only on MS SQL . This is really small difference beetwen how ADO.au3 works with different DBMS So If you want to have stable version for PostrgreSQL just use this UDF. 25 minutes ago, faustf said: or , when autoit insert the ADO.au3 in new realease of autoit.exe Do not know if it ever happend .. Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 (edited) ok i promess next release i use , now dont wanna recode all script , is 1010 line Edited March 1, 2016 by faustf Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 Ok. Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 but some one not have idea why dont execute at second time the While Not .EOF but jump directly at wend ??? Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 i think the problem is here SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'" i think not work properly the sql with your ADO.au3 ??? you can use this string ??? for find insede db?? Link to comment Share on other sites More sharing options...
mLipok Posted March 1, 2016 Share Posted March 1, 2016 (edited) Work's in MS SQL and MySQL Func _Example_PostgreSQL() Local $sDSN = 'PostgreSQL35W' Local $sDatabase = 'YourBASENAME' Local $sServer = '' Local $sPort = '' Local $sUser = 'YourUserName' Local $sPassword = 'YourPassword' Local $sConnectionString = 'DSN=' & $sDSN & ';DATABASE=' & $sDatabase & ';SERVER=' & $sServer & ';PORT=' & $sPort & ';UID=' & $sUser & ';PWD=' & $sPassword & ';' _Example_1_RecordsetToConsole($sConnectionString, "Select * from SOME_TABLE") _Example_2_RecordsetDisplay($sConnectionString, "Select * from SOME_TABLE") _Example_3_ConnectionProperties($sConnectionString) EndFunc ;==>_Example_PostgreSQL but the problem is other: http://www.tutorialspoint.com/postgresql/postgresql_like_clause.htm Try this snippet: Local $sQUERY = "SELECT * FROM res_country_state WHERE name::text LIKE '%" & $city_state & "%'" ; Local $sQUERY2 = "SELECT * FROM res_country_state WHERE name LIKE '" & $city_state & "'" MsgBox(0, 'dentro city ', $sQUERY) Local $rsCustomers = $objConn.Execute($sQUERY) If @error Then MsgBox($MB_ICONERROR, '$rsCustomers', '@error = ' & @error & @CRLF & '@extended = ' & @extended) Edited March 1, 2016 by mLipok Signature beginning:* Please remember: "AutoIt"..... * Wondering who uses AutoIt and what it can be used for ? * Forum Rules ** ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button: Spoiler Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 * My contribution to others projects or UDF based on others projects: * _sql.au3 UDF * POP3.au3 UDF * RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * Useful links: * Forum Rules * Forum etiquette * Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX IE Related: * How to use IE.au3 UDF with AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions * EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *I also encourage you to check awesome @trancexx code: * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors * HTML editor * winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/ "Homo sum; humani nil a me alienum puto" - Publius Terentius Afer"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming" , be and \\//_. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty." Signature last update: 2023-04-24 Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 i tryed but not change nothing , is a very hell Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 question is , but if the first time it give me a results , is possible kill or destroy the object totally ?? Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 (edited) hey @mlipok you can kill me ahahahhahaha is case sensitive the db Edited March 1, 2016 by faustf Link to comment Share on other sites More sharing options...
faustf Posted March 1, 2016 Author Share Posted March 1, 2016 this solution work perfect expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <SQLite.au3> #include <SQLite.dll.au3> #include <Array.au3> #include <Date.au3> #include <String.au3> Global Const $sFilePath_ini = (@ScriptDir & "\config\config.ini") Global $odoo_Input8, $odoo_Input7, $odoo_Input6, $odoo_Input9, $odoo_Input10, $test_odoo, $Test_presta, $Presta_Input1, $Presta_Input2, $Presta_Input3, $Presta_Input4, $Presta_Input5 Global $DBP = 0, $Label7, $Label6, $Ctrl_button = 0, $pic4, $Ctrl_button2 = 0, $DBMy = 0, $pic3, $Test_presta, $Label6, $a, $objConn, $objConnMY Global $rsCustomers_MY, $Presta_to_Odoo ; il global sotto e dell udf Global $ps_Country_ID_array[2], $b = 0, $ps_Count, $z = 0, $v = 0, $odoo_Count Global $ps_Country_code_array[1], $c = 0, $d = 0 Global $tabella, $Form1_1 ; ps_address array tabella 24 posizioni Global $Array_ps_Addres[0][24] Global $Array_ps_Customers[0][31] Global $Form2 ; array formato da mix psaddress ps custumer Global $array_res_partner_exchange[1][67] Global $ab = 0 ; array state odoo Global $res_Country_state_array[1] Global $i,$res_country_state Global $prova _Connetti_DB_Postgre() ; aporo connessione a odoo testfunc() Func testfunc() local $arrayfuck[3] $arrayfuck[0] = 'firenze' $arrayfuck[1]= 'New York' $arrayfuck[2]= 'Texas' For $zz = 0 to UBound ($arrayfuck) -1 $prova = _connector_sql_state_post($arrayfuck[$zz]) MsgBox (0,'',$prova) $prova = '' Next EndFunc Func _connector_sql_state_post($city_state) Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") ;MsgBox(0,'dentro city ',"SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") ;$rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '%"&$city_state&"%'") Local $sQUERY = "SELECT * FROM res_country_state WHERE name::text LIKE '" & $city_state & "'" ; Local $sQUERY2 = "SELECT * FROM res_country_state WHERE name LIKE '" & $city_state & "'" MsgBox(0, 'dentro city ', $sQUERY) Local $rsCustomers = $objConn.Execute($sQUERY) If @error Then MsgBox($MB_ICONERROR, '$rsCustomers', '@error = ' & @error & @CRLF & '@extended = ' & @extended) ;$rsCustomers = $objConn.Execute("SELECT * FROM res_country_state WHERE name LIKE '"&$city_state&"'") With $rsCustomers While Not .EOF ConsoleWrite(.Fields("id").Value & " - " & .Fields("code").Value & @LF) ConsoleWrite(.Fields("name").Value & " - " & .Fields("country_id").Value & @LF) ;$res_Country_state_array[0] = (.Fields("id").Value) msgbox(0,'test',(.Fields("id").Value)) $res_country_state = (.Fields("id").Value ) ;MsgBox (0,'variabile',$res_country_state) $i += 1 .MoveNext WEnd .Close EndWith ;_ArrayDisplay($res_Country_state_array,'dalla funzione deve esse 61') Return $res_country_state EndFunc ;==>_connector_sql_country_post Func _Connetti_DB_Postgre() $objConn = ObjCreate("ADODB.Connection") $objConn.Open('Dsn=PostgreSQL35W;database=bitnami_openerp;server=127.0.0.1;port=5432;uid=postgres;pwd=xxxxxx') If @error Then MsgBox(16, "Errore", "Error Opening Connection") Else $DBP = 1 EndIf EndFunc ;==>_Connetti_DB_Postgre Func _Close_DB_Postgre() $objConn.Close EndFunc ;==>_Close_DB_Postgre Func _ErrFunc($oError) $Form2 = GUICreate("Error", 493, 277, 852, 219) $Edit1 = GUICtrlCreateEdit("", 6, 66, 481, 203, BitOR($ES_AUTOVSCROLL, $WS_HSCROLL, $ES_AUTOHSCROLL, $ES_WANTRETURN, $ES_READONLY)) GUICtrlSetData(-1, @ScriptName & " (" & $oError.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _ @CRLF & _ @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($oError.number) & @CRLF & _ @TAB & "err.windescription:" & @TAB & $oError.windescription & @CRLF & _ @TAB & "err.description is: " & @TAB & $oError.description & @CRLF & _ @CRLF & _ @TAB & "err.source is: " & @TAB & @TAB & $oError.source & @CRLF & _ @TAB & "err.helpfile is: " & @TAB & $oError.helpfile & @CRLF & _ @TAB & "err.helpcontext is: " & @TAB & $oError.helpcontext & @CRLF & _ @TAB & "err.lastdllerror is: " & @TAB & $oError.lastdllerror & @CRLF & _ @TAB & "err.scriptline is: " & @TAB & $oError.scriptline & @CRLF & _ @TAB & "err.retcode is: " & @TAB & "0x" & Hex($oError.retcode)) $Pic1 = GUICtrlCreatePic(@ScriptDir & "\config\white.jpg", -2, -2, 493, 64) $Label1 = GUICtrlCreateLabel("Il Programma ha riscontrato un errore grave", 30, 11, 308, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetBkColor(-1, 0xFFFFFF) GUISetState(@SW_SHOW) MsgBox(16, 'Erore', 'ERRORE GRAVE ADOO ODBC CONNECTORS !!!! ' & @CRLF & 'PREMENDO OK CHIUDI ANCHE IL DUMP DELL ERRORE') EndFunc ;==>_ErrFunc _Close_DB_Postgre() ; chiudo connessione database odoo Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now