_arraytostring with delimiter not work

[faustf]

hi guy 

i   have  a part of script  and  i want  convert  a array to string  i use  _array to string  , in this mode 

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
    Local $stringalo1=_ArrayToString($arrayfuck,"|")
    MsgBox(0,'',$stringalo1)
$prova = _connector_sql_state_post($stringalo1)
;$prova = _connector_sql_state_post()
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&"%'")

        $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')

      #cs
$rsCustomers = $objConn.Execute("SELECT * FROM  res_country_state WHERE name LIKE '%firenze%'") ; trovo il totale in ps address
        ;MsgBox (0,'',$objConnMY.Execute("SELECT COUNT * FROM ps_address"))

        With $rsCustomers
        While Not .EOF
        ;   ConsoleWrite(.Fields("id_country").Value & " - " & .Fields("iso_code").Value & @LF)
        ConsoleWrite(.Fields("id").Value & @LF)
        $res_country_state = (.Fields("id").Value )
        ;$res_country_state = (.Fields("cnt").Value)

        .MoveNext
        WEnd
        .Close
        EndWith

        ;MsgBox (0,'',$odoo_Count)
        #ce
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=xxxxxxx')
    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

in  line  42  local $stringalo1 = _arraytostring($arrayfuck,"|") 

but  answerme  always    firenze|new york|texas ,  not  split  

some one can help me? 

 

thankz  at all

[faustf]

ooo understund   i answer me  this  function dont  split  but   insert |   ahahhahahaha, and  for split  imust use   stringsplit  and  reinsert in array ??? 

[mLipok]

The previous version:

For $zz = 0 To UBound($arrayfuck) - 1
        $prova = _connector_sql_state_post($arrayfuck[$zz])
    Next

Was OK.

 

[faustf]

yea probably  yes  ok thankz