lettura html,nn legge gli accenti "'"

[FreeKevin]

Ciao a tutti,
ho fatto una funzione che prende un file html e va a sostituire dei valori e salva il file modificato con un'altro nome.
Il problema è sul file modificato, perche nel sostituire il valore mi cancella tutti gli accenti "'" e le lettere con gli accenti.
Perche?
Vi allego il codice
"
Dim objReader As New StreamReader("c:\ar.htm")
Dim sLine As String
Dim sLine1 As String
Dim writer As StreamWriter = New StreamWriter("c:\arT.htm")
'visualizza dati anagrafici titolare
Call connetti()
Rs.Open("SELECT * FROM anagrafica WHERE tipo = 'admin'")
Do
sLine1 = objReader.ReadLine()
sLine = Replace(sLine1, "#nome#", Rs("nome").Value)

If sLine = "#STOP" Then
Else
writer.WriteLine(sLine)
End If
Loop Until sLine = "#STOP"
objReader.Close()
writer.Close()
"
Grazie 1000

[xegallo]

linguaggio e versione anche nel titolo