[Resolvido] Array

[saloeric 1]

Boas, tenho uma array que armazena dados dinamicamente, mas tou com um problema, eu não quero que ela insira os dados que já foram inseridos, vai a função actual:

 

Function verifica(reg,indice)
						dim saida,x,montaarray()
						redim montaarray(indice)
						
						'if verifica(reg,indice) = false then
						'	montaarray(indice) = reg
						'end if
					
						saida=false
						for x = lbound(montaarray) to ubound(montaarray)
							if montaarray(x)=reg then
								saida = true
							end if
						next
			
						verifica = saida
					End Function

, onde passo dois argumentos, um com os dados, outro com o índice, esta função é chamada de dentro de um loop, que assim vai-me enchendo a array, tentei invocar a função dentro da própria função para verificar se os dados estavam inseridos mas dá erro, existe outra forma?

[xanburzum 169]

existe uma funcaun para isso, pesquisa em laboratório de scripts

[saloeric 1]

Obrigado tive a ver e encontrei o seu post duplicidade em array, porém para este teria que ser diferente e já consegui, aqui fica:

	dim montaarray()
					Function verifica(reg,indice)
						dim saida,x,erro
						redim preserve montaarray(indice)
						
						saida=true
						erro=0
						
						for x = 0 to ubound(montaarray)
							if montaarray(x)=reg then
								erro=1
							end if
						next
						
						if erro=0 then
							montaarray(indice) = reg
							saida = false
						end if
			
						verifica = saida
					End Function

[xanburzum 169]

esse mesmo,

beleza