Home Page
Articoli
Tips & Tricks
News
Forum
Archivio Forum
Blogs
Sondaggi
Rss
Video
Utenti
Chi Siamo
Contattaci
Username:
Password:
Login
Registrati ora!
Recupera Password
Home Page
Stanze Forum
App. Visual Studio 6.0
[VB]Problema tra xml e datagrid
martedì 25 marzo 2008 - 16.38
Elenco Threads
Stanze Forum
Aggiungi ai Preferiti
Cerca nel forum
Nerom
Profilo
| Newbie
18
messaggi | Data Invio:
mar 25 mar 2008 - 16:38
Salve a tutti! finalmente dopo aver tanto girato per il sito ho deciso di registrarmi
Volevo fare questa domanda, io uso visual studio 2005 scrivendo in vb ed ho il seguento prolema:
ho un file xml (con il suo xsd) ed ho la necessità di prelevare tutti i nomi degli elementi per metterli in un colonna di un datagrid,un elemento per riga.
Io ho provato a fare questo codice :
filepath = TBFilexml.Text 'prende l'indirizzo dell'xml da una textbox
Dim Doc As New Xml.XmlDocument
Doc.Load(filepath)
Dim node As Xml.XmlNodeList
Dim ele As Xml.XmlElement
node = Doc.GetElementsByTagName("Query_Intervento") 'nodo radice che contiene tutti gli elementi
Dim x As Integer
For x = 0 To node.Count - 1
ele = node(x)
frmProcesso.dgvCampi.Rows(x).Cells(1).Value = ele.ToString
Next
Ora io vorrei che tutti gli elementi che ho all'interno del nodo radice, venissero messi nella colonna 1 del datagrid dgvCampi nella form frmProcesso...ma come ho fatto io non funziona...
Spero di aver dato tutti i dettagli e di ricevere presto una risposta
Purtroppo VB lo uso solo da un mesetto e qualcosa quindi mi trovo un pochino in difficoltà
....Ovviamente, grazie in anticipo!
Au revoir,
Nerom.
<--->
Dopo una giornata di 20 ora passata sopra a codice e codice, ho trovato la maniera di risolvere la questione! Se dovesse servirvi ecco il codice :
filepath = TBFilexml.Text
Dim Doc As New Xml.XmlDocument
Doc.Load(filepath)
Dim node As Xml.XmlNodeList
Dim ele As Xml.XmlElement
node = Doc.DocumentElement.FirstChild.ChildNodes
Dim x As Integer
dt1 = frmProcesso.dgvCampi.DataSource
'aggiunge i campi in dgvcampi
Dim row1 As DataRow
For x = 0 To node.Count - 1
row1 = dt1.NewRow
dt1.Rows.Add(row1)
ele = node(x)
frmProcesso.dgvCampi.Rows(x).Cells(1).Value = ele.Name.ToString
Next
spero possa essere d'aiuto ad altri! au revoir!
Torna su
Stanze Forum
Elenco Threads
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?
Dopo esserti registrato potrai chiedere
aiuto sul nostro
Forum
oppure aiutare gli altri
Consulta le
Stanze
disponibili.
Registrati ora !