Loop D Loop... Help


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'>&nbsp;<%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
 
Ad

Advertisements


Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top