Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Vitor Linares

to ficando loko com esse replace

Recommended Posts

fala pessoal do imasters,seguinte... eu to começando em asp... jah soh programador php.... to tentando da um replace em uma variavel, que eu pego de um banco de dados..o recordset tah funcionando... tah tudo funcionando.... soh que quando eu do o maldito replace... pra trocar "." (ponto) por " " (espaço) da esse erro aqui:Erro de tempo de execução do Microsoft VBScript (0x800A01A8)Objeto necessário: '[string: " 01 123 318/0001-22"]'/asp/trans.asp, line 17nao tenho ideia do que seja essa coisa... se alguem puder me ajudar... eu agradeçom desde jáVitor

Compartilhar este post


Link para o post
Compartilhar em outros sites

Não deve ser erro no replace. Verifique se o Recordset tem algum valor.<% Response.Write RS("SeuCampo")Response.End%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

arr,

 

oq tah contecendo eh o seguinte:

 

o recordset pega os valores normalmente... (sao numeros de cnpj) esses valores vao para o replace, para remover os pontos (.) os traços (-) e as barras (/), porem ele só remove os pontos... o resultado desses 3 replaces eh esse aqui:

01 123 318/0001-22

que é exatamente o numero que esta no erro:

 

Erro de tempo de execução do Microsoft VBScript (0x800A01A8)

Objeto necessário: '[string: " 01 123 318/0001-22"]'

/asp/trans.asp, line 17

 

o codigo é esse aqui

 

<!--#include file="./data/conecta.asp"--><%set rs = server.CreateObject("adodb.recordset")rs.activeconnection = "DSN=extranet; UID=tempapel.com; PWD=h6w2g8x3;"rs.source = "SELECT * FROM WIND02 ORDER BY CPO01 ASC"rs.opendo while not rs.eofset cnpj_o = rs("CPO04")set cnpj_1 = replace(cnpj_o, ".", "")set cnpj_2 = replace(cnpj_1, "/", "")set cnpj = replace(cnpj_2, "-", "")rs.movenextloop%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

cara tira estes sets...e voce não pecisa de tudo isso de variavel se só for usar a ultima, ao menso que queira mostrar a evolução do replaceacho que basta issocnpj = rs("CPO04")cnpj = replace(cnpj, ".", "")cnpj = replace(cnpj, "/", "")cnpj = replace(cnpj, "-", "")

Compartilhar este post


Link para o post
Compartilhar em outros sites

COmo está o seu código, com o Response.Write e tudo.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Voltamos ao início

Não deve ser erro no replace. Verifique se o Recordset tem algum valor.

Faça a verificação antes da dar o replace:IF Len(rs("CPO04"))>1 ThenReplace.....ElseNão faz nadaEnd IF

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.