XML-файл, прикрепленный к письму, содержит неправильные символы - PullRequest
Новая
       19

XML-файл, прикрепленный к письму, содержит неправильные символы

0 голосов
/ 18 января 2019

Я загружаю письмо с прикрепленным к нему файлом "file.xml".

Когда я сохраняю файл, файл некорректно сохраняется с заменой «=» на «3D =».

Ниже приведен пример: 

<?xml version=3D"1.0" encoding=3D"UTF-8"?><ns3:RicevutaConsegna xmlns:ns3=
    =3D"http://ivaservizi.agenziaentrate.gov.it/docs/xsd/fattura/messaggi/v1.0"=
         xmlns:ns2=3D"http://www.w3.org/2000/09/xmldsig#" versione=3D"1.0">

вместо из: 

    <?xml version="1.0" encoding="UTF-8"?><ns3:RicevutaConsegna xmlns:ns3=
"http://ivaservizi.agenziaentrate.gov.it/docs/xsd/fattura/messaggi/v1.0"
xmlns:ns2="http://www.w3.org/2000/09/xmldsig#" versione="1.0">

Если я сохраню файл в Thunderbird, он будет работать нормально .. 

    client.CheckCertificateRevocation = False
    client.Connect("imap.pec.it", 993, True)

    client.Authenticate("xxxxxx@pec.it", "xxxx")
    client.Inbox.Open(FolderAccess.ReadOnly)
    Dim query = Search.SearchQuery.SubjectContains("Ricevuta di consegna")

    For Each uid In client.Inbox.Search(query)
        Dim messaggio = client.Inbox.GetMessage(uid)
        ListBox1.Items.Add(messaggio.Subject)

        For Each BodyPart In messaggio.BodyParts

            If BodyPart.ContentDisposition.FileName = "postacert.eml" Then
                Dim postacert As MimeKit.MessagePart = BodyPart

                TextBox1.Text = postacert.Message.Attachments(0).ToString
                Dim attach As MimeKit.MimePart = postacert.Message.Attachments(0)
                Dim file As FileStream = New FileStream(attach.FileName, FileMode.Create)
                attach.Content.WriteTo(b.FileName)
                file.Close()

Есть ли ошибка?

(я работаю в VB.NET.)

1 Ответ

0 голосов
/ 18 января 2019

Найди ошибку .. я использую: 

attach.Content.WriteTo(file)

вместо из: 

attach.Content.DecodeTo(file)
...