Copiare il testo da un documento rtf ad un altro

giovedì 29 gennaio 2004 - 12.05

jordi75 Profilo | Junior Member



Ciao!!
Sto cercando di copiare il testo contenuto in un documento rtf in una stringa, sostituirci una parola e poi creare un nuovo file rtf in cui inserire questa stringa.
Il risultato del codice che riporto qui sotto è che il nuovo file viene creato, ma dentro non c'è scritto nulla.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim filedoc As System.IO.File
Dim testo As String
Dim testo2 As String
Dim filedest As System.IO.File

testo = filedoc.OpenText_("\\Siserver\wwwroot$\applicazione\moduli\ciao.rtf").ReadToEnd

testo2 = Replace(testo, "forse", "piove")

filedest.CreateText_("\\Siserver\wwwroot$\applicazione\moduli\ciao2.rtf").Write(testo2)

Se invece uso dei file doc il risultato è che la stringa viene scritta nel documento, ma con una codifica strana


End Sub


jordi75 Profilo | Junior Member

Il file lo creo con

filedest.CreateText_("\\Siserver\wwwroot$\applicazione\moduli\ciao2.rtf").Write(testo2)

e viene creato nella cartella.

Ho controllato se la stringa conteine il testo che salvo e in effetti c'è ed è uguale al testo che ho aprendo il file con notepad.
il fatto è che non lo inserisce nel file nuovo.

jordi75 Profilo | Junior Member

Piuttsosto mi sa che non funziona il replace. Nella stringa il valore non viene cambiato

jordi75 Profilo | Junior Member

Come non detto, scusa...il replace funziona
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2025
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5