Jag har denna kod som jag redan tar ut <Name> och några andra taggar som jag inte har med ovan.
for each driverNode in xmlDoc.SelectNodes("//Race/Driver")
'här är raden som läser in i databasen
'koden som används: GetValue(driverNode,"Name","")
next
function GetValue(xmlNode,nodeName,defaultValue)
set subNode=xmlNode.SelectSingleNode(nodeName)
if not subNode is nothing then
GetValue=subNode.text
exit function
end if
GetValue=defaultValue
end function
Jag kan få den att lista Namnen ex:
Hannu
Markus
Men när jag kommer till delarna <Lap....> så kommer samtliga varv under båda namnen. Vill ha så att de 3 varven (detta är olika från gång till gång) som här till respektive namn hamnar rätt så att säga.
Dessa värden ska sen in i databasen (MySQL) där varje Lap har namnet i sig också. Det är klart med de andra delarna men nu vill ja ha in:
Namn | s1 | s2 | s3 | Lap i en ny tabell.
Har pulat med det här i dagar nu. Hoppas någon har tid och ork :)
Nu får jag fram <Lap>värdena rätt. Nu är det bara attributen s1="VÄRDE" och s2="VÄRDE" och s3="VÄRDE" värdena som jag också vill ha ut.
koden ser ut så här nu.
for each driverNode in xmlDoc.SelectNodes("//Race/Driver")
Response.Write GetValue(driverNode,"Name","")
for each lapNode in driverNode.SelectNodes("Lap")
Response.Write lapNode.Text
'här är raden som läser in i databasen
'koden som används: GetValue(driverNode,"Name","")
next
next
function GetValue(xmlNode,nodeName,defaultValue)
set subNode=xmlNode.SelectSingleNode(nodeName)
if not subNode is nothing then
GetValue=subNode.text
exit function
end if
GetValue=defaultValue
end function
for each driverNode in xmlDoc.SelectNodes("//Race/Driver")
strNamn = GetValue(driverNode,"Name","")
for each lapNode in driverNode.SelectNodes("Lap")
strLaptime = lapNode.Text
next
for each lapNode in driverNode.SelectNodes("Lap")
strLnum = lapNode.getAttribute("num")
strP = lapNode.getAttribute("p")
strS1 = lapNode.getAttribute("s1")
strS2 = lapNode.getAttribute("s2")
strS3 = lapNode.getAttribute("s3")
' här petar jag in allt i databasen
next
function GetValue(xmlNode,nodeName,defaultValue)
set subNode=xmlNode.SelectSingleNode(nodeName)
if not subNode is nothing then
GetValue=subNode.text
exit function
end if
GetValue=defaultValue
end function
