T
Tim::..
Hi can someone please give me some help with this little problem I am having with the following loop
...:: CODE ::.
<
'Load XM
set xml = Server.CreateObject("Microsoft.XMLDOM"
xml.async = fals
xml.load(Server.MapPath("ProjectTEST.xml")
Dim sDate(200,100
Dim sNodes(200,100
Dim fDate(200,100
Dim fNodes(200,100
'Task Start Dat
node=-
var=-
set oNodes=xml.selectNodes("/Project/Tasks/Task/Start"
for each oNode in oNode
node=node+
for i=0 to 9
sNodes(node,i) = oNode.tex
nex
var=var+
for i=0 to 9
sTemp = sNodes( node,0
sDate( var,i ) = Mid( sTemp, 1, 10
next
nex
'Task Finish Dat
node=-
var=-
set bNodes=xml.selectNodes("/Project/Tasks/Task/Finish"
for each bNode in bNode
node=node+
for i=0 to 9
fNodes(node,i) = bNode.tex
nex
' Write whole data and time for Finish of task as seen in XML Documen
'response.Write fNodes(node,0) & "<br>
'Break up date into different variable
var=var+
for i=0 to 9
fTemp = fNodes( node,0
fDate( var,i ) = Mid( fTemp, 1, 10
next
nex
%><HTML><BODY><Table><tr
Start loop her
<TD id='item_1_2' class='NormalText' nowrap align='center'> <%response.write(DateDiff("d", sDate(var,0), fDate(var,0)) )%></TD
End loop her
</tr></BODY></HTML
How do I get the loop to produce all the records found in the response.write contained in the html???
Thanks for any help
...:: CODE ::.
<
'Load XM
set xml = Server.CreateObject("Microsoft.XMLDOM"
xml.async = fals
xml.load(Server.MapPath("ProjectTEST.xml")
Dim sDate(200,100
Dim sNodes(200,100
Dim fDate(200,100
Dim fNodes(200,100
'Task Start Dat
node=-
var=-
set oNodes=xml.selectNodes("/Project/Tasks/Task/Start"
for each oNode in oNode
node=node+
for i=0 to 9
sNodes(node,i) = oNode.tex
nex
var=var+
for i=0 to 9
sTemp = sNodes( node,0
sDate( var,i ) = Mid( sTemp, 1, 10
next
nex
'Task Finish Dat
node=-
var=-
set bNodes=xml.selectNodes("/Project/Tasks/Task/Finish"
for each bNode in bNode
node=node+
for i=0 to 9
fNodes(node,i) = bNode.tex
nex
' Write whole data and time for Finish of task as seen in XML Documen
'response.Write fNodes(node,0) & "<br>
'Break up date into different variable
var=var+
for i=0 to 9
fTemp = fNodes( node,0
fDate( var,i ) = Mid( fTemp, 1, 10
next
nex
%><HTML><BODY><Table><tr
Start loop her
<TD id='item_1_2' class='NormalText' nowrap align='center'> <%response.write(DateDiff("d", sDate(var,0), fDate(var,0)) )%></TD
End loop her
</tr></BODY></HTML
How do I get the loop to produce all the records found in the response.write contained in the html???
Thanks for any help