Hi :)
I'm having some major trouble with an XML Client/Server application that I
am writing. I am using NetworkStream with CryptoStream to Read and Write
XML between computers. Now, whenever I write the XML, the Server section
which uses the XMLTextReader Class will not accept EndElements period, and
neither the ReadStartElement or ReadEndElement will work properly. However,
if I only send to WriteStartElements over the network, the Server will
receive it fine if I only use the Read Method. It will not accept
EndElements period. Since this application is just a test application, I'm
running it all on the same computer multi-threaded. If this is the problem,
please tell me so. I don't think it is, however, becuase if I just send
XMLStartElements, it reads those just fine with the XML.Read method no
matter how many start elements I send. I'm sure there's a very easy fix to
this, but, just in case, I have attached some of the more pertinent code
segments for your review. I didn't include the Listener section and the
Connect section because both of those work fine. Any help that anybody could
provide would be greatly appreciated. Thank you for your time.
Server App::
Button3.Text = "Waiting..."
Button3.ForeColor = Color.DarkRed
Dim ConnectedStream As Net.Sockets.NetworkStream
ConnectedStream = Server_Client.GetStream
Dim XMLDoc As New Xml.XmlDocument()
Dim CryptoReadStream As New Security.Cryptography.CryptoStream _
(ConnectedStream, _
EncProvider.CreateDecryptor(EncProvider.Key, EncProvider.IV), _
Security.Cryptography.CryptoStreamMode.Read)
Dim XMLRead As New Xml.XmlTextReader(CryptoReadStream)
XMLRead.WhitespaceHandling = Xml.WhitespaceHandling.None
Do While 1
XMLRead.Read()
Loop
Client App::
Dim ConnectedStream As Net.Sockets.NetworkStream
ConnectedStream = Client_Client.GetStream
Dim CryptoWriteStream As New Security.Cryptography.CryptoStream _
(ConnectedStream, _
EncProvider.CreateEncryptor(EncProvider.Key, EncProvider.IV), _
Security.Cryptography.CryptoStreamMode.Write)
Dim XMLWrite As New Xml.XmlTextWriter(CryptoWriteStream,
System.Text.Encoding.Default)
Button4.Text = "Sending..."
Button4.ForeColor = Color.DarkRed
XMLWrite.WriteStartElement("Start1")
XMLWrite.WriteEndElement()
XMLWrite.WriteStartElement("Start2")
XMLWrite.WriteEndElement()
XMLWrite.Flush()
XMLWrite.Close()
Button4.Text = "Message Sent!"
Button4.ForeColor = Color.DarkGreen
Thank you so much!!!
If you can help me out at all, I would surely appreciate it.
-- Casey J. Watson
