[Resolvido] error '800a01a8' - na Abertura do arquivo XML

[fernando1 0]

Bom Dia a todos! http://forum.imasters.com.br/public/style_emoticons/default/grin.gif

 

Tenho um trecho de código em ASP, onde chamo um arquivo xml e resgato informaçoes dele...

Entretanto, esta ocorrendo um erro, quando chega extamente nesta linha:

 

Set raiz_dados_pedido = objRoot.documentElement.selectSingleNode("dados_pedido[@id_transacao=&FctId_transacao&]")

 

 

O Erro é:

 

Microsoft VBScript runtime error '800a01a8'

 

Object required: 'objRoot'

 

 

O arquivo xml ja existe a as variáveis que vem de fora estão todas configuradas e trazendo valores corretos

Estranho, pq objRoot ja esta setado, recebendo valor não ??? <_<

 

 

Segue abaixo o código do trecho:

 

 

FctId_transacao = 12450593  ' Use essa variável com este número por exemplo, é que cada transação tem um nome de arquivo xml
   
   set objXML = CreateObject("Microsoft.XMLDOM")
		objXML.preserveWhiteSpace = False
		objXML.async = False
		objXML.validateOnParse = True
		objXML.resolveExternals = True
		objXML.load (Application("DiretorioPedidos")&FctId_transacao&".xml")
	Set objRoot = objXML.documentElement
	
	
	Set raiz_dados_pedido =  objRoot.documentElement.selectSingleNode("dados_pedido[@id_transacao="&FctId_transacao&"]")
	Set raiz_dados_produto = objXML.getElementsByTagName("dados_pedido[@id_transacao="&FctId_transacao&"]/produto") 
	'Define o número de atributos registrados
	n_raiz_dados_produto = raiz_dados_produto.length

	'Captura os valos dos atribuitos
	VARinicio_transacao = raiz_dados_pedido.getAttribute("inicio_transacao") 
	VARpeso_total	   = raiz_dados_pedido.getAttribute("peso_total") 
	VARopcao_frete	  = raiz_dados_pedido.getAttribute("opcao_frete") 
	VARforma_pagamento  = raiz_dados_pedido.getAttribute("forma_pagamento") 


	'Fecha arquivo de XML
	If request("acao") = "alterar" Then
		FctobjXML.save(FctId_transacao)
	End If
   
   
	'Libera objetos da memória
	Set objXML = Nothing
	Set objRoot = Nothing

	Set raiz_dados_produto = Nothing
	Set raiz_dados_pedido = Nothing

 

Fico no aguardo, se alguém souber do que se trata....

Obrigado http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

Fernando

[Ted k' 126]

deixe assim:

Set raiz_dados_pedido = objRoot.selectSingleNode("dados_pedido[@id_transacao="&FctId_transacao&"]")

[fernando1 0]

[Resolvido]

 

Puts, valeu cara! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

 

Agora que eu vi a cagada que fiz, hahahah http://forum.imasters.com.br/public/style_emoticons/default/grin.gif

[Patrique 0]

Que bm que conseguiu.