我正在测试一个应用程序,以便从XML文件(工作)中读取并保存到XML文件(不工作)。
这是我的代码无效。有想法该怎么解决这个吗?我需要能够保存到XML文件。我得到的错误是:STREAM不可写
代码:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim strTime As String
strTime = Now.ToString
Dim _assembly As Assembly
_assembly = [Assembly].GetExecutingAssembly()
Dim FileName = _assembly.GetManifestResourceStream("EmbeddedResource.xml")
Try
Dim xmlData As New XmlDocument
Dim nodeRoot, nodeTroubleInfo, nodeDateTimeSaved As XmlNode
xmlData.Load(FileName)
nodeRoot = xmlData.SelectSingleNode("//DATA")
nodeTroubleInfo = nodeRoot.SelectSingleNode("//TroubleInfo")
nodeTroubleInfo.InnerText = txtNotes.Text
nodeDateTimeSaved = nodeRoot.SelectSingleNode("//DateTimeSaved")
nodeDateTimeSaved.InnerText = strTime
xmlData.Save(FileName)
MsgBox("SAVE Button Pressed!", MsgBoxStyle.Information, "Note saved successfully!")
Catch ex As Exception
MsgBox("Error saving note. The error was: " & vbCrLf & Err.Description, MsgBoxStyle.Exclamation, "Error saving information to file.")
Exit Sub
End Try
End Sub
答案 0 :(得分:0)
这不是文件。这是组装的一部分。你不能写信给它。
您可以做的最好的事情是从程序集中读取并写入磁盘上的单独XML文件。 那个文件,你可以读写。