Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

razs

xml com loop

Por , em ASP Clássico

Recommended Posts

razs    0

razs
Postado

Era para fazer esta parte de um outro modo mas visto que vai ser quase impossivel converter o vba esta é outra abordagem possivel.

O problema é que a unica maneira que consegui por a funcionar foi por javascrip e apenas para um caso.

 

O problema agora é que preciso de um loop que compare os valores de SITE e SCANTYPE dentro do primeiro node e de atrivuir os valores dos varios campos para asp de modo a gravar na bd.

 

os dados serao retirados por comparação com os dois campos SITE e SCANTYPE

 

ex:

if SCANTYPE="MAC1" and SITE="OD" then

tabela com os dados

end if

 

Alguem tem um ideia?

 

<!DOCTYPE html>
<html>
<head>
<script src="loadxmldoc.js"></script>
</head>
<body>

<script>
xmlDoc=loadXMLDoc("cert.xml");
</script>


<%
dim tr
tr=0
do while tr <100
%>

<script>
x=xmlDoc.getElementsByTagName("SCAN")[0].childNodes;
y=xmlDoc.getElementsByTagName("SCAN")[0].firstChild;
for (i=0;i<x.length;i++)
{
if (y.nodeType==1)
 {//Process only element nodes (type 1)
 document.write(y.nodeName + "<br />");
 document.write("--->" + x[i].childNodes[0].nodeValue + "<br><br>");
 }
y=y.nextSibling;
}
</script>

<br><br><br><br>
<script>

x=xmlDoc.getElementsByTagName("MTA")[0].childNodes;
y=xmlDoc.getElementsByTagName("MTA")[0].firstChild;
for (i=0;i<x.length;i++)
{
if (y.nodeType==1)
 {//Process only element nodes (type 1)
 document.write(y.nodeName + "<br />");
 document.write("--->" + x[i].childNodes[0].nodeValue + "<br><br>");
 }
y=y.nextSibling;
}
</script>

<br><br><br><br>
<script>

x=xmlDoc.getElementsByTagName("GCA")[0].childNodes;
y=xmlDoc.getElementsByTagName("GCA")[0].firstChild;
for (i=0;i<x.length;i++)
{
if (y.nodeType==1)
 {//Process only element nodes (type 1)
 document.write(y.nodeName + "<br />");
 document.write("--->" + x[i].childNodes[0].nodeValue + "<br><br>");
 }
y=y.nextSibling;
}
</script>

<%
loop
tr=tr+1
%>

</body>
</html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

eu tenho yma aplicação em que faço o loop no XML assim:

 

If xml.parseError.errorCode = 0 Then
Set objLst = xml.getElementsByTagName("Calculation")
noOfcompanies = objLst.length
End If

For i = 0 To (noOfcompanies - 1)

 Set objHdl = objLst.item(i)
 if xml.getElementsByTagName("VehicleId").item(i).text = x_vehicleid then
 x_ins_name = xml.getElementsByTagName("Name").item(i).text
 x_ins_logo = xml.getElementsByTagName("Logo").item(i).text
 x_ins_deposit = xml.getElementsByTagName("Deposit").item(i).text
 x_ins_NumberOfPayments = xml.getElementsByTagName("NumberOfPayments").item(i).text
 x_ins_TotalAmountPayable = xml.getElementsByTagName("TotalAmountPayable").item(i).text
 x_ins_Apr = xml.getElementsByTagName("Apr").item(i).text
 x_ins_ReviewAndBuy = xml.getElementsByTagName("ReviewAndBuy").item(i).text
 x_ins_KeyFacts = xml.getElementsByTagName("KeyFacts").item(i).text  
 x_ins_MonthlyPremium = xml.getElementsByTagName("MonthlyPremium").item(i).text 
 x_ins_AnnualPremium = xml.getElementsByTagName("AnnualPremium").item(i).text  

...aqui a exibição

Exit for
end if
Next

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito