Vetor = Session("GuardaCorreio") ''Atribuindo uma session a uma variável vetor já preenchida ou não If Not IsArray(Vetor) Then Vetor = Array() End if''Verifica se vetor é realmente um array se não for então atribui a ela um array If Not IsArray(Vetor_Log)Then Vetor_Log = Array() End If If InStr(Join(Vetor), Valor) = 0 Then''Verifica se o valor a ser inserido já está no vetor se não existir então incluio o novo valor ReDim preserve Vetor(UBound(Vetor)+1)''Preserva o vetor somando 1 ao tamanho do vetor Vetor(Ubound(Vetor)) = Valor''Atribui o valor na ultima posição do vetor Redim preserve Vetor_Log(UBound((Vetor_Log))+1) Session("GuardaCorreio") = Vetor''Devolve à variável de sessão End if Olá pessoal gostaria de saber como faço para utilizar um array bidimensional da mesma forma que está postado alguém poderia me ajudar ???