DataSet et ReadXML

Bonjour a tous,

Voila, j'arrive a exporter mes données d'une base SQL Server en utilisant un DataSet et sa méthode WriteXml.

Je me retrouve donc avec un fichier XML du type :

Citation:

---

<?xml version="1.0" standalone="yes" ?>
<Territories>
<TerritoryID>01581</TerritoryID>
<TerritoryDescription>Westboro</TerritoryDescription>
<RegionID>1</RegionID>
</Territories>
<Territories>
<TerritoryID>01730</TerritoryID>
<TerritoryDescription>Bedford</TerritoryDescription>
<RegionID>1</RegionID>
</Territories>
...

---

Jusque là, tout va bien, mais maintenant, je souhaiterais pouvoir importer ces données.

1) Est-ce que cela est possible ? :P
2) Si oui, comment faire SVP ?

Merci à tous pour vos réponse !

ReadXml ?

Oui à mon avis, sa doit pouvoir être possible avec ReadXml, mais comment faire pour insérer les données dans la table existante ???

Merci

Tu passes par ton TableAdapter fortement typé :

Me.CustomersTableAdapter.Update(Me.Command.Customers)

Command= DataSet Typé
Customers = DataTable du DataSet
CustomersTableAdapter = TableAdapter

Par contre vérifier bien que cela ne génére pas de doublon.

@+

Euh excuse moi, mais comme je débute un peu, je ne connais pas trop le tableAdapter...

C'est pareil que le SqlDataAdapter ???

Merci

Oui en quelque sorte, si ta base de données est SQL Server ton TableAdapter fortement typé contiendra une Instance d'un SqlDataAdapter.

Ok, je te remercie. Alors voilà ce que j'obtiens maintenant :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Dim str AsString = "Data Source=WMD640M;Initial Catalog=Entreprise;Persist Security Info=True;User ID=sa;Password=edenpark" Dim conn As SqlConnection = New SqlConnection(str) Try conn.Open() Dim ds As DataSet = New DataSet ds.ReadXml("C:\Categories.xml", XmlReadMode.InferSchema) MsgBox(ds.Tables(0).TableName) Dim sda As SqlDataAdapter = New SqlDataAdapter() sda.Update(ds, ds.Tables(0).TableName) Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical, "Erreur") EndTry

---

et là, il m affiche l'erreur suivante :

Citation:

---

Update requiert un InsertCommand valide lors du passage de la collection DataRow avec de nouvelles lignes.

---

Je ne vois pas trop comment m'y prendre ???

Merci

C'est normale le TableAdapter est "vide" il faut lui inquer les commandes à utiliser pour faire les INSERT.

Utilise l'assistant de connexion pour crée un DateSet fortement typé, il te généréra un TableAdapter fortement typé correspondant que tu pourra utiliser.
Ce sera plus simple que tout te palucher à la main.

Le code du table adapter se trouve dans celui du DataSet, dans le fichier NOMDATASET.Designer.vb.
Tu verra qu'en fait il heberge toutes les requêtes avec des paramètres :

Code:

---

1 2 3 4

Me._adapter.InsertCommand.CommandText = "INSERT INTO `Orders` (`CustomerID`, `EmployeeID`, `OrderDate`, `RequiredDate`, `S"& _ "hippedDate`, `ShipVia`, `Freight`, `ShipName`, `ShipAddress`, `ShipCity`, `ShipR"& _ "egion`, `ShipPostalCode`, `ShipCountry`) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?"& _ ", ?, ?)"

---

Ok, je te remercie. Je test et te tiens au courant. :king: