Bom dia moçada;
Vamos lá com mais um problema que estou tendo.
Seguinte, eu leio os XML's com esse código
set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.open "GET", "http://www.tecnogalli.com.br/consultoria/arquivos/arquivoxml.xml" & cat, false
xml.send
set objXML = xml.respon---ML
set raiz = objXML.getElementsByTagName("nfeProc")
set nfe = objXML.getElementsByTagName("nNF")
set serie = objXML.getElementsByTagName("serie")
set itens = objXML.getElementsByTagName("qTrib")
set fornecedor = objXML.getElementsByTagName("xNome")
'inicio mudando para hering
'set dtEmissao = objXML.getElementsByTagName("dhEmi")
'fim mudando para hering
'inicio mudando para havainas
set dtEmissao = objXML.getElementsByTagName("dEmi")
'fim mudando para havainas
'set dtVencimento = objXML.getElementsByTagName("dVenc")
set valor = objXML.getElementsByTagName("vNF")
set cnpj = objXML.getElementsByTagName("dest/CNPJ")
set inscMun = objXML.getElementsByTagName("IE")
set valoricms = objXML.getElementsByTagName("ICMSTot/vICMS")
set numserie = objXML.getElementsByTagName("chNFe")
for i = 0 to raiz.length-1
notafiscal = nfe.item(i).text
serienf = serie.item(i).text
'response.Write(cLng(replace(itens.item(i).text,".",","))&"<br>")
cnpj = cnpj.item(i).text
inscMun = inscMun.item(i).text
'response.Write(left(cnpj,14))
dataemissao = mask_data(left(dtEmissao.item(i).text,10))
'datavencimento = mask_data(dtVencimento.item(i).text)
valor = valor.item(i).text
valoricms = valoricms.item(i).text
numserie = numserie.item(i).text
next
Mas o meu problema que estou enfrentando é. Alguns arquivos xml de nota fiscal eletrônica esta vindo com a data de emissão assim
objXML.getElementsByTagName("dEmi")
e agora tem uns xml's que esta vindo assim
objXML.getElementsByTagName("dhEmi")
Sendo assim eu tenho que fazer a mudança no meu código quando o xml tem a tag dEmi e pois voltar o código para pegar a tag dhEmi.
Existe uma forma de eu resolver esse problema pra não precisar ter que ficar mudando o meu código?
Att;