Discussion :

[Ya7yaKech]

Salut,
je cree un fichier xml et je l'enregistre sur disk comme le montre le code suivant:

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim myXmlTextWriter As XmlTextWriter = New XmlTextWriter(Application.StartupPath + "\test.xml", System.Text.Encoding.UTF8)

est ce que c'est possible de l'nregistré dans un stream?
si c'est oui comment?
Merci

[tomlev]

Faudrait vraiment apprendre à utiliser la doc
http://msdn.microsoft.com/fr-fr/libr...extwriter.aspx

[Ya7yaKech]

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
        Dim objMemStrm As MemoryStream = New MemoryStream
 
        Dim myXmlTextWriter As XmlTextWriter = New XmlTextWriter(objMemStrm, System.Text.Encoding.UTF8)

voila ce que j'ai fais .
mais je veux lire les doonnées qui sont dans ce Stream !!
j'ai fais :

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
        Dim instance As New XmlTextReader(objMemStrm)
msgbox(instance.tostribg)

il m'affiche une erreur :

"Impossible d'accéder à un Stream fermé."

[tomlev]

J'ai pas tout compris...
Tu veux écrire du XML dans un MemoryStream, puis le relire à partir du MemoryStream ?
Dans ce cas il faut que tu "rembobine" le MemoryStream, i.e. que tu te replaces au début :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objMemStrm.Seek(0, SeekOrigin.Begin)

[Ya7yaKech]

bon je vous rexplique deuis le debut

je recupere un xml d'une source de données
je fais manipulation sur ce fichier

apres avoir fini mes modifications je reecris un fichier xml (en utilisnat XmlTextWriter )mais je veux pas le sauvegarder sur le disque dure.pour cela j'ai fais :

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Dim objMemStrm As MemoryStream = New MemoryStream
     Dim myXmlTextWriter As XmlTextWriter = New XmlTextWriter(objMemStrm, System.Text.Encoding.UTF8)

apres je veux lire les données de ce stream ( pour etre sur qu'il contient mes données ).
voila c'est tout.
une autre demande si vous le permetez; est ce qu'il est possible al la place de MemoryStream que j'utilise byte ?
Merci

[tomlev]

apres je veux lire les données de ce stream ( pour etre sur qu'il contient mes données ).

OK, donc c'est bien ce que je disais : il faut revenir au début du Stream avec Seek

une autre demande si vous le permetez; est ce qu'il est possible al la place de MemoryStream que j'utilise byte ?

Ben en fait un MemoryStream peut te renvoyer son buffer sous forme d'un tableau de byte :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim b() as Byte = objMemStrm.GetBuffer()

[AJemni]

Pour la modification inspirez vous de ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
   'Definir la mémoir ou vous allez écrir
        Dim xmlMemoryStream As IO.MemoryStream = New IO.MemoryStream()
        'Ecriture
        Dim myXmlTextWriter As XmlTextWriter = New XmlTextWriter(xmlMemoryStream, System.Text.Encoding.UTF8)
        'Lecture
        xmlMemoryStream.Position = 0
        Dim xmlStreamReader As IO.StreamReader = New IO.StreamReader(xmlMemoryStream)
        xmlStreamReader.ReadToEnd()

pour Byte :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Dim bStream As Byte() = xmlMemoryStream.GetBuffer()

[Gold Bug]

apres je veux lire les données de ce stream ( pour etre sur qu'il contient mes données ).

C'est pas un peu curieux ça ??
Pourquoi ce manque de confiance ?

[Ya7yaKech]

Impossible d'accéder à un Stream fermé.
c'est ce qu'il m'affiche comme erreur quand je fais

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
 objStream.Seek(0, SeekOrigin.Begin)

ou ca aussi

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
        objStream.Position = 0
        Dim xmlStreamReader As IO.StreamReader = New IO.StreamReader(objStream)
        xmlStreamReader.ReadToEnd()

la raison de vouloir lire mes données c'est juste pour etre sur qu'ils sont bien manipulés.
mais pour moi c'est important d'etre sure.
Merci

[tomlev]

si tu peux pas réutiliser le même stream, crées en un nouveau à partir du buffer du premier...

[Ya7yaKech]

vous voulez bien me montrer comment je peux le faire?
car la je commence vraiment a craker de fatigue
et je vous serai reconnaissant
Merci

[tomlev]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    Dim objMemStrm As MemoryStream = New MemoryStream
    Dim myXmlTextWriter As XmlTextWriter = New XmlTextWriter(objMemStrm, System.Text.Encoding.UTF8)
    Dim b() as Byte = objMemStrm.GetBuffer()
    objMemStrm = New MemoryStream(b)
    Dim xmlStreamReader As IO.StreamReader = New IO.StreamReader(objMemStrm)
    xmlStreamReader.ReadToEnd()

Au fait, dans ton code, tu utilisais objMemStrm pour écrire, et objStream pour lire... c'est exprès ? Parce que si c'est pas exprès, ça pourrait expliquer tes problèmes...

EDIT: au fait, je viens de réaliser un truc... oh, un détail
tu crées un XmlWriter, mais tu n'écris pas dedans
(et moi non plus dans le code que j'ai écrit...)

[Ya7yaKech]

on peut dire que c'est exprès
car j'ai fais deux codes avec deux déclarations
bon tout ce que je veux vous dire c'est MERCIIIIIIIIIIIIIIIIIIIII

[Gold Bug]

la raison de vouloir lire mes données c'est juste pour etre sur qu'ils sont bien manipulés.
mais pour moi c'est important d'etre sure.

Ben dans ce cas là il te faut développer des test unitaires pour tes fonctions de manipulation et d'écriture de XML.

[Ya7yaKech]

des testes unitaires !!??
c'est nouveau pour moi
pouvez vous m'en dire plus?

Merci d'avance