ARRAY X STRING

MICHAELL 18/04/2011 22:31:52
#371781
Olá pessoal..

talvez seja muito simples, mas realmente nao consegui...
eu executo uma pagina em php dentro do WebBrowser, aonde o resultado é um array do php, e recebo em uma string do visual basic..

exemplo:

  Dim resultado As String
resultado = [Ô]Array ( [0] => Array ( [lat] => 41.0135623 [lon] => -8.5655801 ) [2] => Array ( [lat] => -20.4183346 [lon] => -42.9165555 ) [3] => Array ( [lat] => -26.8557025 [lon] => -49.0862255 ) [4] => Array ( [lat] => -12.9801416 [lon] => -38.4780331  ) [5] => Array ( [lat] => -29.4412937 [lon] => -50.5686882 )) [Ô]


preciso transformar isso em um array do visual basic para poder percorrer todos os indices do array?
sendo que esse array na verdade é muito maior do que isso.

obrigado
MARCELO.TREZE 18/04/2011 23:14:54
#371788 Resposta escolhida
a principio vc pode tentar isto


Dim StrArray() As String
resultado = [Ô]Array ( [0] => Array ( [lat] => 41.0135623 [lon] => -8.5655801 ) [2] => Array ( [lat] => -20.4183346 [lon] => -42.9165555 ) [3] => Array ( [lat] => -26.8557025 [lon] => -49.0862255 ) [4] => Array ( [lat] => -12.9801416 [lon] => -38.4780331  ) [5] => Array ( [lat] => -29.4412937 [lon] => -50.5686882 )) [Ô]
resultado = Replace(resultado, [Ô]Array ([Ô], [Ô][Ô])
resultado = Replace(Replace(resultado, [Ô][[Ô], [Ô][Ô]), [Ô]][Ô], [Ô][Ô])
StrArray = Split(resultado, [Ô])[Ô])
For F = 0 To UBound(StrArray)
List1.AddItem StrArray(F)
Next F


eu usei um listbox para exibir o resultado, veja o que acha

cada linha é um array
MICHAELL 19/04/2011 14:37:39
#371882
perfeito mesmo... valew MARCELO
Tópico encerrado , respostas não são mais permitidas
Voltar