devi ovviamente sostituire tutti caratteri non consentiti nel xml
cercati la discussione con oggetto
Lettura caratteri accentati e apostrofo
di qualche giorno fa
come scritto in quella discussione io faccio così:
io ho risolto creandomi una tabella con due colonne
carattere non ammesso (col1) e
sostituisci con (col2)
popolata tipo
col1 col2
© ©
& &
Ø Ø
all'avvio del programma me la carico in una matrice chiamata
xmlNonConsentiti(col1,col2)
in fase di creazione del file, quando scrivo una stringa eseguo una
serie di replace di tutti i caratteri trovati appartenenti alla matrice
ho creato a tale scopo una funzione che qui te la semplifico
Private Function Pulisci(testo As String) As String
Dim I As Integer
For I = 0 To 50
testo = Replace(testo, xmlNonConsentiti(I, 0), xmlNonConsentiti(I, 1))
Next I
Pulisci = testo
End Function
quindi quando vado a scrivere stringhe nel l'xml faccio cosi :
Print #1, "<Nome>" & Pulisci(......)) & "</Nome>"
la tabella dei caratteri non consentiti è gia compilata ma può
gestirsela l'operatore aggiungendo altri simboli a piacere
ciao
BFS