erro em acentuação

[Patrique 0]

Fala galera, estou fazendo um formulario em asp e mandando os dados para o bd access só que a bagaceira esta indo com a acentuação zoada, estou utilizando.

 

@LCID = "1046"
Response.Charset = "ISO-8859-1"

E...

 

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

Mais mesmo assim não ta indo a acentuação correta para o bd, alguém já passou por isso? quem puder me ajudar eu agradeço desde já.

 

Valew.

 

[]'s

[Danielhsantos 0]

Fala galera, estou fazendo um formulario em asp e mandando os dados para o bd access só que a bagaceira esta indo com a acentuação zoada, estou utilizando.

 

@LCID = "1046"
Response.Charset = "ISO-8859-1"

E...

 

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

Mais mesmo assim não ta indo a acentuação correta para o bd, alguém já passou por isso? quem puder me ajudar eu agradeço desde já.

 

Valew.

 

[]'s

 

Olha muda o ISO-8859-1 para UTF-8

 

-----------------------------------

Espero ter ajudado,

Daniel Henrique

[Patrique 0]

Não deu, se eu mudar para o UTF-8 o conteúdo da página que tem acento com bagunçado.

 

[]'s

[xanburzum 169]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"

Response.Charset="ISO-8859-1" %>

[Patrique 0]

Valew xam mais aqui deu erro

 

Active Server Pages, ASP 0221 (0x80004005)
A opção especificada 'Response.Charset="ISO-8859-1" ' é desconhecida ou inválida.

que coisa estranha... nunca havia tido problema com isso, agora acontece isso, e não faço nada de diferente do que eu costumo fazer, muito estranho.

[xanburzum 169]

Fala Pratique...

 

faz assim, coloca 1º o

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

no inicio do code e depois dentro do seu code coloque o charset

[Patrique 0]

Eita, deu não cara, quando eu coloco esse code as palavras com acentuação no html ficam bagunçadas, na verdade o meu problema é na hora de inserir dados no bd, eles ficam com a acentuação bagunçada, já tentei de tudo e nada, sempre quando vai acentuação no cadastro pro bd da esse problema.

[xanburzum 169]

na página que irá inserir tente o

<% Response.Charset="ISO-8859-1" %>

para ver se ele pega o Ocidental (ISO-8859-1).

e também o

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

[Patrique 0]

Já tinha usado cara, mais tive que sacrificar as acentuações de todas as páginas que eu havia criado... é f***... vo ter um trabalhão para modificar... isso porque eu vou ter que modificar a codificação que esta como ANSI para UTF-8 pois eu cai na bobeira de criar um arquivo padrão no bloco de notas e consequentemente a codificação veio como ANSI e eu não percebi... fui programando... tomano como base este file... a solução agora é eu abrir no bloco de notas e salvar em utf-8 so que os acentos ficam bagunçados... e eu vou ter que mecher... e arrumar todos.. mais é a única solução que encontrei e deu certo.

 

[]'s

[xanburzum 169]

boa sorte, amigo

vê se ajuda este code para converter

 

<%
option explicit 


function IsValidUTF8(s)
  dim i
  dim c
  dim n

  IsValidUTF8 = false
  i = 1
  do while i < len(s)
    c = asc(mid(s,i,1))
    if c and &H80 then
      n = 1
      do while i + n < len(s)
        if (asc(mid(s,i+n,1)) and &HC0) <> &H80 then
          exit do
        end if
        n = n + 1
      loop
      select case n
      case 1
        exit function
      case 2
        if (c and &HE0) <> &HC0 then
          exit function
        end if
      case 3
        if (c and &HF0) <> &HE0 then
          exit function
        end if
      case 4
        if (c and &HF8) <> &HF0 then
          exit function
        end if
      case else
        exit function
      end select
      i = i + n
    else
      i = i + 1
    end if
  loop
  IsValidUTF8 = true 
end function


function DecodeUTF8(s)
  dim i
  dim c
  dim n

  i = 1
  do while i < len(s)
    c = asc(mid(s,i,1))
    if c and &H80 then
      n = 1
      do while i + n < len(s)
        if (asc(mid(s,i+n,1)) and &HC0) <> &H80 then
          exit do
        end if
        n = n + 1
      loop
      if n = 2 and ((c and &HE0) = &HC0) then
        c = asc(mid(s,i+1,1)) + &H40 * (c and &H01)
      else
        c = 191 
      end if
      s = left(s,i-1) + chr(c) + mid(s,i+n)
    end if
    i = i + 1
  loop
  DecodeUTF8 = s 
end function

'EncodeUTF8
'  Encodes a Windows string in UTF-8
'Returns:
'  A UTF-8 encoded string
function EncodeUTF8(s)
  dim i
  dim c

  i = 1
  do while i < len(s)
    c = asc(mid(s,i,1))
    if c >= &H80 then
      s = left(s,i-1) + chr(&HC2 + ((c and &H40) / &H40)) + chr(c and &HBF) + mid(s,i+1)
      i = i + 1
    end if
    i = i + 1
  loop
  EncodeUTF8 = s 
end function
%>

[desisto 0]

e ai Pat, você ta gravando via JS???

 

 

 

 

tenta esse

 

Response.Charset="ISO-8859-1"
Response.AddHeader "Content-Type", "text/html; charset=iso-8859-1"

[Patrique 0]

Fala desisto, esse era o code que eu geralmente usava.

 

Mais resolvi aqui fazendo o seguinte, eu criei os .asp pelo bloco de notas e fui programando lá, so que pelo bloco de notas salva em ANSI, dae eu estava utilizando o AEDIX que é um programa editor, mais ele não tem a função para converter para utf-8 ou ISO-8859-1, dae ontem baixei o notepad++ e ele tem essa função de conversão de codificação, dae mudei todos os charset para utf-8 e converti os arquivos asp, e tá de boa novamente, ta funcionando sem problemas agora.

 

[]'s

[desisto 0]

mas nao era isso que você queria ne?