Génération d'XML avec ASP.net via une BDDRésolu

Question

Bonjour, J'ai conçu une galerie produits en Flash et j'ai besoin de récupérer dynamiquement des donnés via du XML. Pour l'instant mes données sont donc dans un BDD access et je voudrais que ASP.net (avec VB) me génère mon XML avec les donnés qui se trouvent donc dans ma base de donnée access. Le problème c'est que je ne sais pas du tout comment m'y prendre. Pour la connexion à ma BDD c'est très simple, ca il n'y a pas de problème mais je sais pas comment faire pour générer mes lignes de xml et afficher les données dans mes lignes XML... Comment vous y prendriez vous ou tout simplement avez-vous déjà vu une source qui le faisait ? Petite précision : mon fichier xml se présente de cette manière la : (et non pas 1 Fabien S. (Alias: fabienfs)

SuperBouly · Accepted Answer

Bonjour,
Ce n'est pas très compliqué :
'1 . tu remplis un dataset avec les tables de ta base :            MonDS.Clear()<?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" /??>




            MaConnexion.Open()






            
Dim selectSQL AsString = "SELECT * FROM ma table WHERE etc etc..."






            MaCommande = New OleDbCommand(selectSQL, MaConnexion)






            mon

DataAdapter.SelectCommand = MaCommande






            monDataAdapter.Fill(MonDS, "Ma_table")
-------
copier toutes les autres tables
------


         MaConnexion.Close()






 '
2.  tu recopies le Dataset dans un fichier Xml (avec ecrasement éventuel)



         MonDS.WriteXml(Server.MapPath("~/mon_chemin_relatif/MonFichier.xml"))




et là j'espère qu'il aura la forme souhaitée, mais il y a des surcharges !
@+Gilles

fabienfs · Answer

Salut,

Quand tu parles de DataSet tu veux parler de DataList ?


J'ai juste un blem avec "MonDS", je sais pas en quoi je doit le déclarer ??  (il me fait aussi une erreur avec la ligne monDataAdapter.Fill(MonDS, "produits"))

Encore une dernière chose, que veux-tu dire par il y aura des surcharges ??

Pour info voici mon code modifié : 


<hr />


Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim MonDS As New OleDbConnection




        Dim DBobjConn As OleDbConnection
        DBobjConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.MapPath("~/App_Data/db_products.mdb"))
        DBobjConn.Open()



        Dim MaCommande As New OleDbCommand
        Dim monDataAdapter As New OleDbDataAdapter





        MonDS.Clear()



        Dim selectSQL As String = "SELECT * FROM produits"



        MaCommande = New OleDbCommand(selectSQL, DBobjConn)



        monDataAdapter.SelectCommand = MaCommande



        monDataAdapter.Fill(MonDS, "produits")



        DBobjConn.Close()



        ' 2.  tu recopies le Dataset dans un fichier Xml (avec ecrasement éventuel)
        MonDS.WriteXml(Server.MapPath("~/admin/test.xml"))
    End Sub




Grand merci pour ton aide ! 

A++ 

Fabien S. (Alias: fabienfs)

SuperBouly · Answer

MonDS voulait dire  MonDataset. oui, c'était pas bien clair
tu dois écrire 
Dim MonDS As New Dataset
monDataAdapter.Fill(MonDS, "produits") ne peut pas marcher si MonDS est une connexion.
une surcharge est , si tu veux , une variante d"une fonction ou d'un méthde avec des arguments différents selon la situation.
ex :writeXml(fileName as string) et writeXml(fileName as string,writehierarchy as boolean)
Consulte l'aide de visual studio, on ne peut pas tout savoir !
@+G

fabienfs · Answer

Nickel, merci ! 

Voici mon code complet pour info :

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load



        Dim DBobjConn As OleDbConnection
        DBobjConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.MapPath("~/App_Data/products.mdb"))
        DBobjConn.Open()



        Dim MonDS As New DataSet
        Dim MaCommande As New OleDbCommand
        Dim monDataAdapter As New OleDbDataAdapter



        MonDS.Clear()



        Dim selectSQL As String = "SELECT * FROM product"



        MaCommande = New OleDbCommand(selectSQL, DBobjConn)



        monDataAdapter.SelectCommand = MaCommande



        MonDS.DataSetName = "products"



        monDataAdapter.Fill(MonDS, "product")



        DBobjConn.Close()
        MonDS.WriteXml(Server.MapPath("~/products.xml"))
    End Sub


Bonne journée 

A++

Génération d'XML avec ASP.net via une BDD

4 réponses

Votre réponse