Replace che non funziona

[Nitroracing]

Sto usando questa funzione di replace su del testo recuperato da un db sql, ma sembra non funzionare.

function Verifica(testo)
 testo = replace(testo, "”" , """")
 testo = replace(testo, "“" , """")
 testo = replace(testo, "’" , "'")
 testo = replace(testo, "•" , "*")
 testo = replace(testo, "–" , "-")
 Verifica = testo
end function

Quale può essere la causa secondo voi?

Il testo caricato sul db, è stato caricato talvolta facendo un copia-incolla da testo di un db access. Non so se può esserne la causa per un qualche motivo.

Grazie mille!

[DarioN1]

cosa intendi per non funziona ?

fai un esempio

[Nitroracing]

Non funziona nel senso che se ad esempio ho il seguente testo:

L’analisi di impatto viene svolta preliminarmente allo....

Non fa il replace di ’ con '

Non so se mi sono spiegato.

Grazie!

[DarioN1]

function Verifica(testo)
 testo = replace(testo, "”" , """")
 testo = replace(testo, "“" , """")
 testo = replace(testo, "’" , "'")
 testo = replace(testo, "•" , "*")
 testo = replace(testo, "–" , "-")
 Verifica = testo
end function

testo = "L’analisi di impatto viene svolta preliminarmente allo...."

testo = verifica(testo)

Così deve funzionare . . . .

[Nitroracing]

Originariamente inviato da DarioN1

function Verifica(testo)
 testo = replace(testo, "”" , """")
 testo = replace(testo, "“" , """")
 testo = replace(testo, "’" , "'")
 testo = replace(testo, "•" , "*")
 testo = replace(testo, "–" , "-")
 Verifica = testo
end function

testo = "L’analisi di impatto viene svolta preliminarmente allo...."

testo = verifica(testo)

Così deve funzionare . . . .

Il problema è che così funziona, ma se il testo è caricato da db fa finta di nulla e non viene fatto il replace..

[optime]

posta il codice del ciclo

[Nitroracing]

Originariamente inviato da optime
posta il codice del ciclo

function Verifica(testo)
 testo = replace(testo, "”" , """")
 testo = replace(testo, "“" , """")
 testo = replace(testo, "’" , "'")
 testo = replace(testo, "•" , "*")
 testo = replace(testo, "–" , "-")
 Verifica = testo
end function

[...]

DO While NOT rslink2.eof

quiz = verifica(rslink2("quiz"))

Response.Write (quiz)

rslink2.MoveNext
Loop

[...]

[optime]

prova con

..
quiz = (rslink2("quiz") & "")
quiz = verifica(quiz)
..

[Nitroracing]

Originariamente inviato da optime
prova con

..
quiz = (rslink2("quiz") & "")
quiz = verifica(quiz)
..

niente da fare

[DarioN1]

eeeeeeeeeeeh ?!