Q&A
いつもお世話になっております。
現在、vb.netを使用してxmlファイルを作成するプログラムを作成しておるのですが、
作成したxmlファイルの内容が想定している形で出力されず困っております。
結果的にxmlファイルは作成はされるのですが、作成されたxmlファイルの中身を確認してみますと、
「<!DOCTYPE message SYSTEM "work_req.dtd"[]> 」となっているのですが、
最後の「」は本来入ってほしくない文字なのです。
デバックしてみても途中「」は入っていないのに
作成されたxmlファイルになると「」が入っているのです。
そもそものxmlファイル作成のコードが間違っているのかすらわからない状況なのです。
ご回答、宜しくお願いいたします。
strXML = "" strXML = "<?xml version=""1.0"" encoding=""UTF-8""?>" & vbCrLf strXML &= "<!DOCTYPE message SYSTEM ""work_req.dtd"">" & vbCrLf strXML &= "<message message_id="""" message_dt=""2018/02/28""" & vbCrLf strXML &= "message_type="""" message_sub_type=""New""" & vbCrLf strXML &= "message_dtd_version_number=""123"">" & vbCrLf strXML &= "<header>" & vbCrLf strXML &= "<from_application_id></from_application_id>" & vbCrLf strXML &= "<to_application_id></to_application_id>" & vbCrLf strXML &= "</header>" & vbCrLf strXML &= "<body>" & vbCrLf <途中省略> strXML &= "</body>" & vbCrLf strXML &= "</message>" & vbCrLf Dim xmlDoc As New XmlDocument Dim item As XmlElement xmlDoc.LoadXml(strXML) Dim xmltxtWrite As New System.Xml.XmlTextWriter("C:\xml\20180202.xml", System.Text.Encoding.GetEncoding("UTF-8")) Try '文字コードを指定して作成したDOMドキュメントをファイルに保存 xmlDoc.Save(xmltxtWrite) 'XmlTextWriterを閉じます xmltxtWrite.Close() Catch ex As System.Xml.XmlException 'XMLによる例外をキャッチ Console.WriteLine(ex.Message) End Try
回答1件
0
ベストアンサー
元ソースではXMLフォーマットのテキストをわざわざXmlDocumentにデコードしてからXmlTextWriterで保存してますが、
XMLのナカミをそのまんまでファイルに落とすなら、XmlTextWriterは使わずとも、そのまんまテキストで保存すればいいんじゃないでしょうか
ちょっと気になったんでXMLフォーマットの仕様から調べると、DOCTYPEの記述に問題？があるため、XMLへのデコードで補完されてそういう出力になっているようです。
ということで、どーしても元の記述のとおりに出力されなければならないと言われるなら、XMLDocument を介さず、やっぱりテキストで保存するしかないように思います。
投稿2018/03/07 12:16
編集2018/03/08 00:56
総合スコア87747
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2018/03/08 02:09