mohamed222222
Messages postés161Date d'inscriptionmardi 12 juin 2007StatutMembreDernière intervention22 avril 2009
-
3 août 2007 à 16:50
mohamed222222
Messages postés161Date d'inscriptionmardi 12 juin 2007StatutMembreDernière intervention22 avril 2009
-
6 août 2007 à 15:42
Bonjour à tous !!! quelqu'un peut me traduire ce code en vb.net !!!
Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
Dim oXML1, oXML2 As System.Xml.XmlDocument
Dim oRoot, oNode1, oNode2 As System.Xml.XmlNode
Dim nCityCode As Integer
Dim nParentAreaId As Integer
'# On créé deux instances de document
oXML1 = New System.Xml.XmlDocument()
oXML2 = New System.Xml.XmlDocument()
For Each oRoot In oXML1.SelectNodes("//hotels/Establishment")
nCityCode = Integer.Parse(oRoot.SelectSingleNode( _
"Address/cityCode").InnerText)
oNode1 = oXML2.SelectSingleNode( _
"//AreaCityHotelCountValues/AreaCityHotelCountValues[cityid='" & _
nCityCode & "']")
If oNode1 IsNot Nothing Then
nParentAreaId = Integer.Parse(oNode1.SelectSingleNode( _
"parentareaid").InnerText)
If nParentAreaId <> 0 Then
oNode2 = oRoot.SelectSingleNode("Address")
'oNode2.AppendChild(oNode1.SelectSingleNode("cityname"))
oNode1 = oXML2.SelectSingleNode( _
"//AreaCityHotelCountValues/AreaCityHotelCountValues[areaid='" & _
nParentAreaId & "']")
If Not oNode1 Is Nothing Then
oNode2.AppendChild(oNode1.SelectSingleNode("areaname"))
oNode2.AppendChild(oNode1.SelectSingleNode("areaid"))
oNode2.AppendChild(oNode1.SelectSingleNode("parentareaid"))
End If
End If
End If
Next oRoot
'# Au final, on génère le fichier résultat
oXML1.Save("c:\c.xml")
End Sub,
mohamed222222
Messages postés161Date d'inscriptionmardi 12 juin 2007StatutMembreDernière intervention22 avril 2009 6 août 2007 à 11:05
salut a tous !!!
If Not oNode1 Is Nothing Then
oNode2.AppendChild(oNode1.SelectSingleNode("areaname"))
arrivée à cette ligne j'ai une erreur qui me dit la référence d'objet n'est pas définie à une instance d'un objet !!!
je n'ai pas réussi à instancier anode2 et onode1
Quelqu'un peut m'aider !!!
merci d'avance de votre aide