Busca de Domínio

[manga 0]

Pessoal,

 

Na área de códigos do nosso fórum tem um script bem legal para buscar domínios Buscar Domínios

 

Entretanto, esse código não consegue converter caracteres acentuados nem o "Ç" do nosso português

 

Alguém sabe como corrigir isso?

[Salgado 4]

Lá mesmo tem uma função para remover os acentos!

Removendo acentos!

[manga 0]

É Salgado, isso é uma solução, mas não tem como converter os caracteres acentuados e o "Ç" e deixar o texto legal em protuguês ?

[gastao 0]

É Salgado, isso é uma solução, mas não tem como converter os caracteres acentuados e o "Ç" e deixar o texto legal em protuguês ?

pois é manga, no xml.http, se usa uma função BinaryToString , ou seja, nos pegas os dados todos em binários e convertemos para string usando essa função...........olha a função aí!!!Function BinaryToString(strBinary) Dim intCount BinaryToString ="" For intCount = 1 to LenB(strBinary) BinaryToString = BinaryToString & chr(AscB(MidB(strBinary,intCount,1))) NextEnd Function